[Date Index]
[Thread Index]
[Author Index]
Simultaneous equation just give Bus error
*To*: mathgroup at smc.vnet.net
*Subject*: [mg40008] Simultaneous equation just give Bus error
*From*: "AISPHD07" <someone at kellogg.nwu.edu>
*Date*: Fri, 14 Mar 2003 04:47:48 -0500 (EST)
*Organization*: Northwestern University, Evanston, IL, US
*Sender*: owner-wri-mathgroup at wolfram.com
Hi,
I have serious trouble solving a system of 12 equations all of which are
exponential. Does anybody know, what how to deal with them? So far, even
after the job was running for several hours it just gave "Bus error".
Thanks in advance!
Anne.
here is the system of equations, and the Solve-command I used:
Eq1=Exp[-r*Q]*(d[1]-a[1])+b*e[2]*Exp[-r*P]==0,
Eq2=c[1]+d[1]*a[1]-0.5*a[1]*a[1]-0.5*r*s*s*d[1]*d[1]==Q
Eq3=c[2]+d[2]*a[2]+e[2]*a[1]-0.5*a[1]*a[1]-0.5*r*s*s*d[2]*d[2]==P
Eq4=a[2]-d[2]==0
Eq5=-Exp[-r*Q]-b*Exp[-r*P]-t==0
Eq6=-p-b(l[1]*e[2]-m)*Exp[-r*P]*r==0
Eq7=-1+(l[1]*(d[1]-a[1])-m)*Exp[-r*Q]*(-r)==0
Eq8=1-d[1]-(r*l[1]*(d[1]-a[1])*(d[1]-a[1])-m*r*(d[1]-a[1])-l[1])*Exp[-r*Q]==
0
Eq9=p*(1-d[2])+l[2]+(l[1]*b*e[2]-m*b)*Exp[-r*P]*(-r*(d[2]-a[2]))==0
Eq10=-a[1]+(l[1]*(d[1]-a[1])-m)*Exp[-r*Q]*(-r*(a[1]-r*d[1]*s*s))+l[1]*Exp[-r
*Q]==0
Eq11=-p*a[2]-l[2]+(l[1]*b*e[2]-m*b)*Exp[-r*P]*(-r*(a[2]-r*d[2]*s*s))==0
Eq12=-p*a[1]+l[1]*b*(Exp[-r*P]+e[2]*Exp[-r*P]*(-r*(a[1]-r*s*s*e[2])))-m*b*Ex
p[-r*P]*(-r*(a[1]-r*s*s*e[2]))==0
Solve[{Eq1,Eq2,Eq3,Eq4,Eq5,Eq6,Eq7,Eq8,Eq9,Eq10,Eq11,Eq12},{a[1],a[2],d[1],d
[2],c[1],c[2],e[2],l[1],l[2],m,P,Q}]
Prev by Date:
**Re: general solution for element of series**
Next by Date:
**Re: Re: This should evaluate to zero**
Previous by thread:
**RE: RE: How to apply one plot range to another plot?**
Next by thread:
**Re: a question about Hazard Rate - HazardRate.nb (1/1)**
| |