So i got rhis
with(plots); low := 1015; high := 1019; j := 0; for i from low to high do proc (X) options operator, arrow; X(t) end proc; proc (Y) options operator, arrow; Y(t) end proc; ode := diff(X(t), t) = evalf(subs(x = X(t), y = Y(t), subs(vvx = VX[i], vvx))), diff(Y(t), t) = evalf(subs(x = X(t), y = Y(t), subs(vvy = VY[i], vvy))); ics := X(0) = Cordx[i+1], Y(0) = Cordy[i+1]; j := j+1; plott[j] := odeplot(ds, [X(t), Y(t)], t = 0 .. 100, numpoints = 1000) end do; display(plott, jj)

Hello, im a current user of Maple 16, i have a problem in finding a minimum of equation ( equation of a external work equating the internal energy dissipation) f= E-W ( im studying a slope stability with limit analysis)

the equation is:

I have a 3dplot of a certain procedure with the color specified by another procedure. 

The standard color range, from red to purple, does not look very good in my application. Is there a way to change the color range to for instance: light green to dark red?

This is a very strange and specific issue I am having with any Windows x86 vm after having installed Maple 17. 

Before installing Maple 17 (and also AFTER installing it, before the reboot), I can open a command window while logged in as the local administrator and successfully issue a command like:

sc config BDESVC start= disabled

After installing AND REBOOTING for Maple 17, if I log in as the local administrator, open...

hi friends i have done with my code but still getting error in summation term. Please help me out. ThanksFractional_(1).mw

quartic_12.mw

Let A be a table. I give following sequence of commands:

>>B:=A;
>>A[x]=34:

Then surprisingly (at least for me) it turns that B has also changed its value for B[x]. Would someone help me understand this? What is it called? How we can stop this behaviour i.e. A and B should behave as independent tables?

regards

What are the main functions of the kernel Male and for which they are responsible?

Dear All,

I would like check with you about the real form of the functions following modified bessel functions.

BesselI(0,i*x) and BesselK(0,i*x), where i is the complex variable. IS there any real form to these functions in either BesselJ and BesselY. 

I come across the BesselJ(0,i*x)  = BesselI(0,x). However, I was not able to find the converse relation.

I have not seen the complex arguments...

solve_assume.mw

dear experts

the above solution violates my assumption phi should be between -1.57 and +1.57. why?

Hi Maple users and experts!

I have some systems of non linear equations. Maple's "solve" is often able to give explicit solutions. However, I'm actually not very interested in the solutions but rather in knowing whether or not a unique solution exists. Is there a way to determine this with maple?

Thanks!

- John

Hellow,

 any one know how to solve the second order differential equation using finite element method (Using Linear shape functions)

Hi,

I'm dealing with an iterated function (logistic map) where f(x)=s*x*(1-x) where the s is a general parameter between 1 and 4 inclusive, and it's fourth return map, or f(f(f(f(x)))) or f^[4](x).

h:x->f(f(f(f(x))))

What I'm trying to do hinges on evaluating this:

solve(h(x)=x,x);

a

DoExist := proc(tau, n)

if rtable_num_elems(tau) >= n then

        return tau[n];

else

        return 0;

end if;

end proc;

g1 := [0, y, x];

g2 := [0, y^2-x-y, 0];

g3 := [x, x+y, 0];

g4 := [y, -y, 0];

g5 := [0, x*y+x/2+y/2, 0];

g6 := [0, x^2-x/4-y/4, 0];

m1 := Basis(g1, tdeg...

> restart; with(plottools);

> U := u(x, t);


> pde := (diff(U, `$`(x, 2)))/(2*x)^2 = (1/1250)*(diff(U, `$`(x, 2)))+(1/9)*sin(0.10e-1*Pi*t)*exp(0.10e-1*Pi*t^2);

ic := u(x, 0) = x^2, (D[2](u))(x, 0) = 1;

bc := (D[1](u))(0, t) = 0, u(1, t) = 1;

> S := pdsolve(pde, {bc, ic}, numeric);
Error, (in pdsolve/numeric/par_hyp) Incorrect number of initial conditions, expected 0, got 2
       ...