Latin Squares in reduced form/Randomizing using Jacobson and Matthews’ Technique: Difference between revisions
Content added Content deleted
(→{{header|F_Sharp|F#}}: i' j' and z' are idiotmatic F# but Rosettacode's syntax highlighting doesn't cope) |
|||
Line 19: | Line 19: | ||
<lang fsharp> |
<lang fsharp> |
||
// Jacobson and Matthews technique for generating Latin Squares. Nigel Galloway: August 5th., 2019 |
// Jacobson and Matthews technique for generating Latin Squares. Nigel Galloway: August 5th., 2019 |
||
let R=let N=System.Random() in (fun n->N.Next(n)) |
|||
let jmLS α X0= |
let jmLS α X0= |
||
let X0=Array2D.copy X0 |
let X0=Array2D.copy X0 |