INDUCTIVE DEFINITION leqz () [ ]
OF ARITY AAProp
BUILT FROM:
     leqz_sort: h1:nat
                         .h2:nat
                           .n1:nat
                             .n2:nat.(eq nat (plus h1 n2) (plus h2 n1))(leqz (ASort h1 n1) (ASort h2 n2))
   | leqz_head: a1:A.a2:A.(leqz a1 a2)a3:A.a4:A.(leqz a3 a4)(leqz (AHead a1 a3) (AHead a2 a4))