fact: Definition gstrict_lub (s : nat -> T1) (lambda : T1) := (forall i : nat, LT (s i) lambda) /\ (forall a : T1, (forall i : nat, LE (s i) a) -> LE lambda a).
imports: mathcomp(all_ssreflect zify) Coq(Logic.Eqdep_dec) hydras(DecPreOrder ON_Generic T1 E0) Coq(Relations Basics Wellfounded.Inverse_Image Wellfounded.Inclusion)