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