Hi all,

I need to define a state machine in MapleSim. A Maple procedure would help to solve this issue. How do I include a Maple procedure in my MapleSim model?

I am looking forward to your answers.

Fabian

Is there a way to have interval arithmetics for complex inputs
(maple seems to name that range arithmetics in the help)?

x:=Pi/5;
shake(x);

              INTERVAL(0.628318529462 .. 0.628318531974)

shake(x*I);

    Error, (in evalr/shake) not a real number

Hi all,

I have gone through the help pages in my Maple 12, but cudn't really solve for roots of more than 1 pollynomial equations in parametric form. (I saw roots,parametric pollynomial function etc. & many more but cudnt do it with success).

my equations are coupled like, for example,

axy + bx - c*x*(x+y) = 0,

dxy + ey - f*y*(x+y) = 0,

etc. and I need the roots (x,y...

sorry for posting the same question again. reason: the equation no. (2)

Thank you so very much for your help.

I was to solve, means find y as a function of x, equations like the following

y(x) = 7/8 * x + 1/2 * int (x*t*y(t)^2,t=0..1)

or

Dear guides

I have an equation: "eq := Pi-arcsin(sqrt(2E)/sqrt(1+E))-arcsin(sqrt(2E)/sqrt(2+E))-2*sqrt(2E)=0;

when I use "solve" maple say: "Warning, solutions may have been lost" and get a bad result. How can I ontain a better answer?

thanks.

How could I have information of serial of a hard disk in Maple? Thank you very much!

Hey Guys, 

I have plotted the following graph, its the position of an elementary volume before a supernovae takes place.

x₀=r₀sinθ0cosΦ₀

y0=r₀sinθ₀sinΦ₀

z₀=r₀cosθ₀

Created a mesh of 10 mesh points, divided the ranges  

0<r<1

0<θ<∏

Can somebody show me how to input this into maple please

f_i+1,j := (a_j)(f_i,j-1) + (b_j)(f_i,j) + (c_j)(f_i,j+1)

where 

a_j := [1/2 (r-q) j Delta t - 1/2 sigma^2 j^2 Delta t] 

b_j := [1 + sigma^2 j^2 Delta t + r Delta t] 

c_j := [-1/2 (r-q) j Delta t - 1/2 sigma^2 j^2 Delta t] 

with r:= 0.05, Delta t:= T/N , Delta S:=S/M, T:=0.4, q:=0, K:=1.1, S:=2, M=N:=10

Hey,

suppose I have got two quadratics varying with variable Q1 and two quadratics varying with Q2,

eg. P1=a+b*Q1^2 and P11=c+d*Q1^2

     P2=e+f*Q2^2 and P22=g-h*Q2^2

where a,b,c,d,e,f,g and h are finite constants such that curves P1 and P11 intersect at two values of Q1, one being negative and the other positive. The same is true for curves P2 and P22. Now, I can plot curves P1 and P2 on a 3D plot (x-axis = Q1 and y-axis=Q2 and z-axis=P1=P2...

Dear all,

I have a pair of equations,

-xt[1,1]+a*tanh(xt[1,1])+a[12]*tanh(xt[2,1])=0,-xt[2,1]+a[21]*tanh(xt[1,1])+a*tanh(xt[2,1])=0

and I want to calculate xt[1,1] and xt[2,1];

when i use

solve([-xt[1,1]+a*tanh(xt[1,1])+a[12]*tanh(xt[2,1])=0,-xt[2,1]+a[21]*tanh(xt[1,1])+a*tanh(xt[2,1])=0],[xt[1,1],xt[2,1]]);

warning comes out," Warning, solutions may have been lost", and the solution [0,0] I am looking for is really lost.

I am to solve this differential equation (nonlinear):

C'(t) = G[0]+0.1*sqrt(C(t))-C(t)*n+C[ude]*n

G[0] = 1.7*1.2*83

n = 6

C[ude] = 417

i need to use programming since the DE is nonlinear.

Does anybody have the solution to that?

Thanks in advance.

Best regards,

Marie

how we can convert mathematica5.2 worksheet into maple13 worksheet?

f:=x->x^3:
y[1]:=0.5:
y[3]:=subs(x=y[1],f(x)):
i := 2:
y[i] := y[i-1]-(y[1]-y[2+1])*(1/2):
i:=1:
g[i] := (y[i+1]-y[i+2])*x/(y[i]-y[i+1])+(y[i+2]*y[i]-y[i+1]*y[i+1])/(y[i]-y[i+1]):
g[i] := unapply(g[i], x):
h[i] := unapply(solve(y = g[i](x), x), y):
for i from 2 by 1 to 7 do
g[i]:=(f@h[i-1])(x);
g[i]:=unapply(g[i],x);
y[i+2]:=subs(x=y[i+1],g[i](x));
s:=solve(z=g[i](x),x);
h[i]:=unapply(s[1],z);
end do:

for i from -1 by -1 to -8 do

Is it possible to write a Maple program which prints itself and only itself?

Hey guys I'd be grateful if you can help me plot the following graph. It's the position of an elementary volume before a supernova takes place.

x₀=r₀sinθ₀cosΦ₀

y₀=r₀sinθ₀sinΦ₀

z₀=r₀cosθ₀

create a mesh of 10 mesh points, divide the ranges

0<r<any positive value