The potential is
> V := x -> A*abs(x);
> phi := x -> exp(-b*x^2);
> assume(b>0);
> Kip := int(phi(x)*(-hbar^2/(2*m))*diff(phi(x),x$2), x=-infinity..infinity);
> Vip := int(phi(x)*V(x)*phi(x),x=-infinity..infinity);
> ip := int(phi(x)^2,x=-infinity..infinity);
> Evar := (Kip+Vip)/ip;
To find the best value of b, we minimize the variational energy:
> s1:=solve(diff(Evar,b)=0,b);
> assign(b=s1[1]); > simplify(b);
Now use the hints:
> assume(A>0); assume(hbar>0); assume(m>0);
> simplify(Evar);
The normalization factor is
> simplify(1/sqrt(ip));