logaritmo naturale
Author: Gaetano Speranza

il logaritmo naturale come velocità in x=0 della funzione y=ax

a = 2.709999999999985 (slider from -10 to 20, step 0.01)
pendenzainzero: log(a)
esponenziale(x) = a^(x)
rettatangente(x) = 1 + pendenzainzero x
puntobase: (1, a)
A: (1, rettatangente(1))
a_1 = Line(A, yAxis)
I = (0, 1)
b = Line(I, xAxis)
B = Intersect(a_1, b)
c = Segment(I, B)
vettorependenza = Vector(B, A)
C: (a, 0)
logaritmonaturale(x) = log(x)
D: (a, log(a))
u = Vector(C, D)
d = Segment(B, C)
e = Segment(A, D)