s = 1 (slider from 0.5 to 3, step 0.5)
m = 0 (slider from -5 to 5, step 1)
a(x) = (1 / sqrt(((2 * π) * s^(2))) * ℯ^((-1 / 2 * ((x - m) / s)^(2))))
f: x = 1
A = Intersect(a, f, (1, 0.24197072451914337))
B = Intersect(a, xAxis, (1.7792064193462243, 1.711593310964634E-18))
C = Intersect(f, xAxis)
g = Segment(A, C)
h: x = -1
D = Intersect(a, h, (-1, 0.24197072451914337))
E = Intersect(a, xAxis, (-1.8167248621083627, 2.903729918897326E-19))
F = Intersect(a, xAxis, (-1.8167248621083627, 2.903729918897326E-19))
G = Intersect(a, xAxis, (-1.8057184394776415, 4.905015783471364E-19))
H = Intersect(h, xAxis)
i = Segment(D, H)
b = Integral(a, m - s, m + s)
c = Integral(a, m - (2 * s), m + (2 * s))
e = Integral(a, -1.96, 1.96)
d = Integral(a, -1, 2)
r = 0.35 (slider from -5 to 5)
v_i = -1 (slider from -5 to 5, step 0.1)
v_f = 2.6 (slider from -5 to 5, step 0.1)
j = Integral(a, v_i, v_f)