Section Main.
Variable gf: rel -> rel.
Hypothesis gf_mon: monotone5 gf.
Variant gpaco5 clo r rg x0 x1 x2 x3 x4 : Prop :=
| gpaco5_intro (IN: @rclo5 clo (paco5 (compose gf (rclo5 clo)) (rg \5/ r) \5/ r) x0 x1 x2 x3 x4)
.
Definition gupaco5 clo r := gpaco5 clo r r.
Hint Resolve gpaco5_def_mon : paco.

Lemma gpaco5_mon clo r r' rg rg' x0 x1 x2 x3 x4
(IN: @gpaco5 clo r rg x0 x1 x2 x3 x4)
(LEr: r <5= r')
(LErg: rg <5= rg'):
@gpaco5 clo r' rg' x0 x1 x2 x3 x4.