has Mathematica gone bonkers?
- To: mathgroup at smc.vnet.net
- Subject: [mg67604] has Mathematica gone bonkers?
- From: "Chris Chiasson" <chris at chiasson.name>
- Date: Sat, 1 Jul 2006 05:13:43 -0400 (EDT)
- Sender: owner-wri-mathgroup at wolfram.com
Table[Solve[ Equal@@MapThread[ Subtract,{f[X[1],X[2],X[3]], Normal[Series[f[X[1],X[2],X[3]],{X[i],x0,2}]]}/.{{X[i]\[Rule] x0+\[CapitalDelta]x},{X[i]\[Rule]x0-\[CapitalDelta]x}}], ReplacePart[Derivative[0,0,0],1,i][f][ ReplacePart[Unevaluated[Sequence[X[1],X[2],X[3]]],x0,i]]][[1, 1]]/.x0\[Rule]X[i],{i,3}] %/.Rule[der_,dif_]\[RuleDelayed] Rule[der/.Thread[Map[X,Range[3]]\[Rule]{x1_,x2_,x3_}], dif/.Thread[Map[X,Range[3]]\[Rule]{x1,x2,x3}]] why did it place dollar sign scoping constructs in here? -- http://chris.chiasson.name/