fact: Definition Proj14d (A B C D : finType) (d : {fdist A * B * D * C}) : {fdist A * C} := fdist_proj13 (Proj124.d d).
imports: mathcomp(all_ssreflect ssralg matrix) Reals mathcomp(Rstruct) ssrR Reals_ext logb ssr_ext ssralg_ext bigop_ext fdist proba jfdist_cond