Maple 18 Questions and Posts

These are Posts and Questions associated with the product, Maple 18

In this file you will be able to observe and analyze how the exercises and problems of Kinematics and Dynamics are solved using the commands and operators through a very well-structured syntax; Allowing me to save time and use it in interpretation. I hope you can share and spread to break the traditional and unnecessary myths. Only for Engineering and Science. Share if you like.

In Spanish.

Kinematics_using_syntax_in_Maple.mw

Lenin Araujo Castillo

Ambassador of Maple

I am using Maple to model Gaussian Wave Packets and the do loop creates an array of plots. I want to animate these plots to show the movement of the wave packet and was wondering if there is a way to animate the array or perhaps another way to produce the animation. 

I have final project to make a media for learning mathematic using maple. But I'm so confused to make a net of cuboid, anybody can help me? please :D

Please, can someone give me a hand? I can not understand why in the first case the collect command does not work while the second one works correctly. Many thanks for your attention.trasformaziione_equazioni1.mw
 

esp1 := -a^4+a^2*c^2

-a^4+a^2*c^2

(1)

esp2 := collect(esp1, a^2);

This, apparently, does not work properly

-a^4+a^2*c^2

(2)

esp3 := collect(-a^4+a^2*c^2, a^2);

-a^4+a^2*c^2

(3)

esp11 := -a^2*x^2-a^2*y^2+c^2*x^2

-a^2*x^2-a^2*y^2+c^2*x^2

(4)

esp12 := collect(esp11, x^2);

(-a^2+c^2)*x^2-a^2*y^2

(5)

``


 

Download trasformaziione_equazioni1.mw

 

Why Maple18 cannot solve the system p=(w^2+v*w)/(1-2*u-w) & q=u+w & r=w symbolically by using command

solve({p=(w^2+v*w)/(1-2*u-w),q=u+w,r=w},{u,v,w})? It responds with an error message.

Dear all

I have an operator given below in the image. I want expand this operator upto order 5, when there are three independent variables x, y, t(i=1,2,3). The expansion can also be obtained manually, but that is always prone mistake, is the expansion posible using any routine of Differential Geometry package?

Hi,

this forum has helped me a lot since I'm quite new at maple. There are lot of questions about the solution of _Z in roots but I still can't figure it out.

Here my problem:

f(x,y)= x*y - (V^(alpha)*W)/(V-a*x-b*y)^alpha

x>0, y>0, a>0, b>0, alpha>0, V>0, W>0, V-a*x-b*y>0

I need to find the maximum values for x and y. But all the solutions have got _Z.

How can I eliminate _Z? Thanks!

Best regards,

Won

 

Suppose I have an expression like

Is it possible to reverse the divergence expression using homotopy operator to obtain Psi and Phi?

The above divergence expression is possible since Euler operator of the left side is zero.

I am trying to solve system linear partial differential equations using command "pdsolve". I am surprised to see that the solution given by this command is not satisfying the system, instead, an additional constraint is obtained for an arbitrary function, is there something about "pdsolve" I am missing? 


 

with(PDEtools):

DepVars := [f(x, y, t, u)]

[f(x, y, t, u)]

(1)

Sys := {diff(f(x, y, t, u), u, t)-(diff(f(x, y, t, u), x, y)) = 0, diff(f(x, y, t, u), u, u) = 0, diff(f(x, y, t, u), u, y) = 0, diff(f(x, y, t, u), x, u) = 0, diff(f(x, y, t, u), x, x) = 0, diff(f(x, y, t, u), y, y, y) = 0}

{diff(diff(f(x, y, t, u), t), u)-(diff(diff(f(x, y, t, u), x), y)) = 0, diff(diff(diff(f(x, y, t, u), y), y), y) = 0, diff(diff(f(x, y, t, u), u), u) = 0, diff(diff(f(x, y, t, u), u), x) = 0, diff(diff(f(x, y, t, u), u), y) = 0, diff(diff(f(x, y, t, u), x), x) = 0}

(2)

pdsolve(Sys)

{f(x, y, t, u) = (_F3(t)*y+_F4(t))*x+(_F3(t)+_C1)*u+(1/2)*_F7(t)*y^2+_F8(t)*y+_F9(t)}

(3)

f := proc (x, y, t, u) options operator, arrow; (_F3(t)*y+_F4(t))*x+(_F3(t)+_C1)*u+(1/2)*_F7(t)*y^2+_F8(t)*y+_F9(t) end proc

proc (x, y, t, u) options operator, arrow; (_F3(t)*y+_F4(t))*x+(_F3(t)+_C1)*u+(1/2)*_F7(t)*y^2+_F8(t)*y+_F9(t) end proc

(4)

Sys

