DEFINITION B_ind()
TYPE =
       P:BProp
         .(P Abbr)(P Abst)(P Void)b:B.(P b)
BODY =
        assume PBProp
        suppose HAbbr
        suppose H1Abst
        suppose H2Void
        assume bB
          by cases on b we prove P b
             case Abbr 
                the thesis becomes the hypothesis H
             case Abst 
                the thesis becomes the hypothesis H1
             case Void 
                the thesis becomes the hypothesis H2
          we proved P b
       we proved 
          P:BProp
            .(P Abbr)(P Abst)(P Void)b:B.(P b)