WolframAlpha computational knowledge AI
D[Q0*exp(-r/h)*(cosh[z/z0])