// http://groups.google.com/group/comp.lang.functional/browse_thread/thread/8ed02e93b8debd6d/8a2395d0dd3d1013#8a2395d0dd3d1013 p:`0: / print pr:`0:,: / print w/ return rvn:{:[x;_f'!x;()]} / recursive v from n ivn:{x{x,,x}/()} / iterative v from n cvn:{((x+1){x'}/(!:))/x} / converging v from n rcv:{1!"}{",,/_f'x} / recursive c from v icn:{x{(-1_ x),x,"}"}/"{}"} / iterative c from n rpn:{p"{";_f'!x;p"}";} / recursive print from n pr rcv rvn 3 pr rcv ivn 3 pr rcv cvn 3 pr icn 3 rpn 3 \ 0 = {} 1 = {0} = {{}} 2 = {0 1} = {{}{{}}} 3 = {0 1 2} = {{}{{}}{{}{{}}}}