MaplePrimes Questions

I probably worked too hard, but this result seems strange to me:

In a second example (not shown here, but in atttached file) all goes well. It is probably very simple, but at this moment I better go for a walk outside.

best regards,

Harry Garst

mapleprimes.mw

Sorry yes as the title suggests, id like to know how to execute keyboard and mouse pad actions in an automata of sorts.

I have a procedure that uses substitute. Below is my code

my_proc:=proc(func::`+`)
    ... #some calculatin

    subs([x[1] = 2, x[2] = 1], func);

end proc;
func:=5 + x[1]*x[2] + 10*x[1];
my_proc(func);

But when I call the procedure, her body is no substitution. What is the error? I can't understand what I did wrong?

In the help page for invlaplace we find the statement
"If the option opt is set to 'NO_INT', then the program will not resort to integration of the original problem if all other methods fail.  This will increase the speed at which the transform will run."

This statement is found in Maple 2017 and in Maple 8 and I believe in all versions in between.
Can anyone provide an example of a function F(s), where
invlaplace( F(s) ,s, t, NO_INT);
gives a different result (or works faster) than
invlaplace( F(s) ,s, t);
?
## It should be added that an identical statement is made in the help page for laplace itself.

I have alreday gotten the result and want to know how Maple was doing this calculation.

Would you like to tell me the way. Thanks.

 

eq12 := `assuming`([invlaplace(exp(-sqrt(s))*sqrt(s)/((sqrt(s)+a1)*sqrt(s+a2)*(s+a3)), s, t)], [a1 > 0, a2 > 0, a3 > 0])

 

 

Maple 2016 worked fine on July 27.

On July 28 Microsoft insisted on applying a patch to Windows 10 (they called it a "significant upgrade"). After that, Maple 2016 no longer works - it loads, presents the default worksheet, allows you to load a previous worksheet, but as soon as you go to do anything, it quits.

Any suggestions, other than downgrading to the previous version of Windows 10, which I have already done, (and turned off MS windows update services)?

How do you delete a row you added in a piecewise function. I was using 2D math input for the piecewise function and I decided not to have the third row at all. Deleting the content of the last row left a space but never removed the entire empty line. Executing it resulted in an error.

The manual only says how to add a row using CTRL + SHIFT + R, but not how to delete a row.

Any advise?

Converting a mathematical expression into postfix notation (also known as Reverse Polish Notation (RPN)) is a great way to speed up evaluation of arithmetic using a stack.

I was wondering if Maple has any inbuilt functionality to convert a string in infix notation to one in postfix notation? As a simple example:

(A + B * C) / (D + E * F)

Looks like this in RPN:

A B C * + D E F * + /

I cannot find anything with regards to Maple implementations of this. It would save me time to not have to write a RPN calculator in Maple if there is one already floating around somewhere. I would like to use Maple to output strings in RPN which can then be evaluated faster in another language.

 

-Yeti

the Initial value problem is well defined but i could not find solution of the problem. A number of method have been used but all are useless. How to obtained graph of the all equations. Also can we find the value of R (radius) where P is zero.coupled_IVP.mw

We know it's true that the Inverse Laplace Transform of two functions' multiplication is the convolution of every function's Inverse Laplace Transform. I think the case can be upgraded to multiple functions, i.e.

L^(-1)(f[1]*f[2]***f[n])=L^(-1)(f[1])∗L^(-1)(f[2])∗∗∗L^(-1)(f[n])

 

 

Does Maple have build-in function, which when given an expression that depends on x and y, will separate it to a product of two functions, one that depedns on x only and the other that depends on y only?

The input mathematical expression is known to be seperable.

For example, If the input is

((3*y + y^2)*3*x)/(x + sin(x))

Then I'd the Maple function to take the above and return list or set of two parts  {(3*y + y^2)   ,     3*x/(x + sin(x) } (if it can't separate it, it can return null).

The API can be something as  

 f,g = find_product_functions(expression,[x,y])

Something like this is used on determining for example if RHS of first order ODE is separable in order to solve it more easily.  collect() does not really work for this. So Maple allready does this internally in its ODE solver when it checks if ODE is separable or not. But is the function available for users?

 

How can I to build a Spinor with Physics package? I would like to explore a sigma model  from Lagrangian density. The ideia is search the Euler-Lagrange's equation and energy density of this model.  

