fun : int -> int double_omega (x : int) = omega (x) (x) and : int -> int omega (x: int) = double_omega (x) let main : int = double_omega 73