Berechnung der inneren Tangenten

Kreis 1 gegeben durch Mittelpunkt {xM1,yM1} und Radius r1
Kreis 2 gegeben durch Mittelpunkt {xM2,yM2} und Radizs r2
Gesucht werden die Berührungspunkte der inneren Tangenten

Der Punkt {x0,y0} ist der Schnittpunkt der beiden inneren Tangenten

[Graphics:Images/Tangenten_gr_1.gif]

Lösung des Gleichungssystems für dieTangenten die von diesem Schnittpunktpunkt ausgehen am ersten Kreis
Berechnung des Berührungspunktes {x1,y1} Berechnung des Schnittpunktes {x2,y2} dieser Tangente mit der Polaren am Kreis 2.
Die so erhaltenen Lösung kann nur für r1 > 0 und  yM1 != yM2 berechnet werden. Dieses Gleichungssystem hat zwei unabhängige Lösungen.

[Graphics:Images/Tangenten_gr_2.gif]
[Graphics:Images/Tangenten_gr_3.gif]
[Graphics:Images/Tangenten_gr_4.gif]

Ergibt für die erste Tangente  {p1,p2} ={{x1,y1},{x2,y2}} und ür die zweite Tangente  {p1,p2} ={{x1,y1},{x2,y2}} Umgewandelt in die InputForm kann dies per Cut&Paste direkt in das Notebook Federung übernommen werden.

[Graphics:Images/Tangenten_gr_5.gif]
{{{(xM1^3 - 2*xM1^2*xM2 + r1^2*(-xM1 + xM2) + r1*r2*(-xM1 + xM2) + 
     xM1*(xM2^2 + (yM1 - yM2)^2) - Sqrt[r1^2*(yM1 - yM2)^2*(-r1^2 - 2*r1*r2 - r2^2 +
        xM1^2 - 2*xM1*xM2 + xM2^2 + yM1^2 - 2*yM1*yM2 + yM2^2)])/
    (xM1^2 - 2*xM1*xM2 + xM2^2 + (yM1 - yM2)^2),
   (xM2^2*yM1^2 + yM1^4 + xM1^2*yM1*(yM1 - yM2) - r1^2*(yM1 - yM2)^2 -
     r1*r2*(yM1 - yM2)^2 - xM2^2*yM1*yM2 - 3*yM1^3*yM2 + 3*yM1^2*yM2^2 - yM1*yM2^3 -
     xM2*Sqrt[r1^2*(yM1 - yM2)^2*(-r1^2 - 2*r1*r2 - r2^2 + xM1^2 - 2*xM1*xM2 + xM2^2 +
         yM1^2 - 2*yM1*yM2 + yM2^2)] + xM1*(-2*xM2*yM1*(yM1 - yM2) +
       Sqrt[r1^2*(yM1 - yM2)^2*(-r1^2 - 2*r1*r2 - r2^2 + xM1^2 - 2*xM1*xM2 + xM2^2 +
          yM1^2 - 2*yM1*yM2 + yM2^2)]))/((xM1^2 - 2*xM1*xM2 + xM2^2 + (yM1 - yM2)^2)*
     (yM1 - yM2))},
  {(r1^2*r2*(xM1 - xM2) + r1*(r2^2*(xM1 - xM2) + xM2*(xM1^2 - 2*xM1*xM2 + xM2^2 +
         (yM1 - yM2)^2)) + r2*Sqrt[r1^2*(yM1 - yM2)^2*(-r1^2 - 2*r1*r2 - r2^2 + xM1^2 -
         2*xM1*xM2 + xM2^2 + yM1^2 - 2*yM1*yM2 + yM2^2)])/
    (r1*(xM1^2 - 2*xM1*xM2 + xM2^2 + (yM1 - yM2)^2)),
   (r1^2*r2*(yM1 - yM2)^2 + r1*(yM1 - yM2)*(r2^2*(yM1 - yM2) +
       (xM1^2 - 2*xM1*xM2 + xM2^2 + (yM1 - yM2)^2)*yM2) +
     r2*(-xM1 + xM2)*Sqrt[r1^2*(yM1 - yM2)^2*(-r1^2 - 2*r1*r2 - r2^2 + xM1^2 - 2*xM1*xM2 +
         xM2^2 + yM1^2 - 2*yM1*yM2 + yM2^2)])/
    (r1*(xM1^2 - 2*xM1*xM2 + xM2^2 + (yM1 - yM2)^2)*(yM1 - yM2))}},
{{(xM1^3 - 2*xM1^2*xM2 + r1^2*(-xM1 + xM2) + r1*r2*(-xM1 + xM2) +
     xM1*(xM2^2 + (yM1 - yM2)^2) + Sqrt[r1^2*(yM1 - yM2)^2*(-r1^2 - 2*r1*r2 - r2^2 +
        xM1^2 - 2*xM1*xM2 + xM2^2 + yM1^2 - 2*yM1*yM2 + yM2^2)])/
    (xM1^2 - 2*xM1*xM2 + xM2^2 + (yM1 - yM2)^2),
   (xM2^2*yM1^2 + yM1^4 + xM1^2*yM1*(yM1 - yM2) - r1^2*(yM1 - yM2)^2 -
     r1*r2*(yM1 - yM2)^2 - xM2^2*yM1*yM2 - 3*yM1^3*yM2 + 3*yM1^2*yM2^2 - yM1*yM2^3 +
     xM2*Sqrt[r1^2*(yM1 - yM2)^2*(-r1^2 - 2*r1*r2 - r2^2 + xM1^2 - 2*xM1*xM2 + xM2^2 +
         yM1^2 - 2*yM1*yM2 + yM2^2)] - xM1*(2*xM2*yM1*(yM1 - yM2) +
       Sqrt[r1^2*(yM1 - yM2)^2*(-r1^2 - 2*r1*r2 - r2^2 + xM1^2 - 2*xM1*xM2 + xM2^2 +
          yM1^2 - 2*yM1*yM2 + yM2^2)]))/((xM1^2 - 2*xM1*xM2 + xM2^2 + (yM1 - yM2)^2)*
     (yM1 - yM2))},
  {(r1^2*r2*(xM1 - xM2) + r1*(r2^2*(xM1 - xM2) + xM2*(xM1^2 - 2*xM1*xM2 + xM2^2 +
         (yM1 - yM2)^2)) - r2*Sqrt[r1^2*(yM1 - yM2)^2*(-r1^2 - 2*r1*r2 - r2^2 + xM1^2 -
         2*xM1*xM2 + xM2^2 + yM1^2 - 2*yM1*yM2 + yM2^2)])/
    (r1*(xM1^2 - 2*xM1*xM2 + xM2^2 + (yM1 - yM2)^2)),
   (r1^2*r2*(yM1 - yM2)^2 + r1*(yM1 - yM2)*(r2^2*(yM1 - yM2) +
       (xM1^2 - 2*xM1*xM2 + xM2^2 + (yM1 - yM2)^2)*yM2) +
     r2*(xM1 - xM2)*Sqrt[r1^2*(yM1 - yM2)^2*(-r1^2 - 2*r1*r2 - r2^2 + xM1^2 - 2*xM1*xM2 +
         xM2^2 + yM1^2 - 2*yM1*yM2 + yM2^2)])/
    (r1*(xM1^2 - 2*xM1*xM2 + xM2^2 + (yM1 - yM2)^2)*(yM1 - yM2))}}}

