exact this.of_eq (fun n as => by induction' n with n ih <;> simp[List.take_succ, *])
α : Type u_1
β : Type u_2
γ : Type u_3
σ : Type u_4
inst✝³ : Primcodable α
inst✝² : Primcodable β
inst✝¹ : Primcodable γ
inst✝ : Primcodable σ
this : Primrec₂ fun s a => Nat.rec [] (fun n as => as ++ (a.get? n).toList) s
⊢ Primrec₂ List.take
no goals