Anonymous user
Permutations: Difference between revisions
m
→{{header|REXX}}: correct old-style format of CALL statement. -- ~~~~
(D: Fast Lazy Version updated) |
m (→{{header|REXX}}: correct old-style format of CALL statement. -- ~~~~) |
||
Line 2,242:
else do q=1 for x /*build permutation recursively. */
do k=1 for ?-1; if @.k==$.q then iterate q; end /*k*/
@.?=$.q; call .permset
end /*q*/
return
| |||