In[22]:=
d:=(10^A*Exp[-(t-E)^2/(10^σ)^2/2])/(f/r)^γ
In[26]:=
D[d,A]/d
Out[26]=
log(10)
In[25]:=
FullSimplify[((-E+t)^2*Log[2])/10^(2*σ)+((-E+t)^2*Log[5])/10^(2*σ)]
Out[25]=
-σ
100
2
(-t)
In[28]:=
D[a^(-x),x]
Out[28]=
-log(a)
-x
a
In[31]:=
FullSimplify[-Log[f/r]]
Out[31]=
-log
f
r



