MaplePrimes Questions

I need to know how to change file and folder permissions from within maple, using the system commands to launch a cmd.exe window to run a batch file has proven very buggy and freezy in my first consideration of how to to do this, and because we can save files and create folders from the the clicking menu it can only mean it is indeed possible from the command line interface directly

I am sure that this is a common enough problem. I want to show what commands I'm using to make an output in a maple worksheet in a latex document that i can include in a report.

So far I've got the export feature to work:

(here is an example mapleworksheet, texfile and a corresponding LatexProducedPDF),

but i can't see how to get it to include the commands that create the output.

I have a list of relationships between variables, in this example there are three. The third of these requires at least one of the parameters to take a negative value i.e. kh[a1] = -kh[a2] how do I eliminate sets from a list like this that do that?


Sa1 := [{R = R, Rh = R, C[T] = Ch[T]*kh[a1]/k[a2], Ch[T] = Ch[T], k[a1] = kh[a2]*k[a2]/kh[a1], k[a2] = k[a2], k[d1] = k[d1], k[d2] = k[d2], kh[a1] = kh[a1], kh[a2] = kh[a2]}, {R = R, Rh = R, C[T] = C[T], Ch[T] = Ch[T], k[a1] = -(C[T]*k[a2]-Ch[T]*kh[a1]-Ch[T]*kh[a2])/C[T], k[a2] = k[a2], k[d1] = k[d1], k[d2] = k[d1], kh[a1] = kh[a1], kh[a2] = kh[a2]}, {R = R, Rh = Rh, C[T] = C[T], Ch[T] = Ch[T], k[a1] = -k[a2], k[a2] = k[a2], k[d1] = k[d1], k[d2] = k[d1], kh[a1] = -kh[a2], kh[a2] = kh[a2]}]

Hello!

I want to use abstract linear operators between Lie algebras. I have the problem shown in the following short code:

with(LinearAlgebra): with(DifferentialGeometry): with(LieAlgebras):
LAr:=LieAlgebraData([ [e1,e2]=e3],[e1,e2,e3],LA);
DGsetup(LAr);
define(lin,linear);
lin(-e3);
lin(-LieBracket(e1,e2));
lin(LieBracket(e2,e1));

As you see, the minus "-" does not come out of the argument of lin() in the last line. What is going wrong?

Thanks!

-------------------------------------

Later on, I realized that the linear operator has nothing to do with the issue. The problem lies in the fact that the output of "LieBracket(e2,e1)" is "_DG([["vector", LA, []], [[[3], -1]]])" , where the latter "-1" refers to the coeffiecient. For some reason, this coefficient is not handled in the way I would expect. For example, the following two lines:

LieBracket(e2,e1)+LieBracket(e1,e2);
_DG([["vector", LA, []], [[[3], 1]]])+_DG([["vector", LA, []], [[[3], -1]]]);

give both as an output "e3+-e3" instead of "0", while both the lines

LieBracket(e2,e1) + LieBracket(e2,e1);
_DG([["vector", LA, []], [[[3], -1]]])+_DG([["vector", LA, []], [[[3], -1]]]);

give the output "2-e3" (which I interpret as "2(-e3)" ).

I don't understand what I am doing wrong.

I have PDE i trying to solve the equation using series.

pdsolve(diff(u(x, y), x, x)+diff(u(x, y), y, y) = Pi, series, order = 2);

Give me: "Error, (in DifferentialAlgebra:-RosenfeldGroebner) unexpected occurrence of the non-rational constants {Pi} in the given input" ?

pdsolve(diff(u(x, y), x, x)+diff(u(x, y), y, y) =gamma, series, order = 2);#gamma = 0.5772156649,Gives ERROR ?

If I  change instead of Pi is e or exp(1) works fine.

pdsolve(diff(u(x, y), x, x)+diff(u(x, y), y, y) = exp(1), series, order = 2);#OK.

 

It's a bug, design or  something else ?

 

Goodday sirs, 

            How can I get over these error message123.mw
 

restart

 

 