Test auf Gültigkeit der Lösung für r2 = 0

[Graphics:Images/Tangenten_gr_6.gif]
[Graphics:Images/Tangenten_gr_7.gif]

Test auf Gültigkeit der Lösung für r1 = 0

[Graphics:Images/Tangenten_gr_8.gif]
[Graphics:Images/Tangenten_gr_9.gif]
[Graphics:Images/Tangenten_gr_10.gif]
[Graphics:Images/Tangenten_gr_11.gif]
[Graphics:Images/Tangenten_gr_12.gif]
[Graphics:Images/Tangenten_gr_13.gif]
[Graphics:Images/Tangenten_gr_14.gif]
[Graphics:Images/Tangenten_gr_15.gif]
[Graphics:Images/Tangenten_gr_16.gif]
[Graphics:Images/Tangenten_gr_17.gif]

Test auf Gültigkeit der Lösung für yM1 = yM2

[Graphics:Images/Tangenten_gr_18.gif]
[Graphics:Images/Tangenten_gr_19.gif]
[Graphics:Images/Tangenten_gr_20.gif]
[Graphics:Images/Tangenten_gr_21.gif]
[Graphics:Images/Tangenten_gr_22.gif]
[Graphics:Images/Tangenten_gr_23.gif]
[Graphics:Images/Tangenten_gr_24.gif]
[Graphics:Images/Tangenten_gr_25.gif]
[Graphics:Images/Tangenten_gr_26.gif]
[Graphics:Images/Tangenten_gr_27.gif]

Berechnung der äußeren Tangenten

Kreis 1 gegeben durch Mittelpunkt {xM1,yM1} und Radius r1
Kreis 2 gegeben durch Mittelpunkt {xM2,yM2} und Radizs r2
Gesucht werden die Berührungspunkte der äußeren Tangenten

