Hall equations 15,19,20
fricas
P:=operator('P)
fricas
g:=operator('g)
fricas
U:=operator('U)
fricas
r:=operator('r)
fricas
ℏ:=h
Type: Variable(h)
fricas
eq20:= g(q) = ℏ/2 * 1/P(q)*D(P(q),q)
Type: Equation(Expression(Integer))
fricas
eq19:= U(q) = 1/(2*m)*g(q)^2
Type: Equation(Expression(Integer))
fricas
eq15:= r(q) = -D(U(q),q)
Type: Equation(Expression(Integer))
fricas
eval(eq19,eq20)
Type: Equation(Expression(Integer))
fricas
RHall:=eval(eq15,D(lhs %,q)=D(rhs %,q))
Type: Equation(Expression(Integer))
Gausssian
fricas
PdfNorm(x)==1/2*sqrt(2)*exp(-1/2*x^2)/sqrt(%pi)
Type: Void
fricas
eval(RHall,[P(q)=PdfNorm(q),D(P(q),q)=D(PdfNorm(q),q),D(P(q),[q,q])=D(PdfNorm(q),[q,q])])
fricas
Compiling function PdfNorm with type Variable(q) -> Expression(
Integer)
Type: Equation(Expression(Integer))