acer

32460 Reputation

29 Badges

20 years, 2 days
Ontario, Canada

Social Networks and Content at Maplesoft.com

MaplePrimes Activity


These are replies submitted by acer

It is poor etiquette to include only an image of your expression, so that others can only test by retyping the supposed expression.

Instead, please be polite and upload and attach your actual worksheet that contains the expression. You can use the green up-arrow in the Mapleprimes editor for that.

Ensure that all other parameters have numeric values. What is the numeric value of Ea? Of F? Of Rrt? Is "PI" a mispelling of "Pi"? etc.

Also, if you have candidate ranges for the solving-variables then now is a good time to share such information.

Please don't put followup queries for this example in separate Question threads. Instead, just add it here. Eg. what happens at (0,0)?

@ContrapuntoBrowniano You marked your Question as "Maple 2018", and that is not the same as Maple 18.

Maple 18 was released in the year 2014. The Maple version naming scheme changed in the year 2015, to have the version number match the release year.

I will submit a report.

kernelopts(version);

`Maple 2022.0, X86 64 LINUX, Mar 8 2022, Build ID 1599809`

restart;

with(Units:-Simple):

a := (x, y) -> exp(y*x):

lprint(eval(a));

(x, y) -> Units:-Simple:-exp(Units:-Simple:-`*`(y,x))

dismantle(eval(a));


PROC(11) #[operator, arrow]
   EXPSEQ(3)
      NAME(4): x
      NAME(4): y
   EXPSEQ(1)
   EXPSEQ(3)
      NAME(5): operator
      NAME(4): arrow
   EXPSEQ(1)
   FUNCTION(3)
      MEMBER(3)
         NAME(4): Units:-Simple #[modulename = Units, protected]
         NAME(4): exp #[protected, _syslib]
      EXPSEQ(2)
         FUNCTION(3)
            MEMBER(3)
               NAME(4): Units:-Simple #[modulename = Units, protected]
               NAME(4): `*` #[protected]
            EXPSEQ(3)
               PARAM(2): [2]
               PARAM(2): [1]
   EXPSEQ(1)
   EXPSEQ(1)
   EXPSEQ(1)
   BINARY(2)
      0x2
   EXPSEQ(3)
      LIST(2)
         EXPSEQ(6)
            STRING(4): ""
            INTNEG(2): -1
            INTPOS(2): 4
            INTPOS(2): 21
            INTPOS(2): 36
      LIST(2)
         EXPSEQ(6)
            STRING(4): ""
            INTNEG(2): -1
            INTPOS(2): 4
            INTPOS(2): 12
            INTPOS(2): 36
 

D[1](a);

D[1](a)

restart;

with(Units:-Simple):

a := proc (x, y) options operator, arrow; exp(y*x) end proc

lprint(eval(a));

(x, y) -> Units:-Simple:-exp(Units:-Simple:-`*`(y,x))

dismantle(eval(a));


PROC(11) #[operator, arrow]
   EXPSEQ(3)
      NAME(4): x
      NAME(4): y
   EXPSEQ(1)
   EXPSEQ(3)
      NAME(5): operator
      NAME(4): arrow
   EXPSEQ(1)
   FUNCTION(3)
      NAME(4): Units:-Simple:-exp #[protected, modulename = Units:-Simple]
      EXPSEQ(2)
         FUNCTION(3)
            NAME(4): Units:-Simple:-`*` #[protected, modulename = Units:-Simple]
            EXPSEQ(3)
               PARAM(2): [2]
               PARAM(2): [1]
   EXPSEQ(1)
   EXPSEQ(1)
   EXPSEQ(1)
   BINARY(2)
      0x2
   EXPSEQ(1)
 

D[1](a);

Error, (in anonymous procedure called from PD/PD) too many levels of recursion

 

Download problem_etian2_rep.mw

@Chorux Sorry, I left in reference to another list I'd made. That should now be corrected, above.

Also, the code snippet $nops(L) may get rejected by the 2D parser, so I changed it to $1..nops(L) which should work in both 1D and 2D input modes.

@Rouben Rostamian  I saw it on the Help page in Maple 2022.0 for Topic plots:-display.

     redraw : boolean; specifies whether to allow redrawing of static
     2-D plots by combining the original plot calls into a single call
     rather than just displaying them together

I happened to have previously observed a (rare, hopefully, and now reported) case in which that new (default of) redraw=true caused a slowdown. So I was lucky to have had a little head start here.

Mentally I lump it in with explicitly adding the old defaulf of adaptive=true option for plot, that can help avoid some new slowdowns due to the adaptive=geometric in Maple 2022.0. Hopefully these things will be ironed out in 2022.1.

@vv I believe that the OP also wants this effect:

ff := (x/3-2/3)^k;

((1/3)*x-2/3)^k

expand(simplify(content(ff)))*simplify(ff/content(ff));

(x-2)^k/3^k

And someone might have an easier means to attain that.

@Christian Wolinski It appeared in Maple 2019.

See updates/Maple2019/Language.

I believe that I am making some progress, although I have to overcome the hurdle of the Control and Info options (structs, say) in the UMFPACK solver. But if I get it right then it could be exciting.

@C_R Please don't spawn off a separate Question thread for this (highly related, if not essentially duplicate) query, even if you haven't yet received a response here that satisfies you.

It runs quickly for me in Maple 2020.1 and 2020.2 for Linux.

@tomleslie This does not correspond to the provided definition.

Why do you want to write your own root-finding implementation for this, instead of using fsolve?

@pik1432 You should add this as followup to one of your earlier Question threads on the same underlying goal. By splitting this across several Question threads you unhelpfully split the details of the goal and the previous responses.

If you insist on spawning multiple Question threads on this topic you could at least use the Branch button from one of the earlier Question threads, so that cross-referencing links are included at both ends.

It would also be much better if you showed your expected result (lprinted, or as an actual expression identical to what you are wanting not as an image).

@charlie_fcl 

One way consists of programmatically embedding an animation inside a PlotComponent, and having it automatically start playing as part of the programmatic statement that generates and embeds it. I believe that I had an example of that in the attachments in this old Answer.

Two other ways are to use the Explore command (though by itself this does not usually create the kind of plot that can be exported to an aninated .gif file). animate_auto.mw

First 108 109 110 111 112 113 114 Last Page 110 of 594