Anonymous user
Card shuffles: Difference between revisions
no edit summary
(→{{header|Ruby}}: rewrite overhand shuffle) |
No edit summary |
||
Line 40:
* [[Go Fish]]
=={{header|APL}}==
If we generate a deck by
<lang APL>
deck ← ⊂[1](52⍴'A23456789TJQK'),[0.5](13⍴'S'),(13⍴'H'),(13⍴'D'),(13⍴'C')
</lang>
Then a generated deck looks like
<lang APL>
AS 2S 3S 4S 5S 6S 7S 8S 9S TS JS QS KS AH 2H 3H 4H 5H 6H 7H 8H 9H TH JH QH KH AD 2D 3D 4D 5D 6D 7D 8D 9D TD JD QD KD AC 2C 3C 4C 5C 6C 7C 8C 9C TC JC QC KC
</lang>
Sorting a deck merely requires generating 52 unique random nunmbers from 1 to 52.
<lang>
deck[52?52]
JD 8C TH 8D KH QH 6S AH 4D JS 5S AD 6H 3H 3D 5C 9C 7C 7S 4C JC 3S KD 9H 3C 4H 2D TD KS TS 7D JH 9D 8H 6D 7H 2H 4S QC AC KC 9S AS QS TC 2C 8S 5D 2S 6C 5H QD
</lang>
=={{header|C}}==
| |||