+/-

+/-

Zeitlupe

Überlagerung durch Addition

Grün plus Rot

Rot plus Grün

pm2 = true
Breite_2 = 6 (slider from 1 to 6, step 1)
Höhe_2 = 4 (slider from 0 to 5, step 0.5)
verschiebung = 20
c = 1
t = -15 (slider from tmin to tmax, step 0.01)
x2: ((-c) * t)
pm1 = true
Höhe_1 = 2 (slider from 0 to 5, step 0.5)
Breite_1 = 1 (slider from 1 to 6, step 1)
x1: (c * t)
f1(x) = (((2 * (pm1 - 0.5)) * Höhe_1) * ℯ^(((-2 * (x - x1)^(2))) / Breite_1^(2))) + verschiebung
f2(x) = (((2 * (pm2 - 0.5)) * Höhe_2) * ℯ^(((-2 * (x - x2)^(2))) / Breite_2^(2))) + verschiebung
f(x) = f1(x) + f2(x) - verschiebung
lupe = false
vanimation = 1 (slider from -5 to 5, step 0.1)
vlupe = 0.1
tmin = -15
dx = 0.5
xmin = -30
xmax: (-xmin)
wasserUnendlich = Integral(f, xmin, xmax)
Pf = Sequence((i, f(i)), i, xmin, xmax, dx)
vf1 = Sequence(Vector[(i, verschiebung), (i, f1(i))], i, xmin, xmax, dx)
vf2 = Sequence(Vector[(i, verschiebung), (i, f2(i))], i, xmin, xmax, dx)
vf1f = Sequence(Vector[(i, f1(i)), (i, f(i))], i, xmin, xmax, dx)
vf2f = Sequence(Vector[(i, f2(i)), (i, f(i))], i, xmin, xmax, dx)
ü = false
tmax: (-2 * tmin)
y1: ((2 * (pm1 - 0.5)) * Höhe_1)
y2: ((2 * (pm2 - 0.5)) * Höhe_2)
TextHöhe2: "Höhe_2 = " + (LaTeX[y2]) + ""
TextBreite1: "Breite_1=" + Breite_1 + ""
TextBreite2: "Breite_2=" + Breite_2 + ""
TextHöhe1: "Höhe_1=" + y1 + ""
gruenrot = 1 (slider from 0 to 1, step 1)