proposition: Lemma monotone4_compose (gf gf': rel4 T0 T1 T2 T3 -> rel4 T0 T1 T2 T3) (MON1: monotone4 gf) (MON2: monotone4 gf'): monotone4 (compose gf gf').
proof: Proof. red; intros. eapply MON1. apply IN. intros. eapply MON2. apply PR. apply LE. Qed.
imports: Program.Basics Paco(paconotation_internal paco_internal pacotac_internal)