(int((1/6)*(eta-s)^3*(S*(s*f[i](s)+3*(diff(diff(f[i](s), s), s))+(diff(f[i](s), s))*(diff(diff(f[i](s), s), s))-f[i]*(diff(diff(diff(f[i](s), s), s), s)))+M^2*(diff(diff(f[i](s), s), s))), s = 0 .. eta))/(1+1/y)

(1)

G := (int((eta-s)^3*(S*(s*f[i](s)+3*(diff(f[i](s), `$`(s, 2)))+(diff(f[i](s), s))*(diff(f[i](s), `$`(s, 2)))-f[i]*(diff(f[i](s), `$`(s, 3))))+M^2*(diff(f[i](s), `$`(s, 2))))/factorial(3), s = 0 .. eta))/(1+1/y)

 

f[0] := (1/6)*s+(1/6)*s^3:

for i from 0 to n do f[i+1] := (1/6*(-eta^3+eta))*subs(eta = 1, diff(G, `$`(eta, 2)))-eta*subs(eta = G)+G; f[i+1] := subs(eta = s, f[i+1]) end do

Error, final value in for loop must be numeric or character

 

``


Anyone with useful informations please.

Thanking you in anticipation for a favurabke response

Download 123.mw

 

pde := [diff(u(x, y), x, x)+diff(u(x, y), y, y) = 2*Pi*(2*Pi*y^2-2*Pi*y-1)*exp(Pi*y*(1-y))*sin(Pi*x), u(0, y) = sin(Pi*y), u(1, y) = exp(Pi)*sin(Pi*y), u(x, 2) = exp(-2*Pi)*sin(Pi*x), u(x, 0) = u(x, 1)]pdsolve(pde)

pdsolve(pde)

it does not return any solution and answer, kindly help.

Hi, 

I have a vector field that has positive constants. I don't want to set perminant values for the constants becuase future calculations will be wrong. 

Instead, how can I set a sample set of values for these constants? Thanks

Hi guys. I tried to find Killing Vectors for Taub-NUT metrics but the maple gives an error.  Can someone explain what is wrong?

How can one calculate isogeny of elliptic curves over finite fields in maple ?

Can't seem to get Retrieve from DocumentTools to get any labels from any worksheet.  I just get an error saying unable to retrieve label reference.

with(DocumentTools):

Retrieve("c:/test/test/mw","L1") #sample test file named test.mw in directory test

Here's the same issue (unanswered) way back in 2015 https://www.mapleprimes.com/questions/203811-DocumentTools-Retrieve-Function-Returns

Maybe it's a Windows administrator issue?  Does it work for anyone else?

restart;

u1 := proc (x, y) options operator, arrow; 1-e^(a*x)*cos(2*Pi*y) end proc;
a := -.39323780;
evalf(int(int(u1(x, y)^2, y = -.5 .. 1.5), x = -.5 .. 1.5));
             1             /                  /          5 
  ------------------------ \0.000002034392421 \6.25000 10  
         (5898567/5000000)                                 
  ln(e) e                                                  

     (1966189/1250000)              6        (5898567/5000000)
    e                  + 1.966189 10  ln(e) e                 

                 5\\
     - 6.25000 10 //

I need help me , how can find this integral as simple number?

u1 := proc (x, y) options operator, arrow; 1-e^(a*x)*cos(2*`πy`) end proc;
u2 := proc (x, y) options operator, arrow; a*e^(a*x)*cos2*`πy` end proc;

norm(u2(x, y), 2)/norm(u1(x, y), 2);
Error, invalid input: norm expects its 1st argument, p, to be of type {Matrix, Vector, matrix, polynom, vector}, but received a*e^(a*x)*cos2*`πy`

Hi, I want to define A matrix (shown below) that has some definite products. These products have two arguments e.g. (k=1..N) and (k<>i) but product expects only one argument. What should I do?

I appreciate any help you can provide.

 

Hi,

How to import and manipulate different formulas of  Excel files in maple ?

See example in attachment

Thanks

First 531 532 533 534 535 536 537 Last Page 533 of 2132