Module Wutil_once

module Wutil_once: sig .. end
once f returns a function that will only be applied once per execution of the program and returns the same value afterwards.

val once : ('a -> 'b) -> 'a -> 'b