RE: 3-D to 2-D slice revisited

*To*: mathgroup at smc.vnet.net*Subject*: [mg14237] RE: [mg14198] 3-D to 2-D slice revisited*From*: "Ersek, Ted R" <ErsekTR at navair.navy.mil>*Date*: Mon, 12 Oct 1998 13:51:23 -0400*Sender*: owner-wri-mathgroup at wolfram.com

Michael Mihalik wrote: ________________________ I posted a message on here a week or so ago, about taking a slice of a 3-D graph, and then taking only one slice of it and looking at it in 2-D. <..NDSolve example snipped..> I want to take the graph generated from the above partial differential equation and view the y-z slice at x = 1. _________________________ I think this will solve your problem. In[1]:= soln=NDSolve[{ D[y[x,t],t]== D[y[x,t],x,x]*0.01-D[y[x,t],t], y[x,0]==If[x>0,0,1], y[0,t]==1,Derivative[1,0][y][1,t]==0} , y, {x,0,1}, {t,0,2}]; In[2]:= Clear[t]; ys[t_]=y[x,t]/.soln/.x->1; In[3]:= Plot[ys[t],{t,0,1.1}]; (* Graphics not shown. *) Note: When you use 't_' on the left side of '=' any global values for 't' will get in the way. So I Clear[t] first. Actually I think your use of NDSolve would fail if 't' had a global vale, so the point is probably mute. I just like to be careful about using patterns on the left side of '='. Instead you could use ys[t_]:=..... in which case it doesn't matter if 't' has a global value. However ys[t_]:=.... is less efficient. Cheers, Ted Ersek