print inductive nat print inductive list