fact: Definition largeRowQuery x oracle := (fun p a respond_oracle => e <- fst p; z <- snd p; p' <-$ Repeat (queryRowWithEmergencyBreak (to_P_oracle oracle) respond_oracle x a) (fun p => let (e', z') := snd p in (V_accept x a e' z' && negb (eqb e e')) || fst p); e' <- fst ((snd p')); z' <- snd ((snd p')); extract x a e e' z z').
imports: Crypto FCF RndNat Asymptotic