End MapSubsetOrder.
Section FSubsetOrder.

(* Specifications: *)
Lemma FSubset_refl : forall s:FSet, MapSubset _ _ s s.
Lemma FSubset_antisym :
forall s s':FSet,
MapSubset _ _ s s' -> MapSubset _ _ s' s -> eqmap unit s s'.
Lemma FSubset_trans :
forall s s' s'':FSet,
MapSubset _ _ s s' -> MapSubset _ _ s' s'' -> MapSubset _ _ s s''.