Of course it's easy to write a procedure to compute the ith Horner polynomial of a polynomial but I'm carious to know if there is any built-in command for doing this, I searched in help of Maple and found several ways but they convert or rewrite the input polynomial in Horner form so the output is last Horner polynomial which is equal to the input polynomial with this difference that it is written in a kind of factorization form which shows the Horner structure and ofcourse with looking at it you can read other Horner polynomials too but why not having exactly the ith Horner for the output? So is there any other command with output being the ith Horner?

I want Positive values of Arcsin but maple give to me Negative values of Arcsin?

arcsin(-1);
-pi/2

but I want Positive values of Arcsin Namely:

arcsin(-1)=3 pi/2

For the following Maple 2015 procedure and funtion call

 f := proc(x,y) local a; global b;
    if x < y then
        a := x; b := y + a;
    else
        a := y; b := x + a;
    end if;
    a + b + x + y
end proc:
stopat(f);
                              [f]
f(2, 3);
 

Maple help topic "The Maple Debugger" shows the following example:

 f:
    1*   if x < y then
           ...
         else
           ...
         end if;
 
 DBG> stopwhen b
 [b]
 f:
    1*   if x < y then
           ...
         else
           ...
         end if;
 
 DBG> cont
 b := 5
 f:
    6    a+b+x+y
 
 DBG> showstat
 f := proc(x, y)
 local a;
 global b;
    1*   if x < y then
    2      a := x;
    3      b := y+a
         else
    4      a := y;
    5      b := x+a
         end if;
    6 !  a+b+x+y
 end
 
 DBG> quit
 Warning, computation interrupted

However, when I run the procedure in Maple Notation (1D) the Interactive Maple Debugger pops up with syntax quite different from the example.  How can I turn the Interactive Debugger off and use commands such as DBG> stopwhen b in the command-line version?

Thanks!  Les

hi .how i can clarify expression in maple that in running dont asked me again..

for example attached file

2)how i can deleted one parameter of 
Memory in maple or
Restart it??

Hello, I'm trying to enumerate matrices, each P [j] with j = 1,2,3 ... n-1. , and also can also the value of its elements with P [j] (r, k) for example.
n:=4;

for j from 1 to n-1 do 
P[j]:=Matrix(n); 
for l from 1 to n do
P[j](l,l):=1;  
end do; 
end do;
Error, invalid operator parameter name

Regards.

Hello,

I try to get the first ten fractions of Pi with the commands "seq" and "nthconver".

I tried this:

a:= cfrac(Pi);
CFRAC([3, 7, 15, 1, 292, 1, 1, 1, 2, 1, 3, ...])
sec(nthconver(a,i),i=1..10);

But it doesn't work.

Who can help me?

It took me a while to figure out what was causing this unusual sort result;

I loaded the MTM package because I want to convert numbers to integers for indexing. This sort result seem like it could be a bug.

Download MTMsort.mw

f=2*x*(int(sqrt(1+y^2*(t*x-1)^2/(1-(t*x-1)^2)), t = 0 .. 1))    ,0<x<2,   0<y<1,

I want to Determine the value of f for the various values of x,y For a domain So that x , y Changing with steps 0.1. for example:

Hello Everybody,

I was trying to apply the Newton-Raphon method("Newton" in maple) for the following problem to obtain the constants (c1...cM) without success.

eq[1] := -0.0139687 c[2] - 0.0132951 c[1] = 0
eq[2] := 24806.4 c[2] - 0.0139687 c[1] = 0

If anybody has experience with it or knows how to use it I would really appreciate your help.

Just to introduce the previous steps of calculations leading to the problem:To calculate the critical buckling force N and the shape of a rectangular uniformly loaded plate the governing diff. equation is the following

D11*w''''(x)+(2*D12+4*D66)*w''(x)''(y)+D22*w''''(y)+N*w''(x)=0

