open nat print pp.max_depth print + print - print nat print nat.zero print nat.add print nat.rec print classical.em print quot.lift print nat.of_num