Deal cards for FreeCell: Difference between revisions

(→‎{{header|Logo}}: Add implementation.)
Line 1,672:
 
to sample_lcg
local "rand
make "_lcg_state modulo sum product 214013 :_lcg_state 2531011 2147483648
make "randoutput int quotient :_lcg_state 65536
output :rand
end
 
1,479

edits