fact: Definition G0_1 := [k_out, k_in] <-$2 ( key <-$ {0, 1}^(c + k); ret splitVector c k key); [b, _] <-$2 A _ _ (fun (_ : unit) m => ret (h k_out (F k_in m), tt)) tt; ret b.
imports: FCF PRF SplitVector cAU CompFold DetSem SemEquiv