DEFINITION llt_wf_ind()
TYPE =
       P:AProp.(a2:A.(a1:A.(llt a1 a2)(P a1))(P a2))a:A.(P a)
BODY =
       (Q
           assume PAProp
           assume nnat
              assume aA
              suppose eq nat (lweight a) n
                by (. .)
                we proved 
             suppose eq nat (lweight a) n
                by (. .)
                we proved 
             by (. .)
             we proved 

       end of Q
        assume PAProp
        suppose Ha2:A.(a1:A.(lt (lweight a1) (lweight a2))(P a1))(P a2)
        assume aA
          assume nnat
              assume n0nat
              suppose H0m:nat.(lt m n0)(Q λa0:A.P a0 m)
                we must prove λa0:A.P a0 n0
                or equivalently a0:A.(eq nat (lweight a0) n0)(P a0)
                 assume a0A
                 suppose H1eq nat (lweight a0) n0
                   (H2
                      consider H0
                      we proved m:nat.(lt m n0)(Q λa0:A.P a0 m)
                      that is equivalent to m:nat.(lt m n0)a1:A.(eq nat (lweight a1) m)(P a1)
                      by (eq_ind_r . . . previous . H1)
m:nat.(lt m (lweight a0))a1:A.(eq nat (lweight a1) m)(P a1)
                   end of H2
                    assume a1A
                    suppose H3lt (lweight a1) (lweight a0)
                      by (refl_equal . .)
                      we proved eq nat (lweight a1) (lweight a1)
                      by (H2 . H3 . previous)
                      we proved P a1
                   we proved a1:A.(lt (lweight a1) (lweight a0))(P a1)
                   by (H . previous)
                   we proved P a0
                we proved a0:A.(eq nat (lweight a0) n0)(P a0)
                that is equivalent to λa0:A.P a0 n0
             we proved n0:nat.(m:nat.(lt m n0)(Q λa0:A.P a0 m))(Q λa0:A.P a0 n0)
             by (lt_wf_ind . . previous)
             we proved λa0:A.P a0 n
             that is equivalent to a:A.(eq nat (lweight a) n)(P a)
          we proved n:nat.a:A.(eq nat (lweight a) n)(P a)
          by (llt_wf__q_ind . previous .)
          we proved P a
       we proved 
          P:AProp
            .a2:A.(a1:A.(lt (lweight a1) (lweight a2))(P a1))(P a2)
              a:A.(P a)
       that is equivalent to P:AProp.(a2:A.(a1:A.(llt a1 a2)(P a1))(P a2))a:A.(P a)