Hello!
I have a problem with calculations. I have a worksheet and it calculated on some computer but on another i have an error after each equation. I dont have any idea why. When i click on error i see "Sorry, we do not have specific information about your error. " What can i doo with this?

subs.mw

hi...i have a problem with subs rule

please help me.

thanks

eq81a:=m*diff(w(x,t),t$2)+c*diff(w(x,t),t)+E*Is*diff(w(x,t),x$4)+(P-f[p]*cos(Omega*t)-E*A/(2*l)*int(diff(w(x,t),x)^2,x=0..l))*diff(w(x,t),x$2)=0;

m*(diff(diff(w(x, t), t), t))+c*(diff(w(x, t), t))+E*Is*(diff(diff(diff(diff(w(x, t), x), x), x), x))+(P-f[p]*cos(Omega*t)-(1/2)*E*A*(int((diff(w(x, t), x))^2, x = 0 .. l))/l)*(diff(diff(w(x, t), x), x)) = 0

(1)

 

bc81a:=B[1](w(0,t))=0,B[2](w(0,t))=0,B[3](w(l,t))=0,B[4](w(l,t))=0;

B[1](w(0, t)) = 0, B[2](w(0, t)) = 0, B[3](w(l, t)) = 0, B[4](w(l, t)) = 0

(2)

 

 

nondimRule1:=w(x,t)=l*w[n](x/l,t/T);

w(x, t) = l*w[n](x/l, t/T)

(3)

nondimRule2:=x=l*x[n],t=T*t[n],Omega=Omega[n]/T,P=P[n]*E*Is/l^2,f[p]=f[n]*E*Is/l^2,c=c[n]*sqrt(E*Is*m)/l^2,A=2*alpha*Is/l^2;

x = l*x[n], t = T*t[n], Omega = Omega[n]/T, P = P[n]*E*Is/l^2, f[p] = f[n]*E*Is/l^2, c = c[n]*(E*Is*m)^(1/2)/l^2, A = 2*alpha*Is/l^2

(4)

intRule1:=Int(D[1](w[n])(x[n],t[n])^2,l*x[n]=0..l)=l*int(D[1](w[n])(x[n],t[n])^2,x[n]=0..1);

Int((D[1](w[n]))(x[n], t[n])^2, l*x[n] = 0 .. l) = l*(int((D[1](w[n]))(x[n], t[n])^2, x[n] = 0 .. 1))

(5)

dropnRule:=w[n]=w,x[n]=x,t[n]=t,c[n]=c,P[n]=P,f[n]=f,Omega[n]=Omega;

w[n] = w, x[n] = x, t[n] = t, c[n] = c, P[n] = P, f[n] = f, Omega[n] = Omega

(6)

 

eq81b:=convert(expand(l^3/(E*Is)*subs(int=Int,nondimRule2,intRule1,dropnRule,value(subs(nondimRule1,eq81a)))),diff);

Error, invalid input: diff received T*t, which is not valid for its 2nd argument

 

 

``

TRule;=solve(coeff(lhs(eq81b),diff(w(x,t),t$2))=1,{T})[1];

TRule

 

Error, `=` unexpected

 

``


 

Download subs.mw

 

 

One of the things I like in Maple is that I can return a local symbol from a proc() in some expression and it will not "conflict" with same symbol in the global space and will show the same.

I just do not know how Maple manages to do this.

For example:

foo:=proc(n)
   local x;
   x^n;
end proc;

And now if I do

x:=99;
foo(3);

Will return  x^3. This is even thought I had defined x:=99; before the call.

So there is one global `x` with value 99 and the `x` in the expression returned `x^3` did not get confused with the global `x`. Yet they look the same.

How does Maple manages to do this? In Mathematica, it always return local symbols with $nnn assigned to them to distinguish them from global symbols. (attaches the Module ID). For example, in Mathematica the same example above gives

Notice that the `x` returned from a proc() look different from inside the Module. It is not the same as the x in the global space.

Maple seems to be able to do the same thing, but using the same looking symbol. So it must be keeping track of things internally? It must know that the x in x^3 is not the same x in the x:=99 ofcourse.

Any idea how Maple does this?

 

First 949 950 951 952 953 954 955 Last Page 951 of 2429