proposition: Lemma monotone1_union (gf gf': rel1 T0 -> rel1 T0) (MON1: monotone1 gf) (MON2: monotone1 gf'): monotone1 (gf \2/ gf').
proof: Proof. red; intros. destruct IN. - left. eapply MON1. apply H. apply LE. - right. eapply MON2. apply H. apply LE. Qed.
imports: Program.Basics Paco(paconotation_internal paco_internal pacotac_internal)