Wurfparabel

[Yukterez]

Kannst jetzt...

Darüber unterhalte ich mich lieber mit Leuten die selber etwas können.

Lass dich nicht von Nebensächlichkeiten ablenken

Haargenau.

Ignorierend,

[JuRo]

Kannst jetzt...

Darüber unterhalte ich mich lieber mit Leuten die selber etwas können.

Lass dich nicht von Nebensächlichkeiten ablenken

Haargenau.

Ignorierend,

Ganz offensichtlich können die so wie du auch nix

Du hast dich ja doch ablenken lassen

Wo ist Formel von ART-Wurfparabel

[JuRo]

Wo ist Formel von ART-Wurfparabel

Auf die Uhr von Dr.Albern schauend

[JuRo]

Hula, wo bleibt Formel

[JuRo]

Hula, kannst Formel zeigen oder klaust wieder von Kindern die Bonbons

Ich kann zwar verstehen, dass das deine Lieblingsbeschäftigung ist, aber niemanden interessiert dein relativistischer Erde-Schwarzes Loch Schrumpfen Schwachsinn


Kommt bald Formel oder kann ich wieder den Schwachsinn deines Sektenführers weiterlesen

[Yukterez]

lololol 1

lololol 2

lololol 3

lololol 4

Nettes Selbstgespräch.

Weiter gehend,

[JuRo]

Ich bin nur ein nützlicher xxx meines Sektenführers Dr. Albern

Genau

Das wissen wir doch schon lange

Wo ist die Formel, Hula

[Yukterez]

sabber-lollie.png (2.21 KiB) 7100-mal betrachtet

Danke dass du mich daran erinnerst dass dein Zwilling schon wieder eine ganze Seite vollgespammt hat. Damit sich niemand durch euren Müll blättern muss um etwas zum Thema zu lesen zurück zum Anfang:

Nachdem die kritische Elite schon seit Monaten keine Wurfparabel liefern kann bleibt es mal wieder an den Relativisten hängen.

Wir nehmen also eine Erde und komprimieren sie zum schwarzen Loch. Im Abstand von 10 Schwarzschildradien zum Schwerpunkt platzieren wir einen Werfer, der einen Ball mit der neutonischen Orbitalgeschwindigkeit wirft; im 1. Beispiel in einem Winkel von 0°, und im 2. Beispiel mit 45°. Links wird nach Newton geplottet, und rechts mit den selben Startbedingungen die relativistische Wurfparabel nach Einstein. Der innere Kreis repräsentiert den Ereignishorizont der Masse, und der äußere die Schale auf der der Werfer steht.

Beispiel 1 (0°)



Beispiel 2 (45°)



Rechnung

Code: Alles auswählen

(* relativistische Wurfparabel | yukterez.net 2016 | Syntax: Mathematica *)
 
G = 678*^-13; M = 6*^24; c = 3*^8; rs = 2 G M/c^2;
v0 = Sqrt[G M/r0]; vr0 = v0/Sqrt[2]; r0 = 10 rs; vθ0 = v0/r0/Sqrt[2]; θ0 = 0;
T = 7*^-9; step = T/500;

sol =
NDSolve[{
    r''[t] == -((G M)/r[t]^2) + r[t] θ'[t]^2 - (3 G M)/c^2 θ'[t]^2,
    r'[0]  == vr0,
    r[0]   == r0,
    θ''[t] == -((2 r'[t] θ'[t])/r[t]),
    θ'[0]  == vθ0,
    θ[0]   == θ0,
    τ'[t]  == Sqrt[c^2 r[t] + r[t] r'[t]^2 - c^2 rs + r[t]^3 θ'[t]^2 - r[t]^2 rs θ'[t]^2]/(c Sqrt[r[t] - rs] Sqrt[1 - rs/r[t]]),
    τ[0]   == 0
    }, {r, θ, τ}, {t, 0, T + step},
   WorkingPrecision -> 40, MaxSteps -> Infinity];

x[t_] := (Sin[Evaluate[θ[t] /. sol]] Evaluate[r[t] /. sol])[[1]]
y[t_] := (Cos[Evaluate[θ[t] /. sol]] Evaluate[r[t] /. sol])[[1]]

Do[Print[
  Rasterize[Show[
    Graphics[{Circle[{0, 0}, r0], Circle[{0, 0}, rs]}, Frame -> True, ImageSize -> 400, PlotRange -> 14 rs],
    Graphics[{Point[{x[т], y[т]}]}],
    ParametricPlot[{x[t], y[t]}, {t, 0, т}, PlotStyle -> {Opacity[0.3], Gray}],
    ParametricPlot[{x[t], y[t]}, {t, Max[Re[т - 1*^-10], 0], т}, PlotStyle -> {Red}]]]],
   {т, step, T, step}]

Vergleichend,

[JuRo]

Wo ist Formel Hula, Formel von ART-Wurfparabel

PS:
ART ist Schwachsinn, aber du hast sie trotzdem nicht verstanden

[julian apostata]

@Y
Direkt hier im Forum laufen die Animationen recht zäh. Zum Beispiel hat das newtonische Objekt innerhalb des großen Kreises eine geringere Geschwindigkeit als außerhalb davon. Ich wollt dich deswegen schon kritisieren.

Dann hab ich es direkt auf meinen Rechner kopiert und jetzt läuft das Objekt so, wie man es gemäß der Kepler-gleichung erwartet. Mit Quicktime kann ich die Animation auch anhalten.

Aber hat man in Mathematica denn keine Möglichkeit, den Betrachter mehr interaktiv teilhaben zu lassen, wie hier zum Beispiel?

https://www.geogebra.org/m/W8ByVKFX?doneurl=%2Fmaterials

Also Leute was ist jetzt? Den Winkel (und die Geschwindigkeit des Senders) des Sendesignals könnt ihr doch beliebig verstellen. Kann mir denn keiner eine Einstellung zeigen, wo das Photon von Kreismitte hin zum Kreisrand nicht exakt eine Sekunde braucht (in System Blau)?