Module Exports.
Notation kleene_lfp := kleene_lfp.
Notation kleene_lfp_fixed := kleene_lfp_fixed.
Notation kleene_lfp_least := kleene_lfp_least.
End Exports.
End Kleene.
Export Kleene.Exports.
(**********************************)
(* Continuity of common functions *)
(**********************************)
Arguments const_cont {D1 D2 y}.
Prenex Implicits const_cont.
Arguments comp_cont [D1 D2 D3 f1 f2].
Prenex Implicits comp_cont.

Lemma proj1_cont (D1 D2 : cpo) : continuous (@fst D1 D2).