hi i need help to solve a equation nolinear, i find the equilibrium points and eigenvals and plot the phase portrait the equation is

dx1/dt=x1+x1x2

dx2/dt=-x2+x2+ x1x2-x1

Well what's the difference between those two?

how would i get maple to ingnore wht is a mathematical singularity and not a physical one, and continue picking up the solution the other side of the point??

see code below;

Hi,

I have a complex quantity in mod-arg form,

psi:= (alpha_0(t) + epsilon*alpha_1(r,t))*exp(I*(phi_0(r,t) + epsilon*phi_1(r,t))/nu),

to which I'm applying an operator

delsq:=x-> d^2/dr^2 x+ 2/r d/dr x .

for example
a:=[1,2,3,4,5]
b:=[5,4,3,2,1,0]
c:=[1,2]

a+b+c
Error adding lists of different length

Is it necessary to create new lists padded with zeros to make it work?

Hi everyone...

I'm a bit stuck trying to rearrange an equation using Maple... I don't know what command I need to put in, and I've tried searching to no avail...

Basically I need to rearrange this equation to get 't':

E.q = m.x / (t^2)

and I want:

t = sqrt (m.x / E.q)

What command should I use please?

Thanks for the help!

mathsgeek

Basically, as part of a project we are to use a triangle, reflect the triangle and make it different colours. However I have come across this procedure and REALLY do not understand what it is doing and was wondering if anyone was able to simplify the section in bold in any way!

If I have an inequality b*(b-4)<-4a

is there a way in Maple to find a and b for which inequality holds?

Hi,
I want to shift  the first two elementsof a list to the end and this is what i've coded i have to run the proc twice. Is there a simpler way of doing this??? for example

L:=[1,2,3,4,5]  => [3,4,5,1,2]

switch2:=proc(N)
local y,li:
li:=N:
for y from 1 to nops(li)-1 do
(li[y],li[y+1]):=(li[y+1],li[y])
od:
li;
end proc:

Is there another simpler way of doing this aswell??

L:=[1,2,3,4,5] => [2,1,4,5,3]

switch:=proc(odd)

Hi everyone,

how do I turn off the black brackets at the beginning of each line in 1-D maple math input? i.e. instead of "[>" only ">" at the beginning of each line?

thanks.

> eqn1 := diff(e(z)^2, z) = ((3/2)*e(z)^2-3*(v[0]*exp(-u*f(z)))^2/(2*(e(z)^2-O*(1+z)^(3*g)))+(1/2)*((g-1)*3)*O*(1+z)^(3*g))/(2*(1+z));
> eqn2 := diff(f(z), z) = sqrt(abs(1-(v[0]*exp(-u*f(z)))^2/(e(z)^2-O*(1+z)^(3*g))^2))/(e(z)*(1+z));
>
> eqn3 := subs(O = .27, g = 1, v[0] = .1, u = 0.5e-2, eqn1);
> eqn4 := subs(O = .27, g = 1, v[0] = .1, u = 0.5e-2, eqn2);
>
> sol1 := dsolve([eqn3, eqn4, f(0) = 1, e(0) = 1], numeric, maxfun = 1000000000);
> plots[odeplot](sol1, [[z, e(z), color = red]], 0 .. 2);

How do I do a translation or a rotation of an equilateral triangle?

I have done the following so far in maple

equitriangle:=[ [0,0], [1,0], [0.5,sqrt(3)/2] ;
D0:=display ( polygon (equitriangle, linestyle=solid, thickness=5, color=COLOR(RGB,0,1,1)), scaling=CONSTRAINED,axes=NONE);
display(D0);

What do I do next to find a translation or rotation?

Thanks.

I have written a loop (for i from 0 to 25 do evalf(eval(eq2, t = i)) end do). This gives me a list of values n(0) = 10 to n(25) = 0.90....

I want to plot these values n(t) against t. Is there a better way to do this than to type the values individually.

Hope that made sence.

Thanks.

Im sure this is very easy but im new to maple and am having some problems.

I've stored a differential equation eq1:= diff(n(t),t) + s*n(t) = 0;

I want for t=0, n(0)=N=10, how do i input that so that dsolve(eq1); will give me the answer n(t)=10e^(-0.1t).

Also once that dsolve is done and saved as eq2 is there a way i can write it so that i can put for example eq2(5); which will give me n for t=5.

Thanks so much.