reserve            S for satisfying_CongruenceSymmetry
                         satisfying_CongruenceEquivalenceRelation
                         TarskiGeometryStruct,
         a,b,c,d,e,f for POINT of S;
reserve S for satisfying_CongruenceSymmetry
              satisfying_CongruenceEquivalenceRelation
              satisfying_CongruenceIdentity
              satisfying_SegmentConstruction
              satisfying_SAS
              TarskiGeometryStruct,
        q,a,b,c,a9,b9,c9,x1,x2 for POINT of S;
reserve S for satisfying_CongruenceIdentity
              satisfying_SegmentConstruction
              satisfying_BetweennessIdentity
              satisfying_Pasch
              TarskiGeometryStruct,
        a,b,c,d for POINT of S;
reserve       S for satisfying_Tarski-model TarskiGeometryStruct,
        a,b,c,d for POINT of S;
reserve         S for satisfying_CongruenceIdentity
                      satisfying_SegmentConstruction
                      satisfying_BetweennessIdentity
                      satisfying_Pasch
                      TarskiGeometryStruct,
        a,b,c,d,e for POINT of S;
reserve       S for satisfying_Tarski-model
                    TarskiGeometryStruct,
      a,b,c,d,p for POINT of S;
reserve                   S for satisfying_Tarski-model TarskiGeometryStruct,
        a,b,c,d,a9,b9,c9,d9 for POINT of S;
reserve S for satisfying_Tarski-model
              TarskiGeometryStruct,
        a,b,c,d,a9,b9,c9,d9,p,q for POINT of S;
reserve                       S for satisfying_Tarski-model
                                    TarskiGeometryStruct,
        a,b,c,d,e,f,a9,b9,c9,d9 for POINT of S;
reserve p for POINT of S;
reserve r for POINT of S;
reserve x,y for POINT of S;
reserve S for non empty satisfying_Tarski-model TarskiGeometryStruct;
reserve p,q,r,s for POINT of S;
reserve S for non empty satisfying_CongruenceIdentity
              satisfying_SegmentConstruction
              satisfying_BetweennessIdentity
              satisfying_Pasch
              TarskiGeometryStruct,
  a,b,p,q for POINT of S;
reserve S for non empty satisfying_Tarski-model TarskiGeometryStruct,
                  A,B for Subset of S,
        a,b,c,p,q,r,s for POINT of S;
reserve S for satisfying_CongruenceIdentity
              satisfying_CongruenceSymmetry
              satisfying_CongruenceEquivalenceRelation
              satisfying_SegmentConstruction
              satisfying_BetweennessIdentity
              satisfying_Pasch
              TarskiGeometryStruct,
        a,b,m for POINT of S;
reserve S for satisfying_CongruenceIdentity
              satisfying_CongruenceSymmetry
              satisfying_CongruenceEquivalenceRelation
              satisfying_SegmentConstruction
              satisfying_BetweennessIdentity
              TarskiGeometryStruct,
        a,b,m for POINT of S;
reserve S for satisfying_CongruenceIdentity
              satisfying_CongruenceSymmetry
              satisfying_CongruenceEquivalenceRelation
              satisfying_SegmentConstruction
              satisfying_SAS
              TarskiGeometryStruct,
        a for POINT of S;
reserve S for satisfying_CongruenceIdentity
              satisfying_CongruenceSymmetry
              satisfying_CongruenceEquivalenceRelation
              satisfying_SegmentConstruction
              satisfying_BetweennessIdentity
              satisfying_SAS
              TarskiGeometryStruct,
  a,p,p9 for POINT of S;
reserve S for satisfying_CongruenceIdentity
              satisfying_CongruenceSymmetry
              satisfying_CongruenceEquivalenceRelation
              satisfying_SegmentConstruction
              satisfying_BetweennessIdentity
              satisfying_SAS
              satisfying_Pasch
              TarskiGeometryStruct,
  a,p,p9 for POINT of S;
reserve S for satisfying_CongruenceIdentity
                satisfying_CongruenceSymmetry
                satisfying_CongruenceEquivalenceRelation
                satisfying_SegmentConstruction
                satisfying_BetweennessIdentity
                satisfying_SAS
                TarskiGeometryStruct,
        a,p for POINT of S;
reserve              S for satisfying_Tarski-model TarskiGeometryStruct,
        a,b,c,d,m,p,p9,q,r,s for POINT of S;
reserve         S for non empty satisfying_Tarski-model TarskiGeometryStruct,
        a,b,c,d,p for POINT of S;
reserve a1,a2,b1,b2,m1,m2 for POINT of S;

theorem Satz7p22part2:
  between a1,c,a2 & between b1,c,b2 & c,a1 equiv c,b1 &
  c,a2 equiv c,b2 & Middle a1,m1,b1 & Middle a2,m2,b2 &
  c,a2 <= c,a1
  implies between m1,c,m2
  proof
    assume that
A1: between a1,c,a2 and
A2: between b1,c,b2 and
A3: c,a1 equiv c,b1 and
A4: c,a2 equiv c,b2 and
A5: Middle a1,m1,b1 and
A6: Middle a2,m2,b2 and
A7: c,a2 <= c,a1;
    per cases;
    suppose
A8:   a1 = c;
      a2 = c
      proof
        consider x be POINT of S such that