{0 = 0, diff(_F3(t), t)-_F3(t) = 0}

(5)

``


 

Download pdsolve_command.mw

I can not understand why the following statement works perfectly:
with (plots);
P1: = plot (f (x), x = xmin .. xmax, y = ymin .. ymax, color = "green");
P2: = plot (orddir, x = xmin .. xmax, y = ymin .. ymax, color = "blue");

Plots [display] (plottools [line] ([ascf, ymin], [ascf, 10]), color = red;
Plot ([5, y, y = 0 .. 10]);
P3: = implicit plot (x = ascf, x = xmin .. xmax, y = ymin .. ymax, color = red, linestyle = 3, thickness = 2);
P4: = plot (points, x = xmin .. xmax, y = ymin .. ymax, style = point, symbol = circle, symbolsize = 20, color = "black");
P5: = plot (h, x = xmin .. xmax, y = ymin .. ymax, color = "yellow");
Display ({p1, p2, p3, p4, p5}, axes = normal, scaling = unconstrained, title = "Parallel, vertice, focus, direction and axis of symmetry", gridlines = true);

While in the following
Points: = [F, V, A, B];
with (plots):
P1: = plot (f (x), x = xmin .. xmax, y = ymin .. ymax, color = "green");
P2: = plot (yd, x = xmin .. xmax, y = ymin .. ymax, color = "blue");
P3: = implicitplot (x = xv, x = xmin .. xmax, y = ymin .. ymax, color = red, linestyle = 3, thickness = 2);
P4: = plot (points, x = xmin .. xmax, y = ymin .. ymax, style = point, symbol = circle, symbolsize = 20, color = "black");

Do (% Plot0 = display ({p1, p2, p3, p4}, axes = normal, scaling = unconstrained, title = "Parallel, vertices, focus, direction and axis of symmetry", gridlines = true));

P4 does not print anything. In thanking you for the kind attention, I cordially greet you. Carmine Marotta ..

This worksheet is designed to develop engineering exercises with Maple applications. You should know the theory before using these applications. It is designed to solve problems faster. I hope you use something that is fully developed with embedded components.

In Spanish

Vector_Force.mw

Vector_Force_updated.mw

Lenin Araujo Castillo

Ambassador Of Maple

 

 

Hello all,

So far I have been unable to find this question anywhere, but I apologize if it is a duplicate. I'm trying to evaluate the integral of sechq(x), where q is a positive integer. Mathematica is able to tell me the result (a hypergeometric function), but for some reason, Maple seems not to be able to compute this integral, it just gives me back the integral. A higher info-level on the 'int' function reveals a line that says 'Risch d.e. has no solution', but I'm not sure if that has anything to do with my problem. Any suggestions or tips on how to get an answer out of Maple would be greatly appreciated!

Hello!

I am working with the Maple 18.02 version. I just want want to perform a basic polynomial expansion using the command "expand" and it does not respond as it should according to what Maple Programming Help says it would. For example:

Maple Programming Help says:

I get:

.

Also, one sees that this isn't even true, as x(x+2) + 1 = x^2 +2x +1, which is not equal to x^2 + 3x +2.

Moreover, maple tells me it is equal..:

What is going on here? I woul like to get the full expanded form (without factors). Also, this is obviously not true, or maybe Maple means something else by x(x+2) +1...

Thank you!

I have a Maple code which generates a matrix, saves it to a .txt file and this is then read in to a C++ program. I have hit a snag with these matrices, in that they are generating absolutely enourmous .txt files. I need to get to a 5000*5000 matrix yet a 200*200 is generating a 100MB file.

The matrix elements contain a lot of algebraic terms which I would like to keep general as these are defined in the C++ code. They also contain hypergeometric functions which in the example below I have left unsimplified (although they are simplified before reaching C++). I have tried various operations/combinations to simplify, but the file sizes still come out very large.

From previous experience expanding the expressions and then simplifying allows Maple to "do more" with it, but it does not seem to work in this instance. I have tried map(options,expr), simplify(expr,options), combine(expr,options), convert (expr,options) etc... The script attached only contains a small example 10*10 matrix on its own without the code which generates it due to the size of the code. What is the best way to simplify these matrices to generate the smallest .txt file?

Large_Matrix.mw

Any help is appreciated.


-Yeti
 

Hello,

To check my arguments in a procedure I need something like

myproc := proc(M :: Matrix(square, rational)

                       , N :: Matrix(shape=triangular[lower, unit], datatype = rational
                       , O :: Matrix(shape = square, dimension = 5

               )

end proc;

How does that work in Maple? What is the correct Syntax? I tried many different things that doesn't fit.

First 35 36 37 38 39 40 41 Last Page 37 of 86