type point = { x: int; y : int } let manhattan_distance (a: point) (b: point) : int =
type point = { x: int; y : int } let manhattan_distance (a: point) (b: point) : int = abs (a.x - b.x) + abs (a.y - b.y)
https://try.ocamlpro.com/#code/type'point'='$4'x:'int;'y':'i...
https://try.ocamlpro.com/#code/type'point'='$4'x:'int;'y':'i...