DEFINITION ex5_5_ind()
TYPE =
       A0:Set
         .A1:Set
           .A2:Set
             .A3:Set
               .A4:Set
                 .P0:A0A1A2A3A4Prop
                   .P1:A0A1A2A3A4Prop
                     .P2:A0A1A2A3A4Prop
                       .P3:A0A1A2A3A4Prop
                         .P4:A0A1A2A3A4Prop
                           .P:Prop
                             .a:A0.a1:A1.a2:A2.a3:A3.a4:A4.(P0 a a1 a2 a3 a4)(P1 a a1 a2 a3 a4)(P2 a a1 a2 a3 a4)(P3 a a1 a2 a3 a4)(P4 a a1 a2 a3 a4)P
                               (ex5_5 A0 A1 A2 A3 A4 P0 P1 P2 P3 P4)P
BODY =
        assume A0Set
        assume A1Set
        assume A2Set
        assume A3Set
        assume A4Set
        assume P0A0A1A2A3A4Prop
        assume P1A0A1A2A3A4Prop
        assume P2A0A1A2A3A4Prop
        assume P3A0A1A2A3A4Prop
        assume P4A0A1A2A3A4Prop
        assume PProp
        suppose Ha:A0.a1:A1.a2:A2.a3:A3.a4:A4.(P0 a a1 a2 a3 a4)(P1 a a1 a2 a3 a4)(P2 a a1 a2 a3 a4)(P3 a a1 a2 a3 a4)(P4 a a1 a2 a3 a4)P
        suppose H1ex5_5 A0 A1 A2 A3 A4 P0 P1 P2 P3 P4
          by cases on H1 we prove P
             case ex5_5_intro a:A0 a1:A1 a2:A2 a3:A3 a4:A4 H2:P0 a a1 a2 a3 a4 H3:P1 a a1 a2 a3 a4 H4:P2 a a1 a2 a3 a4 H5:P3 a a1 a2 a3 a4 H6:P4 a a1 a2 a3 a4 
                the thesis becomes P
                by (H . . . . . H2 H3 H4 H5 H6)
P
          we proved P
       we proved 
          A0:Set
            .A1:Set
              .A2:Set
                .A3:Set
                  .A4:Set
                    .P0:A0A1A2A3A4Prop
                      .P1:A0A1A2A3A4Prop
                        .P2:A0A1A2A3A4Prop
                          .P3:A0A1A2A3A4Prop
                            .P4:A0A1A2A3A4Prop
                              .P:Prop
                                .a:A0.a1:A1.a2:A2.a3:A3.a4:A4.(P0 a a1 a2 a3 a4)(P1 a a1 a2 a3 a4)(P2 a a1 a2 a3 a4)(P3 a a1 a2 a3 a4)(P4 a a1 a2 a3 a4)P
                                  (ex5_5 A0 A1 A2 A3 A4 P0 P1 P2 P3 P4)P