RE: How to solve this system of equations in Mathematica

*To*: mathgroup at smc.vnet.net*Subject*: [mg70392] RE: [mg70350] How to solve this system of equations in Mathematica*From*: "David Park" <djmp at earthlink.net>*Date*: Sun, 15 Oct 2006 00:19:04 -0400 (EDT)

Raj, Could you present your equations again as a List of equations. eqns = {eqn1, eqn2,...} It is not clear what your equations are from your posting. David Park djmp at earthlink.net http://home.earthlink.net/~djmp/ From: Raj [mailto:rajanikanth at gmail.com] To: mathgroup at smc.vnet.net Hi! Could somebody tell me how to solve(numerically) this system of equations in Mathematica for Di and De 0.135 == -0.34 Erf[0.0620537/Sqrt[De]]+0.34 Erfc[0.0340564/Sqrt[Di]]-0.34 Erfc[0.0368221/Sqrt[Di]] 0.0132 == -0.34 Erf[0.119209/Sqrt[De]]+0.34 Erfc[0.0654242/Sqrt[Di]]-0.34 Erfc[0.0707372/Sqrt[Di]] I have tried using FindRoot, NSolve and Reduce but couldnt get a solution which satisfies both equations. Thanks, Raj