Dem nichts mehr hinzuzufügen habend,

Yukterez hat geschrieben:http://www.mahag.com/neufor/viewtopic.php?p=92117#p92117
Dem nichts mehr hinzuzufügen habend,
Kurt hat geschrieben:Also Leute, ist das nun endgültig klar das uns hier eine Märchenwelt aufgetischt werden soll

Kurt hat geschrieben:vertreten und dargereicht von Leuten die nichtmal die Resonanzlänge eines ganz gewöhnlichen Lasers richtig berechnen können

Kurt hat geschrieben:Also in der freien Wirtschaft dürfte da wohl kein Platz dafür sein, wer also finanziert das ganze Märchenland?


Yukterez hat geschrieben:In meiner Animation loopt es bis man das Fenster schließt ewig und nahtlos weiter ohne dass irgendwas erlischt.

Harald Maurer hat geschrieben:Tja, ganz nett - aber was da loopt, ist eine resultierende Welle (grün), die sich gegenüber dem Beobachter mit c bewegt (ebenso wie die blaue).

Ernst hat geschrieben:Allerdings kann damit kein Laser aus der Sicht S' funktionieren. Oder?
fb557ec2107eb1d6 hat geschrieben:Wenn schon, dann richtig bitte:
Julian Apostata hat geschrieben:Für die Darstellung im Plotter sind nun mal konkrete Werte für A und w nötig.
Harald Maurer hat geschrieben:was da loopt, ist eine resultierende Welle (grün), die sich gegenüber dem Beobachter mit c bewegt (ebenso wie die blaue).
(* Variablen *)
v = c/2;
c = 1;
d1 = Sqrt[(c + v)/(c - v)];
d2 = 1/d1;
γ = 1/Sqrt[1 - v^2/c^2];
T = 2 π;
p4 = Manipulate[Show[
(* Wellen *)
Plot[{
(* B *) Sin[d1 x + c т d1],
(* R *) Sin[d2 x - c т d2],
(* G *) Sin[d1 x + c т d1] + Sin[d2 x - c т d2],
2 Sin[x γ + c т d2],
2 Sin[π + x γ + c т d2]
}, {x, 0, 4 π/γ},
Frame -> True,
PlotRange -> {{0, 4 π/γ}, {-2, 2}},
GridLines -> {{π/γ, 2 π/γ, 3 π/γ}, {}},
PlotStyle -> {Blue, Red, Green, Dashed, Dashed},
FrameTicks -> {{{-1, 0, 1}, None},
{{0, N[π/γ, 6], N[2 π/γ, 6], N[3 π/γ, 6]}, None}}],
(* wandernde Nullstellen *)
Graphics[{PointSize[Large], Cyan, Point[{
{11 π/γ - c^2/v т, 0},
{9 π/γ - c^2/v т, 0},
{7 π/γ - c^2/v т, 0},
{5 π/γ - c^2/v т, 0},
{3 π/γ - c^2/v т, 0},
{π/γ - c^2/v т, 0}
}]}],
(* fixierte Nullstellen *)
Graphics[{PointSize[Large], Magenta, Point[{
{6 π/γ - v т, 0},
{5 π/γ - v т, 0},
{4 π/γ - v т, 0},
{3 π/γ - v т, 0},
{2 π/γ - v т, 0},
{π/γ - v т, 0},
{0 - v т, 0}
}]}]],
{т, 0, 2 T/γ}]
Export["plot4.avi", p4, "FrameRate" -> 200]

Yukterez hat geschrieben:Ernst hat geschrieben:Das ist endlich eine mathematisch exakte Darstellung der Wellenbewegung. Und so werden auch die veränderten Wellenlängen um den Faktor sqrt[(c+-v)/(c-+v] übereinstimmend mit dem relativistischen Dopplereffekt auf einen Blick sichtbar.
Das stand zwar schon ab Seite 16 unübersehbar in der ersten Zeile, aber schön dass du es nun auch endlich verstanden hast.
Ernst hat geschrieben:Allerdings kann damit kein Laser aus der Sicht S' funktionieren. Oder?
Leider doch, wie man unschwer an den Plots ablesen kann.
Yukterez hat geschrieben:Ich habe mal die mit v bewegten Knotenpunkte mit magentafarbigen und die mit 2c wandernden RdG-Nullstellen mit türkisen Punkten markiert (was kein Widerspruch zur RT ist da damit keine Information übertragen wird - diese wird aus der roten und blauen Welle gewonnen). Mit 1c bewegt sich aber nichts außer der blauen und der roten Welle:
julian apostata hat geschrieben:fb557ec2107eb1d6 hat geschrieben:Wenn schon, dann richtig bitte:
Ja schon, du musst aber bedenken, dass das mahagforum keine Uni ist, und wenn man schon Gleichungen bringt, ist es zweckmäßig, sie so einfach wie möglich zu gestalten, also speziell A=1 und w=1 zu setzen. Für die Darstellung im Plotter sind nun mal konkrete Werte für A und w nötig.
Wenn schon, dann richtig bitte:

Mitglieder in diesem Forum: 0 Mitglieder und 21 Gäste