fact: Structure grespectful4 (clo: rel -> rel) : Prop := grespect4_intro { grespect4_mon: monotone4 clo; grespect4_respect : forall l r (LE: l <4= r) (GF: l <4= gf r), clo l <4= rclo4 (cpn4 gf) (gf (rclo4 (clo \5/ gupaco4 gf (cpn4 gf)) r)); }.
imports: Program.Basics Paco(paco4 pacotac)