Berechnung des  Schnittpunktes  {x0,y0} der Tangenten außerhalb der Kreise, die erzeugte Lösung ist auch für den Fall r1 = r2
gültig.

[Graphics:Images/Tangenten_gr_28.gif]

Lösung des Gleichungssystems für dieTangenten die von diesem Schnittpunktpunkt ausgehen am ersten Kreis
Berechnung des Berührungspunktes {x1,y1} Berechnung des Schnittpunktes {x2,y2} dieser Tangente mit der Polaren am Kreis 2
Dieses Gleichungssystem hat zwei unabhängige Lösungen. Die so erhaltenen Lösung kann nur für r1 > 0 und  yM1 != yM2 berechnet werden.

[Graphics:Images/Tangenten_gr_29.gif]
[Graphics:Images/Tangenten_gr_30.gif]
[Graphics:Images/Tangenten_gr_31.gif]

Ergibt für die erste Tangente  {p1,p2} ={{x1,y1},{x2,y2}} und ür die zweite Tangente  {p1,p2} ={{x1,y1},{x2,y2}} Umgewandelt in die InputForm kann dies per Cut&Paste direkt in das Notebook Federung übernommen werden.

[Graphics:Images/Tangenten_gr_32.gif]
{{{(xM1^3 + r1*r2*(xM1 - xM2) - 2*xM1^2*xM2 + r1^2*(-xM1 + xM2) + 
     xM1*(xM2^2 + (yM1 - yM2)^2) - Sqrt[r1^2*(yM1 - yM2)^2*(-r1^2 + 2*r1*r2 - r2^2 +
        xM1^2 - 2*xM1*xM2 + xM2^2 + yM1^2 - 2*yM1*yM2 + yM2^2)])/
    (xM1^2 - 2*xM1*xM2 + xM2^2 + (yM1 - yM2)^2),
   (xM2^2*yM1^2 + yM1^4 + xM1^2*yM1*(yM1 - yM2) - r1^2*(yM1 - yM2)^2 +
     r1*r2*(yM1 - yM2)^2 - xM2^2*yM1*yM2 - 3*yM1^3*yM2 + 3*yM1^2*yM2^2 - yM1*yM2^3 -
     xM2*Sqrt[r1^2*(yM1 - yM2)^2*(-r1^2 + 2*r1*r2 - r2^2 + xM1^2 - 2*xM1*xM2 + xM2^2 +
         yM1^2 - 2*yM1*yM2 + yM2^2)] + xM1*(-2*xM2*yM1*(yM1 - yM2) +
       Sqrt[r1^2*(yM1 - yM2)^2*(-r1^2 + 2*r1*r2 - r2^2 + xM1^2 - 2*xM1*xM2 + xM2^2 +
          yM1^2 - 2*yM1*yM2 + yM2^2)]))/((xM1^2 - 2*xM1*xM2 + xM2^2 + (yM1 - yM2)^2)*
     (yM1 - yM2))},
  {(r1^2*r2*(-xM1 + xM2) + r1*(r2^2*(xM1 - xM2) + xM2*(xM1^2 - 2*xM1*xM2 + xM2^2 +
         (yM1 - yM2)^2)) - r2*Sqrt[r1^2*(yM1 - yM2)^2*(-r1^2 + 2*r1*r2 - r2^2 + xM1^2 -
         2*xM1*xM2 + xM2^2 + yM1^2 - 2*yM1*yM2 + yM2^2)])/
    (r1*(xM1^2 - 2*xM1*xM2 + xM2^2 + (yM1 - yM2)^2)),
   (-(r1^2*r2*(yM1 - yM2)^2) + r1*(yM1 - yM2)*(r2^2*(yM1 - yM2) +
       (xM1^2 - 2*xM1*xM2 + xM2^2 + (yM1 - yM2)^2)*yM2) +
     r2*(xM1 - xM2)*Sqrt[r1^2*(yM1 - yM2)^2*(-r1^2 + 2*r1*r2 - r2^2 + xM1^2 - 2*xM1*xM2 +
         xM2^2 + yM1^2 - 2*yM1*yM2 + yM2^2)])/
    (r1*(xM1^2 - 2*xM1*xM2 + xM2^2 + (yM1 - yM2)^2)*(yM1 - yM2))}},
{{(xM1^3 + r1*r2*(xM1 - xM2) - 2*xM1^2*xM2 + r1^2*(-xM1 + xM2) +
     xM1*(xM2^2 + (yM1 - yM2)^2) + Sqrt[r1^2*(yM1 - yM2)^2*(-r1^2 + 2*r1*r2 - r2^2 +
        xM1^2 - 2*xM1*xM2 + xM2^2 + yM1^2 - 2*yM1*yM2 + yM2^2)])/
    (xM1^2 - 2*xM1*xM2 + xM2^2 + (yM1 - yM2)^2),
   (xM2^2*yM1^2 + yM1^4 + xM1^2*yM1*(yM1 - yM2) - r1^2*(yM1 - yM2)^2 +
     r1*r2*(yM1 - yM2)^2 - xM2^2*yM1*yM2 - 3*yM1^3*yM2 + 3*yM1^2*yM2^2 - yM1*yM2^3 +
     xM2*Sqrt[r1^2*(yM1 - yM2)^2*(-r1^2 + 2*r1*r2 - r2^2 + xM1^2 - 2*xM1*xM2 + xM2^2 +
         yM1^2 - 2*yM1*yM2 + yM2^2)] - xM1*(2*xM2*yM1*(yM1 - yM2) +
       Sqrt[r1^2*(yM1 - yM2)^2*(-r1^2 + 2*r1*r2 - r2^2 + xM1^2 - 2*xM1*xM2 + xM2^2 +
          yM1^2 - 2*yM1*yM2 + yM2^2)]))/((xM1^2 - 2*xM1*xM2 + xM2^2 + (yM1 - yM2)^2)*
     (yM1 - yM2))},
  {(r1^2*r2*(-xM1 + xM2) + r1*(r2^2*(xM1 - xM2) + xM2*(xM1^2 - 2*xM1*xM2 + xM2^2 +
         (yM1 - yM2)^2)) + r2*Sqrt[r1^2*(yM1 - yM2)^2*(-r1^2 + 2*r1*r2 - r2^2 + xM1^2 -
         2*xM1*xM2 + xM2^2 + yM1^2 - 2*yM1*yM2 + yM2^2)])/
    (r1*(xM1^2 - 2*xM1*xM2 + xM2^2 + (yM1 - yM2)^2)),
   (-(r1^2*r2*(yM1 - yM2)^2) + r1*(yM1 - yM2)*(r2^2*(yM1 - yM2) +
       (xM1^2 - 2*xM1*xM2 + xM2^2 + (yM1 - yM2)^2)*yM2) +
     r2*(-xM1 + xM2)*Sqrt[r1^2*(yM1 - yM2)^2*(-r1^2 + 2*r1*r2 - r2^2 + xM1^2 - 2*xM1*xM2 +
         xM2^2 + yM1^2 - 2*yM1*yM2 + yM2^2)])/
    (r1*(xM1^2 - 2*xM1*xM2 + xM2^2 + (yM1 - yM2)^2)*(yM1 - yM2))}}}

