classThe memo class.[< .. >]c :int ->object..end
new Weak_memo.c size create a new memo object with an original size
of size. It will grow as needed.
method add : (< .. > as 'a) -> unit
Do nothing if the object is already there.
method find : 'b. (< .. > as 'b) -> 'a
Otherwise raise Not_found
method mem : 'c. (< .. > as 'c) -> boolmethod remove : 'd. (< .. > as 'd) -> unitmethod clear : unit -> unitmethod count : int