# let divide ~x ~y = x / y;; val divide : x:int -> y:int -> int = # let half = divide ~y:2;; val half : x:int -> int = # half 120;; - : int = 60