Test auf Gültigkeit der Lösung für r1 = r2

[Graphics:Images/Tangenten_gr_33.gif]
[Graphics:Images/Tangenten_gr_34.gif]

Test auf Paralletität der Tangenten für r1 = r2

[Graphics:Images/Tangenten_gr_35.gif]
[Graphics:Images/Tangenten_gr_36.gif]

Test auf Gültigkeit der Lösung für r2 = 0

[Graphics:Images/Tangenten_gr_37.gif]
[Graphics:Images/Tangenten_gr_38.gif]

Test auf Gültigkeit der Lösung für r1 = 0

[Graphics:Images/Tangenten_gr_39.gif]
[Graphics:Images/Tangenten_gr_40.gif]
[Graphics:Images/Tangenten_gr_41.gif]
[Graphics:Images/Tangenten_gr_42.gif]
[Graphics:Images/Tangenten_gr_43.gif]
[Graphics:Images/Tangenten_gr_44.gif]
[Graphics:Images/Tangenten_gr_45.gif]
[Graphics:Images/Tangenten_gr_46.gif]
[Graphics:Images/Tangenten_gr_47.gif]
[Graphics:Images/Tangenten_gr_48.gif]

Test auf Gültigkeit der Lösung für yM1 = yM2

[Graphics:Images/Tangenten_gr_49.gif]
[Graphics:Images/Tangenten_gr_50.gif]
[Graphics:Images/Tangenten_gr_51.gif]
[Graphics:Images/Tangenten_gr_52.gif]
[Graphics:Images/Tangenten_gr_53.gif]
[Graphics:Images/Tangenten_gr_54.gif]
[Graphics:Images/Tangenten_gr_55.gif]
[Graphics:Images/Tangenten_gr_56.gif]
[Graphics:Images/Tangenten_gr_57.gif]
[Graphics:Images/Tangenten_gr_58.gif]


Converted by Mathematica      December 26, 2001