val (|>) : 'a -> ('a -> 'b) -> 'bval const : 'a -> 'b -> 'aval non : ('a -> bool) -> 'a -> boolval forever : (unit -> unit) -> exnval apply_n_times : n:int -> ('a -> 'a) -> 'a -> 'aval compose : ('b -> 'c) -> ('a -> 'b) -> 'a -> 'cval flip : ('a -> 'b -> 'c) -> 'b -> 'a -> 'c