10.5 Heat Conduction with Chemical Heat Source: Part c
Solving the Dimensionless equations for a simpler version of the problem.
> restart;
> eq:=-(1/B)*D(D(theta))(Z)+D(theta)(Z)=N*theta(Z);
eq. 9.5-24
> s:=dsolve({eq,theta(0)=1,D(theta)(1)=0},theta(Z));
> assign(s);
> T:=unapply(theta(Z),Z);
> B:=8;N:=1.99;
> plot(T(z),z=0...1);
>