proposition: Theorem _paco14_unfold: forall (MON: _monotone14 gf) r, paco14 gf r <14== gf (upaco14 gf r).
proof: Proof. intros. apply curry_adjoint2_14. eapply _paco_unfold; apply monotone14_map; assumption. Qed.
imports: Program.Basics Paco(paconotation_internal paco_internal pacotac_internal)