Random Latin squares: Difference between revisions
Content added Content deleted
| Line 33: | Line 33: | ||
{{out}} |
{{out}} |
||
<pre> |
<pre> |
||
let β=lN2p [|0;N 4;N 3;N 2|] [|0..4|] in Seq.item (N 55) (normLS 5) |> List.map(lN2p [|N 5;N 4;N 3;N 2|]) |> List.permute(fun n->β.[n]) |> List.iter(printfn "%A") |
|||
[|5; 3; 1; 4; 2|] |
[|5; 3; 1; 4; 2|] |
||
[|1; 4; 5; 2; 3|] |
[|1; 4; 5; 2; 3|] |
||