% $Id: Count.oz,v 1.2 2007/10/31 21:29:12 leavens Exp leavens $ declare % Return the list [1 2 3 ... N] fun {Count N} fun {Help I} if I == N then I | nil else I | {Help I+1} end end in {Help 1} end