Sender

Frequenz in Hz

λ =

m

Empf

Frequenz in Hz
Geschwindigkeit in  m/s
Abstand in   m

Einführung des Modells  -  ZEIGERDARSTELLUNG
Die grün unterlegten Objekte können variiert werden.  
U. Konrad (C) 2010

Abstand = 9.2 (slider from 0 to 12, step 0.1)
A = Intersect(xAxis, yAxis)
Frequenz = 490 (slider from 10 to 1000, step 10)
Geschwindigkeit = 310 (slider from 100 to 600, step 10)
lambda: Geschwindigkeit / Frequenz
g(x) = sin(2 * 3.141592653589793 * x / lambda)
B: (Abstand, 4)
a: Abstand / lambda
p0: 2 * 3.141592653589793 * lambda
2 π Abstand / lambda: 2 * 3.141592653589793 * Abstand * lambda
b = OrthogonalLine(B, xAxis)
C = Intersect(g, b, (9.2, -0.2604501512096294))
p1: 2 * 3.141592653589793 * a * lambda
2 π Abstand lambda: 2 * 3.141592653589793 * a * lambda
pq: p1 / p0
phase: 2 * 3.141592653589793 * Mod[pq * 100, 100] / 100
f = Function(g, 0, Abstand)
Text2: lambda + ""
D = (13.6, 0)
c = Circle(D, 1)
E, F = Intersect(c, xAxis)
F' = Rotate(F, (phase * 180 / 3.141592653589793)°, D)
α = Angle(F, D, F')
u = Vector(D, F')
d = OrthogonalLine(A, b)
e = OrthogonalLine(C, b)
G = (0.3, 4.78)
H = (0.3, 2.56)
Vieleck1, h, i, j, k, I, J = Polygon(G, H, 4)
K = (14.22, 6.36)
L = (14.24, 1.64)
Vieleck2, l, m, n, p, M, N = Polygon(K, L, 4)