yr=: 2000 + [EMAIL PROTECTED]: {. +/@}. {. +`(0,12 # i.@:>[EMAIL
PROTECTED]&(%&12))/(yr -: year) 3 4 15 1 -- Raul ---------------------------------------------------------------------- For information about J forums see http://www.jsoftware.com/forums.htm
