Section Main.
Variable gf: rel -> rel.
Hypothesis gf_mon: monotone14 gf.
Variant gpaco14 clo r rg x0 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 : Prop :=
| gpaco14_intro (IN: @rclo14 clo (paco14 (compose gf (rclo14 clo)) (rg \14/ r) \14/ r) x0 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13)
.
Definition gupaco14 clo r := gpaco14 clo r r.
Hint Resolve gpaco14_def_mon : paco.

Lemma gupaco14_mon clo r r' x0 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13
(IN: @gupaco14 clo r x0 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13)
(LEr: r <14= r'):
@gupaco14 clo r' x0 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 x11 x12 x13.