AW: Probleme mit NDSolve

[<h.dolhaine@XXXXXXX.de>]

guten abend,

ganz auf die schnelle: es scheint daran zu liegen, dass die Werte von m1, m2
im ersten Argument von NDSolve nicht zugewiesen sind. Nur Fsx1 und folgende
mit /.Werte zu behandeln reicht nicht . 

Also: s = NDSolve[ {....}/.Werte, {x21[t],...},{t,...}]

läuft ohne Fehlermeldung.

beste grüße, h. dolhaine

> -----Ursprüngliche Nachricht-----
> Von: owner-demug@XXXXXXX.ch [mailto:owner-demug@XXXXXXX.ch] Im
> Auftrag von Alexander Knöttner
> Gesendet: Samstag, 15. Januar 2011 17:31
> An: 'Udo und Susanne Krause'; demug@XXXXXXX.ch
> Betreff: Re: Probleme mit NDSolve
> 
> Hallo Udo.
> 
> Tut mir Leid, auf diese Idee hätte ich natürlich kommen können, hätte auch
> ich mir das mühsame einfügen ersparen können.
> 
> Freut mich, dass sich jemand für mein Problem interessiert, Danke!
> 
> Liebe Grüße Alex
> 
> -----Ursprüngliche Nachricht-----
> Von: Udo und Susanne Krause [mailto:su.krause@XXXXXXX.ch]
> Gesendet: Samstag, 15. Jänner 2011 17:23
> An: demug@XXXXXXX.ch; Alexander Knöttner
> Betreff: Re: Probleme mit NDSolve
> 
> Hallo Alexander,
> 
> könnten Sie nicht freundlicherweise das Notebook anhängen (Dateianhang
> auswählen und die entsprechende Notebookdatei auswählen), dann müsste man
> nicht alles abtippen am Sonnabend ...
> 
> Gruss
> Udo.
> 
> On Sat, 15 Jan 2011 15:11:25 +0100, Alexander Knöttner
> <alex.knoettner@XXXXXXX.at> wrote:
> 
> > Werte={m1R2,m2R2,gR9.81,l0R40,dR10000,aR30.21}
> > m=f=d*-2*d*
> > Fsx1=D[f,x21[t]]/.Werte
> > Fsx2=D[f,x22[t]]/.Werte
> > Fsy1=D[f,y21[t]]/.Werte
> > Fsy2=D[f,y22[t]]/.Werte
> >
> s=NDSolve[{x21''[t]==Fsx1/m1,x21[0]==0,x21'[0]Š30,m2*x22''[t]==Fsx2,x22[0]
> ==
> 50/,x22'[0]==0,m1*y21''[t]==-m1*g+Fsy1,y21[0]==0,y21'[0]Š70,m2*y22''[t]==-
> m2
> *g+Fsy2,y22[0]Š50/,y22'[0]==0},{x21[t],x22[t],y21[t],y22[t]},{t,0,10}]/.We
> rt
> e
> >
> ParametricPlot[Evaluate[{{x21[t],y21[t]}/.s,{x22[t],y22[t]}/.s}],{t,0,0.5}
> ]