0.18926 m

Ton

Off

t =

L =

k =

Ton

Tönendes Glas

Version Stand
15.03.2020
Andreas Jäger

Stand

fh: 0.05
c = 333.1 (slider from -5 to 500, step 1)
l0 = 0.20038 (slider from 0.1 to 0.6, step 1.0E-5)
t = 0 (slider from 0 to 5, step 0.001)
v = 0.099 (slider from 0.01 to 0.1, step 1.0E-4)
l = Min(l0, (v * t))
k = 0 (slider from 0 to 10, step 1)
f: (((2 * k) + 1) * c / ((4 * (l0 - l))))
la: c / f
L0: (0, l0)
b = 0.05 (slider from -5 to 5, step 1)
L, fl_1, fl_2, fl_3, fl_4 = Polygon(((-b), 0), (b, 0), (b, l), ((-b), l))
h = Line((0, 0), (1, 1))
g(x) = If[l ≤ x ≤ l0, (fh * sin(((2 * π) * (x - l) / la)))]
g_1 = Mirror(g, h)
v1, i, j, m, n = Polygon(((-b), 0), (b, 0), (b, l0), ((-b), l0))
ls = -1.93 (slider from -3 to 3, step 0.01)
Eingabefeld1 = Textfield(t)
Eingabefeld2 = Textfield(l0)
Eingabefeld3 = Textfield(k)
Text1: "c= " + (LaTeX[c]) + "\ {m\over s}\cr
\ell=" + (LaTeX[l0]) + "\ m \cr
λ_{" + (LaTeX[k]) + "} = " + (LaTeX[la]) + "\ cm\cr
\nu_{" + (LaTeX[k]) + "} = " + (LaTeX[f]) + "\ Hz"
a = false