World Cup group stage: Difference between revisions

m
→‎version 2, generated game sets: aligned some statements better.
m (→‎version 2, generated game sets: added some comments to the REXX section header.)
m (→‎version 2, generated game sets: aligned some statements better.)
Line 875:
nextResult: procedure expose results sets; if results==copies(2, sets) then return 0
res= 0 /* [↓] do arithmetic in base three.*/
do j=1 for sets; res= res * 3 + substr(results, j, 1)
end /*j*/
results=; res= res + 1
results=; do sets; results= res // 3 || results; res= res % 3
end /*sets*/
return 1
/*──────────────────────────────────────────────────────────────────────────────────────*/