Section Main.
Variable gf: rel -> rel.
Hypothesis gf_mon: monotone6 gf.
Variant gpaco6 clo r rg x0 x1 x2 x3 x4 x5 : Prop :=
| gpaco6_intro (IN: @rclo6 clo (paco6 (compose gf (rclo6 clo)) (rg \6/ r) \6/ r) x0 x1 x2 x3 x4 x5)
.
Definition gupaco6 clo r := gpaco6 clo r r.
Hint Resolve gpaco6_def_mon : paco.

Lemma gpaco6_unfold clo r rg:
gpaco6 clo r rg <6= rclo6 clo (gf (gupaco6 clo (rg \6/ r)) \6/ r).