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