fact: Definition F_choice_prod: ord_functor (prod_cat ord_choiceType ord_choiceType) ord_choiceType.
imports: Mon(SPropBase) Relational(OrderEnrichedCategory OrderEnrichedRelativeMonadExamples) mathcomp(all_ssreflect)