TNB 2

f(x) = ℯ^(x)
g(x) = (ℯ^(x) * sin(x))
h(x) = (ℯ^(x) * cos(x))
a = CurveCartesian(f(t), g(t), h(t), t, (-4 * pi), 10)
v = -5 (slider from -5 to 1.5)
A: a(v)
u = Vector(a(v), a(v) + UnitVector[a'(v)])
d(x) = sqrt((f'(x))^(2) + (g'(x))^(2) + (h'(x))^(2))
b = CurveCartesian(f'(t) / d(t), g'(t) / d(t), h'(t) / d(t), t, 0, (2 * pi))
w = Vector(a(v), a(v) + UnitVector[b'(v)])
c = Surface(x(A) + (t1 * x(u)) + (t2 * x(w)), y(A) + (t1 * y(u)) + (t2 * y(w)), z(A) + (t1 * z(u)) + (t2 * z(w)), t1, 0, 1, t2, 0, 1)
e = Vector(a(v), a(v) + u ⊗ w)