tuple.ml
spotlib
1 2 3 4 5 6 7 module Stdlib = struct let map_fst f (a,b) = f a, b let map_snd f (a,b) = a, f b end include Stdlib
1 2 3 4 5 6 7
module Stdlib = struct let map_fst f (a,b) = f a, b let map_snd f (a,b) = a, f b end include Stdlib