Re: series expansions in two variables problem
- To: mathgroup at smc.vnet.net
- Subject: [mg39547] Re: [mg39504] series expansions in two variables problem
- From: "Rolf Mertig" <rolf at mertig.com>
- Date: Sat, 22 Feb 2003 03:38:40 -0500 (EST)
- Reply-to: rolf at mertig.com
- Sender: owner-wri-mathgroup at wolfram.com
In[1]:= tay[x_, vars___] := Module[{s, t}, t = x /. (#1 -> s*#1 & ) /@
{vars}; Normal[Series[t, {s, 0, 1}]] /. s -> 1]
In[2]:= tay[A + B*sigma + C*epsilon + D*sigma*epsilon + X epsilon^2,
sigma, epsilon]
Out[2]= A + C epsilon + B sigma
Rolf Mertig
Mertig Consulting
http://www.mertig.com