A9:     between c,a2,x and
A10:    c,x equiv c,c by A7,A8,Satz5p5;
        c = x by A10,GTARSKI1:def 7;
        hence thesis by A9,GTARSKI1:def 10;
      end;
      then Middle a1,m1,a1 & Middle a2,m2,a2
        by A5,A6,A8,A3,A4,Satz2p2,GTARSKI1:def 7;
      then m1 = a1 & m2 = a2 by GTARSKI1:def 10;
      hence thesis by A8,Satz3p1,Satz3p2;
    end;
    suppose
A11:  a1 <> c;
      set a = reflection(c,a1),
          b = reflection(c,b1),
          m = reflection(c,m1);
      now
        thus c,a2 equiv c,a2 by Satz2p1;
        c,a1 equiv reflection(c,c),reflection(c,a1) by Satz7p13;
        hence c,a1 equiv c,a by Satz7p10;
      end;
      then
A12:  c,a2 <= c,a by A7,Satz5p6;
      per cases;
      suppose
A13:    a2 = c;
        then a2 = b2 by A4,Satz2p2,GTARSKI1:def 7;
        then m2 = a2 by A6,GTARSKI1:def 10;
        hence thesis by A13,Satz3p1;
      end;
      suppose
A14:    a2 <> c;
A15:    between c,a2,a
        proof
          c out a2,a
          proof
            now
              thus c <> a2 by A14;
              thus c <> a
              proof
                assume c = a;
                then reflection(c,a1) = reflection(c,c) by Satz7p10;
                hence contradiction by A11,Satz7p9;
              end;
              thus between c,a2,a or between c,a,a2
              proof
A16:            Middle a1,c,a by DEFR;
                then between a1,a,a2 or between a1,a2,a by A1,A11,Satz5p1;
                hence thesis by A1,A16,Satz3p6p1;
               end;
            end;
            hence thesis;
          end;
          hence thesis by A12,Satz6p13;
        end;
A17:    between c,b2,b
        proof
          per cases;
          suppose c = b2;
            hence thesis by A14,A4,GTARSKI1:def 7;
          end;
          suppose
A18:        c <> b2;
A19:        c,b2 <= c,b1 by A3,A4,A7,Satz5p6;
            c,b1 equiv reflection(c,c),reflection(c,b1) by Satz7p13;
            then c,b1 equiv c,b & c,b2 equiv c,b2 by Satz2p1,Satz7p10; then
A20:        c,b2 <= c,b by A19,Satz5p6;
A21:        b1 <> c by A11,A3,GTARSKI1:def 7;
            c out b2,b
            proof
              now
                thus c <> b2 by A18;
                thus c <> b
                proof
                  assume c = b;
                  then reflection(c,b1) = reflection(c,c) by Satz7p10;
                  hence contradiction by A21,Satz7p9;
                end;
                thus (between c,b2,b or between c,b,b2)
                proof
A22:              Middle b1,c,b by DEFR;
                  then per cases by A2,A21,Satz5p1;
                  suppose between b1,b,b2;
                    hence thesis by A22,Satz3p6p1;
                  end;
                  suppose between b1,b2,b;
                    hence thesis by A2,Satz3p6p1;
                  end;
                end;
              end;
              hence thesis;
            end;
            hence thesis by A20,Satz6p13;
          end;
        end;
        between a,a2,c & between b,b2,c &
        between a,m,b by A5,Satz7p15,A15,Satz3p2,A17;
        then consider q be POINT of S such that
A23:    between m,q,c and
A24:    between a2,q,b2 by Satz3p17;
A25:    between m,c,m1
        proof
          Middle m1,c,m by DEFR;
          hence thesis by Satz3p2;
        end;
        q = m2
        proof
          a,a2,c,m IFS b,b2,c,m
          proof
            now
              thus between a,a2,c by A15,Satz3p2;
              thus between b,b2,c by A17,Satz3p2;
              reflection(c,c),reflection(c,a1) equiv
                reflection(c,c),reflection(c,b1) by A3,Satz7p16;
              then c,reflection(c,a1) equiv reflection(c,c),reflection(c,b1)
                by Satz7p10;
              then c,a equiv c,b by Satz7p10;
              then c,a equiv b,c by Satz2p5;
              hence a,c equiv b,c by Satz2p4;
              c,a2 equiv b2,c by A4,Satz2p5;
              hence a2,c equiv b2,c by Satz2p4;
              m1,a1 equiv b1,m1 by A5,Satz2p5;
              then a1,m1 equiv b1,m1 by Satz2p4;
              hence a,m equiv b,m by Satz7p16;
              thus c,m equiv c,m by Satz2p1;
            end;
            hence thesis;
          end;
          then a2,m equiv b2,m by Satz4p2; then
A26:      a2,m equiv m,b2 by Satz2p5; then
A27:      m,a2 equiv m,b2 by Satz2p4;
          q,a2 equiv q,b2
          proof
            per cases;
            suppose
A28:          m <> c;
              Collinear c,m,q by A23;
              hence thesis by A4,A27,A28,Satz4p17;
            end;
            suppose m = c;
              then q = m by A23,GTARSKI1:def 10;
              hence thesis by A26,Satz2p4;
            end;
          end;
          then Middle a2,q,b2 by A24;
          hence thesis by A6,Satz7p17;
        end;
        then between m2,c,m1 by A25,A23,Satz3p6p1;
        hence thesis by Satz3p2;
      end;
    end;
  end;
