proposition: Lemma paco2_mon_bot (gf gf': rel2 T0 T1 -> rel2 T0 T1) r' x0 x1 (REL: paco2 gf bot2 x0 x1) (LEgf: gf <3= gf'): paco2 gf' r' x0 x1.
proof: Proof. eapply paco2_mon_gen; [apply REL | apply LEgf | intros; contradiction PR]. Qed.
imports: Program.Basics Paco(paconotation_internal paco_internal pacotac_internal)