fork download
  1. let (N, k, x, y) = Scanf.scanf "%d %d %d %d" (fun a b c d -> (a, b, c, d))
  2. let possiveis x y = [(x+2,y+1); (x+2,y-1); (x-2,y-1); (x-2,y+2); (x-1,y+2); (x-1,y-2); (x+1,y+2); (x+1,y-2)]
Compilation error #stdin compilation error #stdout 0s 0KB
stdin
4 2 0 0
compilation info
File "prog.ml", line 1, characters 5-6:
Error: Unbound constructor N
stdout
Standard output is empty