与えられた参照の指す先の整数を1増やす関数 incr を定義しなさい。
# let incr x = x := !x + 1;; val incr : int ref -> unit = <fun>
# let x = ref 3;; val x : int ref = {contents = 3} # incr x;; - : unit = () # !x;; - : int = 4
