Rosetta Code

2048: Difference between revisions

Page Discussion

2048 (view source)

Revision as of 12:24, 29 July 2019

74 bytes removed ,  4 years ago
→‎{{header|OCaml}}: fix turn_cw with List.init
(→‎{{header|OCaml}}: show output)
(→‎{{header|OCaml}}: fix turn_cw with List.init)
Line 5,960:
let y = List.length grid in
let x = List.length (List.nth grid 0) in
List.init x (fun i ->
let arr =
ArrayList.init xy (fun ij ->
ArrayList.init ynth (funList.nth jgrid (y->j-1)) (i)
List.nth (List.nth grid (y-j-1)) (i)
)
)
in)
List.map Array.to_list (Array.to_list arr)
 
 
Retrieved from "https://rosettacode.org/wiki/Special:MobileDiff/248136"