Quasiquotified Nat; mkNatTpt now tail recursive.