Section Companion.
Variable gf: rel -> rel.
Hypothesis gf_mon: monotone11 gf.
Inductive cpn11 (r: rel) x0 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10 : Prop :=
| cpn11_intro
clo
(COM: compatible11 gf clo)
(CLO: clo r x0 x1 x2 x3 x4 x5 x6 x7 x8 x9 x10)
.

Lemma cpn11_clo
r clo (LE: clo <12= cpn11):
clo (cpn11 r) <11= cpn11 r.