proposition: Lemma monotone1_compose (gf gf': rel1 T0 -> rel1 T0) (MON1: monotone1 gf) (MON2: monotone1 gf'): monotone1 (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)