Seven-sided dice from five-sided dice: Difference between revisions

Content added Content deleted
Line 1,547: Line 1,547:
6 6 7 7 7 ]
6 6 7 7 7 ]
dup 0 = iff
dup 0 = iff
drop again ] is dice7 ( --> n )
drop again ] is dice7 ( --> n )</lang>

randomise
50 times [ dice5 echo ] cr
50 times [ dice7 echo ] cr</lang>


{{out}}
{{out}}
Retrieved from "https://rosettacode.org/wiki/Seven-sided_dice_from_five-sided_dice"