| Author |
Comment/Response |
Bill Simpson
|
09/07/12 10:16pm
If you match
Derivative[0, 1][h1][x, t]
instead of
SuperscriptBox[h1, TagBox[(a1_,a2\__),Derivative]][x,t]]
or whatever the desktop published version is
then it looks like your pattern matching comes much closer to what you describe that you want.
In[6]:= temp5 = temp4/.{Derivative[0,1][h1][x,t]:> ∂\_{x,a1},{t,a2}(Exp[I(k x-ω t)])}
Out[6]= ∂\_{t,a2}(∂\_{x,a1}E^(I(k x-t ω))+c0 SuperscriptBox[h1,TagBox[(1,0),Derivative]][x,t]
URL: , |
|