[offline] Thanks very much, Roger.
On Tue, Feb 23, 2010 at 1:06 PM, Roger Hui <[email protected]> wrote: > bigdeal=: 4 : 0 > t=. 0 $ v=. y $~ <.1.11*x > while. x > #t do. t=. ~. roll v end. > x {. t > ) > > rix =: i...@[ ([ ,. [ + roll@:-~) ] > deal1=: [ {. <@~."1@|....@rix C. i...@-@] > deal =: deal1 ` bigdeal @. (< 0.01&*) ---------------------------------------------------------------------- For information about J forums see http://www.jsoftware.com/forums.htm
