theorem Th2: :: FDIFF_6:2

for x, a being Real st a > 0 holds
exp_R . (- (x * (log (number_e,a)))) = a #R (- x)