I don't know why it crashes, but I can tell you that you are right in that
the error comes from the rank operator. You can see that from the stack
trace where it says Bif_OPER2_RANK.
Regards,
Elias
On 30 Apr 2016 10:36, "Christian Robert"
wrote:
>
> )load Loto2
> SAVED 2016-04-29 21:57:45
)load Loto2
SAVED 2016-04-29 21:57:45 (GMT-4)
)fns
LotoRandomize
⎕CR 'Loto'
z←n Loto a;b
(a b)←a
z←(0,a)⍴0
Loop: →(n=0)/Sort
z←z⍪a?b
n←¯1+n
→Loop
Sort: z←{⍵[⍋⍵;]} {(⊂⍋⍵)⌷⍵}⍤1 ⊢ z
5 Loto 6 49
1 9 18 21 43 48
5 6 10 39 41 44
8 18 19 21 36 44
14 18 23 31 4