Section Main.
Variable gf: rel -> rel.
Hypothesis gf_mon: monotone0 gf.
Variant gpaco0 clo r rg : Prop :=
| gpaco0_intro (IN: @rclo0 clo (paco0 (compose gf (rclo0 clo)) (rg \0/ r) \0/ r))
.
Definition gupaco0 clo r := gpaco0 clo r r.
Hint Resolve gpaco0_def_mon : paco.

Lemma gpaco0_cofix clo r rg
l (OBG: forall rr (INC: rg <0= rr) (CIH: l <0= rr), l <0= gpaco0 clo r rr):
l <0= gpaco0 clo r rg.