For the follwing solution of a boundary value problem(Boundary conditions:clamped-clamped: w(x=0,x=a)=0 & w'(x=0,x=a)=0) I applied the Ritz method:

w:=sum(c[i]*(cos(2*i*Pi*x/a)-1)),i=1..M)

Thus the Potential Energy P is:

P:=16537.6*c[2]^2-0.0139687*c[2]*c[1]+1033,60*c[1]^2-9.86960*N*c[2]^2-2.46740*N*c[1]^2

 deriving P to each constant c and setting them =0 leads to:

eq[1] := -0.0139687 c[2] + 2067.20 c[1] - 4.93480 N c[1] = 0
eq[2] := 33075.2 c[2] - 0.0139687 c[1] - 19.7392 N c[2] = 0

After calculating N=418,902  and feeding eq1 and eq 2,the follwing equations if two terms are considered:

eq[1] := -0.0139687 c[2] - 0.0132951 c[1] = 0
eq[2] := 24806.4 c[2] - 0.0139687 c[1] = 0

Everything I tried resulted in any c1 = c2 = 0 which is not  realistic. Maybe I made a mistake earlier.

Thanks a lot in advance.

Sam

 Plate_Buckling.mw

Hello,

Does anyone know how to find the repeated part of a fraction. I know the command cfrac, but I have

heard there should be another command which give the repeated part of a fraction as a result.

Who can help me?

 3/11+3*sqrt(3) = [5, 2, 7, 1, 1, 6, 1, 627, 1, 6, 1, 1, 7, 2, 9, 1, 12, 16, 1, 10, 1, 4, 3, 1, 1, 2, 1, 14, 2, 3, 10, 9, 1, 1, 139, 5, 5, 3, 2, 3, 6, 1, 1, 1, 9, 1, 2, 1, 6, 1, 2, `...`]

Hi guys,

I can not convert a series with label.

If anyone can confirm this?

Maybe-Bug.mw

Another_way_to_calculate_the_definite_integral.mw

p_tin the file I upload is a complicated expression containing θ and r. Will the accuracy of the result be affected if I use the second method in the file to calculate the definite integral?

Hi guys,

I can not execute any command in worksheet. I even can't set a variable to a number. When I write some lines and hit enter, it does not respond in anyway. Basicly I can't enter anything it doesn't do anything. How cold I solve this?

Dear Maple users

I know how to fit a function with some parameters to some data, but how can it be done if the data is 2-dimensional? I mean: I have some time array T, some X array and some Y array. How do I fit a function with certain parameters to the data: (x(t),y(t)) to fit (X(T), y(T)), ...

Erik

Hi

I've this equation ,what is displacement,

U := sum(C[i]*lambda[i]*h^2*M*(C[13]+C[55])*exp(Z*lambda[i]*M)*cos(M*x)/C[11], i = 1 .. 4);
 But when I used the data ,I do not get the right result

the datas are

h := .25;
M := Pi/L; L := 1;
E[3] := 1; E[1] := 40; E[2] := 1;
1
V[13] := .25; V[31] := .25; V[12] := .25; V[23] := .25; V[32] := .25; V[21] := .25;

G[44] := .2; G[55] := .2; G[66] := .2;

G[13] := .5;

C[55] := G[13];

Omega := -2*V[13]*V[21]*V[32]-V[12]*V[21]-V[13]*V[31]-V[23]*V[32]+1;

C[11] := (-V[23]*V[32]+1)*E[1]/Omega;

C[12] := (V[13]*V[32]+V[12])*E[2]/Omega;


C[33] := (1-V[12]*V[12])*E[3]/Omega;
 

C[1] := -.2596702449; C[2] := -2.411545729; C[3] := -0.6051254981e-1; C[4] := .4085627399;
 

lambda[1] := .6891428810; lambda[2] := -.6891428810; lambda[3] := 9.177422410; lambda[4] := -9.177422410;
 

could you help me plase