Nat -> (\T => [ Var: Nat ; Zero: <> ; Suc: T ; Primrec: ; Abs: T ; App: ]) -> (\T => [ Var: Nat ; Zero: <> ; Suc: T ; Primrec: ; Abs: T ; App: ])