fact: Definition KEM_CCA_out := [interface #val #[ KEMGEN ] : 'unit → 'pkey ; #val #[ ENCAP ] : 'unit → 'ekey ; #val #[ DECAP ] : 'ekey → 'key ; #val #[GET] : 'unit → 'key ].
imports: Relational(OrderEnrichedCategory GenericRulesSimple) mathcomp(all_ssreflect all_algebra reals distr fingroup.fingroup realsum ssrnat ssreflect ssrfun ssrbool ssrnum eqtype choice seq) Crypt(Axioms ChoiceAsOrd SubDistr Couplings UniformDistrLemmas FreeProbProg Theta_dens RulesStateProb UniformStateProb Package Prelude pkg_composition) Coq(Utf8 Lia) extructures(ord fset fmap) Equations(Equations)