Thomas Dean

145 Reputation

7 Badges

15 years, 135 days

MaplePrimes Activity

These are replies submitted by Thomas Dean


Changing bin/Maple2020.png does not seem to change anything.  Removing bin/Maple2020.png does not change anything.  Seems like twm (or maple) is using a built-in icon?

bin/maple2020.desktop contains






Yes, I made a mistake when entering the plot statement.

 But, changing the plot statement to

b := plot(f, 0..4*Pi, color=white, filled=true):

does not make the 'green' area white.

preplot = [], postplot = [], plotdevice = maplet, plotoutput = terminal,
plotoptions = ``

f := sin(x);
g := cos(x);
plottools:-transform(unapply([x,y+g],x,y))(plot(f-g,x=0 .. 4*Pi,filled=true));

produces a correct plot.


@Joe Riel 


Record(package = "Syrup",version = "1.1.0",author = "Joseph Riel",email =
"",date = "2020-02-20",maple = "2018.2")


@Joe Riel 

I did not try installing from the cloud before.  Just tried it and it works.

> with(Syrup);
          [Draw, Library, Print, Solve, ToModelica, ToSpice, Version]

> Version;

> PackageTools:-Install(6271537930305536,overwrite);
memory used=5.8MB, alloc=40.3MB, time=0.32

> restart
> ;
> with(Syrup);                                      
           [About, Draw, Library, Print, Solve, ToModelica, ToSpice]

However, About returns nothing.  Seems to solve circuts Ok.


Sorry for the omission, but, it did not relate to my original question.

That is: How do I manipulate the expression

y = (sqrt(x) + 10)^(1/3) - (sqrt(x) - 10)^(1/3);


y^3 = 20 - 3*(x - 100)^(1/3)*y;


y^3 = 20 - 3*(x - 100)^(1/3);  ( I think not possible, except at a specific point)

eq1 := y^3 = 20 - 3*(x - 100)^(2/3);

I can not get from

y = (sqrt(x) + 10)^(1/3) - (sqrt(x) - 10)^(1/3);


eq2 := y^3 = 20 - 3*(x - 100)^(1/3)*y;

or, to eq1.

The original problem was for a specific x, x=108.

solve(subs(x=108, eq1),y);

2, -1 - 3    I, -1 + 3    I

solve(subs(x=108, eq2),y);

2, -1 - 3    I, -1 + 3    I



I got turned around on this and now can not get it straight.

n:=expand((x-1)*(x-2)*(x-3)); ## zeros
d := solve(n/d = 2-x,d); ## oblique asymptote
eq := n/(d-2); ## why is the denominator off by 2?

plot([eq,2-x], x=-4..8, -5..5,  linestyle=[1,3],color=[red,blue], thickness=[2,0], scaling=constrained);



Sorry I did not provide the example first.

But, my question was not about the example, but, in finding documentation about the syntax.

I played with the example and understood what it did.

I wanted to discover where things like [a,b](c,d) were documented, hoping I would learn about more things like this.

I guess my question should have been what does maple do when two delimiters, one closing and one opening are adjacent in the input stream.  But, I could not make that link.


@Carl Love 

Other than reading all the help pages, how do I find useful things like this?  I looked in the user manual and programming guide.  Evalapply is in neither.

Tom Dean

@Carl Love 

Sort of an Undocumented short cut?


From an earlier answer to a question:


[Re,Im](P(1+I)); ## in


Looking at this, it behaves like map in that [Re,Im](P(1+I));  returns a list of

    [Re(P(1+I)), Im(P(1+I))]


It appears that maple2019 does not like subscripted variables as parameters.


p[D] := r[D] -> 3*r[D];

 invalid parameter; functional operators require their parameters to be of type symbol or (symbol::type)

@Thomas Richard 

I just upgraded to maple2019, the default release then.  Now that maple2020 is released, Maplesoft promised a free upgrade, since I just upgaded to 2019...

For now, I get FAIL.

@Thomas Richard 

This is a long chain of questions/answers, starting in maxima.

If I use enough points, maple produces the most correct plot.

I use maple for most things.

f:= 2*x^5-x^3*y+2*x^2*y^2-x*y^3+2*y^5;
for idx to 10 do
end do;

for idx to 10 do
end do;




After you pointed the way, I can manually factor f.  Programmatically?

Other than inspection, how do I determine the sign of a group of terms?

1 2 3 4 5 Page 1 of 5