Preben Alsholm

MaplePrimes Activity


These are replies submitted by Preben Alsholm

@peace951 Here is the syntax. Notice that intentionally f, a, and b have not been given concrete values. That way you see the method used and the meaning of 'partition'.

restart;
Student:-Calculus1:-ApproximateInt(f(x),x=a..b,method=trapezoid,partition=1);
Student:-Calculus1:-ApproximateInt(f(x),x=a..b,method=midpoint,partition=1);
Student:-Calculus1:-ApproximateInt(f(x),x=a..b,method=simpson,partition=1);
Student:-Calculus1:-ApproximateInt(f(x),x=a..b,method=simpson,partition=2);


 

@AHSAN You won't be able to find a polynomial expression for sigma in terms of lambda, Q and k.
What you have in the RootOf expression, which I called S) is a polynomial of degree 12 in _Z (i.e. sigma).
That polynomial is extracted from S in this code:
 

p:=subs(_Z=sigma,op(1,S));
type(p,polynom(integer,[sigma,lambda,Q,k])); # true
degree(p,sigma); #12
degree~(p,[sigma,lambda,Q,k]); # [12,4,8,8]

So solving for sigma means solving a polynomial of degree 12.
You are better off doing as dharr suggests.

@AHSAN Yes in Maple 2019.2 and in Maple 2020.2 as well, you get the solution in termds of inert integrals when n = 2 or 3.
For n = 4 you get the same as in the general case with n replaced by 4.

Most likely there is nothing wrong with the solution found.
The problem in all its generality probably cannot be solved.
You could experiment with letting n = 2 like this:
 

dsolve(eval(ode, n = 2));

or even simpler:
 

dsolve(eval(ode, n = 1));

Then try n = 3 and n=4.

@ecterrab Have a nice vacation. Merry Christmas!

@ecterrab Edgardo, I certainly agree that:
" generally speaking, RootOf's don't mean 'wrong' or the like".
as you wrote.
But my statement about not being surprised was initially just the appearance of nested RooOfs. When I was still teaching that would have made my students scream in horror.

But as Carl says, if you try evaluating the solution at x = 0 you get an error because of ln(x).

 

 

@mmcdara I agree.

Next to returning a correct answer is returning unevaluated and after that any error.
#############
In view of this result:
dsolve(edo);
y(x) = RootOf(_Z^2 - exp(RootOf(x^2*(tanh(sqrt(_C1^2 + 4)*(2*_C2 + _Z + 2*ln(x))/(2*_C1))^2*_C1^2 + 4*tanh(sqrt(_C1^2 + 4)*(2*_C2 + _Z + 2*ln(x))/(2*_C1))^2 - _C1^2 - 4*exp(_Z) - 4))) - 1 + _Z*_C1)*x

it isn't surprising that the initial value problem fails.

@vv One solution to the double quote problem could be to use Find/Replace from the Edit menu replace " with ` (accent grave) on the faulty procedure (or on a copy of it).
Then apply Carl's procedure to that.
Actually this replacement wouldn't spoil printf or error statements, or descriptions.

The (very) old releases of Maple didn't have real strings but used accent grave (back quote).

@Carl Love Thank you Carl.

@a_simsim You are surely right about the serious lack of examples of all the many options for events.

Your initial use of the trigger t = [2000,500] in events made me make an example of a trigger of that type adapted to your situation by simply modifying EVTS.
The first version EVTS2 doesn't work right because that type of trigger fires for t = 2000+n*500, for any integer n not only positive ones.
Therefore I used a conditional action in EVTS3, where there is no action if t is not large enough.
This extension EVTS3 may not be relevant to your application, but was just meant to give one further example of using events.
MaplePrimes20-12-08_FlowProblem_EVENTSII.mw

@vv Maple apparently doesn't recognize diff(sin(x)*u(x,t),x) as a derivative when the execution of the integral is done because it is evaluated as  cos(x)*u(x, t) + sin(x)*diff(u(x, t), x).
So we have to prevent that evaluation. This could be done by using Diff instead of diff:
 

A:=int(Diff(sin(x)*u(x,t),x),x=-infinity..infinity, continuous);

The result returned is 'undefined'. Not an unreasonable respons, but not correct either.
Integrating from -R to R is a better idea:

A:=int(Diff(sin(x)*u(x,t),x),x=-R..R, continuous);
limit(A,R=infinity);

Then we run into the problem that simplify/side relations doesn't work even for this simpler looking version:

limit(sin(R)*u(R),R=infinity);
simplify(%,{limit(u(R),R=infinity)=0}); 


 

@BrettKnoss You can do that in this way:
 

restart;

f:= 2/(3-x);

s:=convert(f,FormalPowerSeries);

term__k:=simplify(op(1,s)); 

subs(x=abs(x),term__k);
ratio:=subs(k=k+1,%)/%;
limit(ratio,k=infinity);  # answer abs(x)/3

Thus the radius of convergence is 3.

@nm I tried your original worksheet again in Maple 2020.2, Maple 2019.2, and Maple 2015.2.
The first two gave the simple answer twice in two runs.

Maple 2015.2 gave in two runs: (1) simple, not so simple and (2) not so simple, not so simple.

@nm I updated my Physics package.
Still no difference between warnlevel = 3 and warnlevel = 0.

@gasmiboubeker I cannot reproduce the problem in Maple 18.02 nor in Maple 2018.2.

I used the code as written by Tom Leslie.

First 7 8 9 10 11 12 13 Last Page 9 of 215