Gelöste Aufgaben/T3BP: Unterschied zwischen den Versionen

Aus numpedia
Zur Navigation springen Zur Suche springen
Keine Bearbeitungszusammenfassung
Keine Bearbeitungszusammenfassung
Zeile 80: Zeile 80:
% compose vectors, unit vectors and distances
% compose vectors, unit vectors and distances
r(1,2,:) = u(2,:)-u(1,:); % this from m[1] to m[2]
r(1,2,:) = u(2,:)-u(1,:); % this from m[1] to m[2]
R(1,2)  = sqrt(sum(r(1,2,:).^2)); % magnitude of vector
  :
e(1,2,:) = r(1,2,:)/R(1,2);        % unit vector length
  :
r(2,1,:) = -r(1,2,:);    % .. and back
  :
e(2,1,:) = -e(1,2,:);
R(2,1)  = R(1,2);
 
r(1,3,:) = u(3,:)-u(1,:); % this from m[1] to m[2]
R(1,3)  = sqrt(sum(r(1,3,:).^2));
e(1,2,:) = r(1,2,:)/R(1,2);        % unit vector length
r(3,1,:) = -r(1,3,:);    % .. and back
e(3,1,:) = -e(1,3,:);
R(3,1)  = R(1,3);
 
r(2,3,:) = u(3,:)-u(2,:); % this from m[1] to m[2]
R(2,3)  = sqrt(sum(r(2,3,:).^2));
e(2,3,:) = r(2,3,:)/R(2,3);        % unit vector length
r(3,2,:) = -r(2,3,:);    % .. and back
e(3,2,:) = -e(2,3,:);
R(3,2)  = R(2,3);
 
%% accelerations
% mass 1
dydt(9+1:9+3,1)=sys.theta(2)/R(1,2)*e(1,2,:)+sys.theta(3)/R(1,3)*e(1,3,:);
% mass 2
dydt(9+4:9+6,1)=sys.theta(1)/R(2,1)*e(2,1,:)+sys.theta(3)/R(2,3)*e(2,3,:);
% mass 3
% mass 3
dydt(9+7:9+9,1)=sys.theta(1)/R(3,1)*e(3,1,:)+sys.theta(2)/R(3,2)*e(3,2,:);
dydt(9+7:9+9,1)=sys.theta(1)/R(3,1)*e(3,1,:)+sys.theta(2)/R(3,2)*e(3,2,:);

Version vom 2. Oktober 2022, 20:02 Uhr


Aufgabenstellung

Sie untersuchen das „Three-Body-Problem“(vgl. Wikipedia) numerisch. Dabei sollen die Bahnen von drei Körper mit den Punktmassen m1, m2, m3 in Wechselwirkung miteinander berechnet werden.

"Die Drei Sonnen"

Gesucht ist die Lösung des Anfangswertproblems für verschiedene Anfangswerte (Orte und Geschwindigkeiten) und Massen mi der Körper.


Lösung mit Matlab®

Lorem Ipsum ....

tmp

Header

Text


1+1




Declarations

Text


1+1




Equilibrium Conditions

Die Bewegungsgleichungen schreiben wir in Vektorschreibweise für Körper i als

.

Dabei ist z.B. i=1 und =2,3.

Die drei Bewegungsgleichungen in den drei räumlichen Koordinaten ui formulieren wir in dimensionslosen Koordinaten. Dafür brauchen wir drei unabhängige Referenzgrößen, hier wählen wir

Und fehlt noch die Referent-Zeit T, die wir aus

erhalten.

Damit können wir schreiben:

Einsetzen und Kürzen liefert uns dann die dimensionslosen Bewegungsgleichungen

.

function dydt = t3bpdydt(t,y,sys)
% implementation of ode
% params hold system parameters
% get coordinates
for body = 1:3
    u(body,1:3) = transpose(y(3*(body-1)+1:3*body,1));
end

r = zeros(3,3,3);
e = zeros(3,3,3);

% compose vectors, unit vectors and distances
r(1,2,:) = u(2,:)-u(1,:); % this from m[1] to m[2]
   :
   :
   :
% mass 3
dydt(9+7:9+9,1)=sys.theta(1)/R(3,1)*e(3,1,:)+sys.theta(2)/R(3,2)*e(3,2,:);

%% velocities
dydt(1:9,1) = y(10:18,1);

%%
waitbar(t / sys.tEnd);

end




Solving

Text


1+1




Post-Processing

Text

Trajektoren der Körper
Bewegungsgrößen Σ Mi Ii,x
Animation der Bewegung

1+1








Links

  • ...

Literature

  • ...