fact: Definition IND_CPA_SecretKey := forall (State : nat -> Set) (A1 : forall n, OracleComp (Plaintext n) (Ciphertext n) (Plaintext n * Plaintext n * State n)) (A2 : forall n, State n -> Ciphertext n -> OracleComp (Plaintext n) (Ciphertext n) bool), admissible_A1 A1 -> admissible_A2 A2 -> (forall n, EqDec (State n)) -> negligible (fun n => IND_CPA_SecretKey_Advantage (KeyGen n) (@Encrypt n) (A1 n) (A2 n) _).
imports: FCF.FCF FCF.CompFold FCF.Hybrid FCF.Asymptotic FCF.Admissibility