(** A semi-lattice ``with top'' is similar, but also has a greatest element [top]. *)
Module Type SEMILATTICE_WITH_TOP.
Include SEMILATTICE.
Parameter top: t.

(* Specifications: *)
Axiom ge_top: forall x, ge top x.
End SEMILATTICE_WITH_TOP.
Axiom ge_top: forall x, ge top x.
End SEMILATTICE_WITH_TOP.