<div dir="ltr"><div dir="ltr"><div dir="ltr"><div dir="ltr">On Fri, Oct 4, 2019 at 6:11 PM Hans Hagen <<a href="mailto:j.hagen@xs4all.nl">j.hagen@xs4all.nl</a>> wrote:<br></div><div class="gmail_quote"><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left:1px solid rgb(204,204,204);padding-left:1ex">Hi,<br>
<br>
I uploaded a new lmtx beta. Again some more metafun trickery (see <br>
luametafun manual). I attached an (lmtx only) example of some experiment <br>
code, dedicated to Alan Braslau (teacher among other things).<br>
<br>
Hans<br>
<br>
-----------------------------------------------------------------<br>
                                           Hans Hagen | PRAGMA ADE<br>
               Ridderstraat 27 | 8061 GH Hasselt | The Netherlands<br>
        tel: 038 477 53 69 | <a href="http://www.pragma-ade.nl" rel="noreferrer" target="_blank">www.pragma-ade.nl</a> | <a href="http://www.pragma-pod.nl" rel="noreferrer" target="_blank">www.pragma-pod.nl</a><br>
-----------------------------------------------------------------<br>
___________________________________________________________________________________<br>
If your question is of interest to others as well, please add an entry to the Wiki!<br>
<br>
maillist : <a href="mailto:ntg-context@ntg.nl" target="_blank">ntg-context@ntg.nl</a> / <a href="http://www.ntg.nl/mailman/listinfo/ntg-context" rel="noreferrer" target="_blank">http://www.ntg.nl/mailman/listinfo/ntg-context</a><br>
webpage  : <a href="http://www.pragma-ade.nl" rel="noreferrer" target="_blank">http://www.pragma-ade.nl</a> / <a href="http://context.aanhet.net" rel="noreferrer" target="_blank">http://context.aanhet.net</a><br>
archive  : <a href="https://bitbucket.org/phg/context-mirror/commits/" rel="noreferrer" target="_blank">https://bitbucket.org/phg/context-mirror/commits/</a><br>
wiki     : <a href="http://contextgarden.net" rel="noreferrer" target="_blank">http://contextgarden.net</a><br>
___________________________________________________________________________________<br></blockquote><div><br></div><div><br></div><div><div>Hi,</div><div><br></div><div>I read the new manual with a great joy! This is really nice improvements of MetaFun! I also like the 3D plots!</div><div><br></div><div>I had the possibility to try out some contour graphics on a freshly updated system. I have two questions:</div><div><br></div><div>1) I think the first (blue) plot looks fine and it looks like it could be the same curve as the blue one in the Mathematica plot (page 3). Why does my second example (orange) not match with the result from Mathematica (orange)? (I think I do something wrong) </div><div>2) Is there a way to combine the two contour plots in one MetaFun drawing? If I add them both to the same, only the last one shows. If I try functions={"-4+x^2+x^5+15*y-y^2-10*x^3*y^2+5*x*y^4","-15*x+2*x*y+5*x^4*y-10*x^2*y^3+y^5"} it does not show both either.</div><div><br></div><div>/Mikael<br></div><div><br></div><div>Test document (output was too big to attach (sorry if it came through to someone), so I put it at <a href="http://www.maths.lth.se/~mickep/polynomnoll.pdf">http://www.maths.lth.se/~mickep/polynomnoll.pdf</a> )</div><div><br></div><div>\starttext<br>\startMPpage[offset=3bp,instance=doublefun]<br>draw lmt_contour [<br>xmin=-5,<br>xmax=5,<br>ymin=-5,<br>ymax=5,<br>xstep=0.01,<br>ystep=0.01,<br>range={0},<br>levels=1,<br>function="-4+x^2+x^5+15*y-y^2-10*x^3*y^2+5*x*y^4",<br>linecolor="darkblue",<br>linewidth=1,<br>legend=false,<br>cache=true,<br>]  xsized 10cm ;<br>\stopMPpage<br><br>\startMPpage[offset=3bp,instance=doublefun]<br>draw lmt_contour [<br>xmin=-5,<br>xmax=5,<br>ymin=-5,<br>ymax=5,<br>xstep=0.01,<br>ystep=0.01,<br>range={0},<br>levels=1,<br>function="-15*x+2*x*y+5*x^4*y-10*x^2*y^3+y^5",<br>linecolor="orange",<br>linewidth=1,<br>legend=false,<br>cache=true,<br>]  xsized 10cm ;<br>\stopMPpage<br><br>\startbuffer[mmainput]<br>ContourPlot[<br> {-4+x^2+x^5+15y-y^2-10x^3y^2+5x*y^4 == 0,<br>  -15x+2x*y+5*x^4*y-10x^2*y^3+y^5 == 0},<br>  {x, -5, 5}, {y, -5, 5}, Frame -> False]<br>\stopbuffer<br>\startTEXpage[offset=2bp]<br>\typebuffer[mmainput]<br><br>\externalfigure[mathematicaplot][width=10cm]<br>\stopTEXpage<br>\stoptext</div></div><div> </div></div></div></div></div>