vv

13837 Reputation

20 Badges

9 years, 320 days

MaplePrimes Activity


These are replies submitted by vv

@jacobBN 

With uses in a procedure, the package is not loaded in memory; instead, the necessary functions are invoked by their long names.
with(packagename) can be used only at top-level (i.e. not inside a procedure).

@Markiyan Hirnyk 

Have you read the question or the answer?

restart;

Oper:= proc (F::list, G::algebraic, X::list)
local J,dG;
uses VectorCalculus;
if nops(F)<>nops(X) then return FAIL fi;
J := Jacobian(F,X);
dG := Matrix(Gradient(G,X));
J^+ . dG
end proc:

Oper([X^2*Y, X^3*Y, Z], G(X,Y,Z), [X, Y, Z]);

_rtable[18446744074328897526]

(1)

Oper([X^2*Y, X^3*Y, Z, Z*T], G(X,Y,Z,T), [X,Y,Z,T]);

_rtable[18446744074328908014]

(2)

 

@Robert Israel 

Unfortunately there are much simpler expressions for which testeq fails, e.g.

sin((3/7)*Pi)-sin((1/7)*Pi)+sin((2/7)*Pi)-sqrt(7)/2;

 

@_Maxim_ 

Unfortunately; probably branch problem due to the complex arguments of the elliptics.
MultiSeries seems to be still experimental, so maybe it will be corrected.
 

@_Maxim_ 

From the very beginning:

S1 := int(s(tau),tau=a..t):
E1 := r(t) - diff(r(t),t)*~(S1/s(t)):
MultiSeries:-asympt~(E1,t);

 

Fine analysis!

I just want to add that the asymptotic behavior of the involute (t-->oo) can be obtained directly using
MultiSeries:-asympt
(for t-->-oo  one has to change t to -t). Of course, MultiSeries:-series(...,t=infinity) is also possible.

 

@Markiyan Hirnyk 

What should be in your opinion the Maple's answer for your test problem

pdsolve([diff(u(t, x), t, t) = diff(u(t, x), x, x), u(t, 0) = 0, u(t, Pi) = 0]);

Same question in an ideal CAS.

@David1 

I am afraid that Groebner wil not help you very much for this problem. The degree of the polynomials would be huge and also the coefficients.
But, do you really need all the solutions?  You may add constraints to select some of them and then use the Direct Search package https://www.maplesoft.com/applications/view.aspx?SID=87637

It's a formal result.
It is easy to give sufficient conditions for the coefficients to have standard solutions. No CAS will do this in the near future.
Anyway, it is much better than nothing.

P.S. There are plenty of real bugs in Maple. Why not focus on these?

@Markiyan Hirnyk 

This is not really a trick. And it is hard to speak about bugs in this context, see http://mathworld.wolfram.com/ConstantProblem.html

Testzero:=testeq:
M^(-1);

Error, (in rtable/Power) singular matrix

 

It is an interesting and important problem.
Unfortunately the post is not easy to read because you decided to keep the notations (and the example) from the cited question.
This reminds me of a joke about Cauchy: when dealing with three similar quantities such as a,b,c they were denoted: NO2, ∑t1,2   and ∏7p,q .

 

@digerdiga 

'''sol(x)'''  cannot work because the first eval evaluates sol(X)  giving infinity  ( = min([]) ).
In '''sol'''(x), the outer '...' is for the evaluation of the argument, the second is for eval itself and the third is for the final result which must be unevaluated, to be used by eval(%, X = 1).

 

@acer 

hmm is simply wrong (bug).
Actually, appending assuming alpha>0, beta>0, hmm remains unevaluated.

First 103 104 105 106 107 108 109 Last Page 105 of 176