Re: General--Differential equation problem..

• To: mathgroup at smc.vnet.net
• Subject: [mg66302] Re: [mg66284] General--Differential equation problem..
• From: Bob Hanlon <hanlonr at cox.net>
• Date: Mon, 8 May 2006 00:46:54 -0400 (EDT)
• Sender: owner-wri-mathgroup at wolfram.com

```Clear[z];
With[{r=2},z=z/.DSolve[{z'[s] == 1/r,z[0]==0},z, s][[1]]];

Clear[x,y];
{x,y}={x,y}/.DSolve[
{x'[s]==Cos[z[s]], y'[s]==Sin[z[s]],x[0]==0,y[0]==0}, {x, y}, s][[1]];

{x[s],y[s],z[s]}

{2*Sin[s/2], -2*(Cos[s/2] - 1), s/2}

With[{r=2},{x'[s] == Cos[z[s]], y'[s] == Sin[z[s]], z'[s] == 1/r}]

{True,True,True}

Table[ParametricPlot[{x[s], y[s]}, {s, 0, smax},
PlotRange->{{-2.1,2.1},{-0.1,4.1}},Frame->True,Axes->False],
{smax,Pi/6,4Pi,Pi/6}];

Bob Hanlon

---- randomtalk at gmail.com wrote:
> hello, i was trying to solve a set of differential equations needed for a school project.. However, i'm completely new to mathematica 5.0, and i have downloaded trial, here is what i inputed into the software:
>
> In[2]:=
> DSolve[{x'[s] == Cos[z], y'[s] == Sin[z], z'[s] == 1/r, r == 2}, {x, y, z}, s]
>
> returns this error: DSolve::dvnoarg: The function z appears with no arguments.
>
> Is there anything wrong with what i inputed? The differential equations came from this website: http://fy.chalmers.se/LISEBERG/eng/loop_pe.html
>
> Link to the forum page for this post:
> http://www.mathematica-users.org/webMathematica/wiki/wiki.jsp?pageName=Special:Forum_ViewTopic&pid=10212#p10212
> Posted through http://www.mathematica-users.org [[postId=10212]]
>
>

```

• Prev by Date: Re: Extract any diagonal from a square matrix...
• Next by Date: Re: Extract any diagonal from a square matrix...
• Previous by thread: Re: General--Differential equation problem..
• Next by thread: Re: General--Differential equation problem..