fact: Definition map2 (elt elt' elt'':Type)(f:option elt->option elt'->option elt'') := _map2 (fun o1 o2 => match o1,o2 with None,None => None | _, _ => f o1 o2 end).
imports: Bool OrderedType ZArith OrderedType OrderedTypeEx FMapInterface