\text{pituus = } ℯ^{\frac{1}{2}x}

a

a

T536

f: y = ℯ^((1 / 2 * x))
A = (3.5, 3)
B = (3.5, 1)
C = (4.5, 1)
k1, c, a, b = Polygon(A, B, C)
D = Point(f)
E: (x(D), 0)
g = Segment(D, E)
teksti5 = LaTeX(f, true, true)
F = (4.160301548828237, 2.326168072493083)
G = (0.6949052705749067, 0.6582243049041128)
u = Vector(F, G)
α = Angle(C, B, A)
p = 0.55 (slider from 0 to 1, step 0.05)
H: (p, 0, 0)
H_1: (x(H), f(H), 0)
H_2: (x(H), (1 / 2 * y(H_1)), (1 / 2 * sqrt(ℯ^(p))))
k2, h_2, h, h_1 = Polygon(H, H_1, H_2)
teksti6 = LaTeX(f, true, true)
β = Angle(H_1, H_2, H, xOyPlane)
huippuviiva = CurveCartesian(t, (1 / 2 * f(t)), sqrt(ℯ^(t) / 4), t, 0, 1)
d = Surface(t, ((s * 1 / 2) * ℯ^((1 / 2 * t))), (s * sqrt((1 / 4 * ℯ^(t)))), t, 0, 1, s, 0, 1)
e = Surface(t, (((1 - s) * 1 / 2) * ℯ^((1 / 2 * t))) + (1 / 2 * ℯ^((1 / 2 * t))), (s * sqrt((1 / 4 * ℯ^(t)))), t, 0, 1, s, 0, 1)
d_1 = Surface(0, 1 / 2 + (s * (1 / 2 - t)), t, t, 0, 1 / 2, s, -1, 1)
d_2 = Surface(1, (1 / 2 * ℯ^(1 / 2)) + (s * (sqrt(ℯ) / 2 - t)), t, t, 0, sqrt((1 / 4 * ℯ^(1))), s, -1, 1)