MathGroup Archive 2009

[Date Index] [Thread Index] [Author Index]

Search the Archive

DAE system


Dear colleagues, can you help me to solve the following system of
differential-algebraic equations, wich describes pendulum swinging:

L = 1; m = 1; Te = 10; g = 9.81;
sol = NDSolve[{m*x''[t] == -x[t]*F[t]/L ,
m*y''[t] == -y[t]*F[t]/L - m*g, (x[t])^2 + (y[t])^2 - L^2 == 0,
x[0] == 0, x'[0] == 1, y[0] == -L, y'[0] == 0, F[0] == 10.81}, {x,
y, F}, {t, 0, Te}];


Thanks


  • Prev by Date: Re: Re: How to find which variable caused the trigger in Manipulate[]
  • Next by Date: Factor
  • Previous by thread: Re: options for VectorPlot in version 7 vs
  • Next by thread: Re: DAE system