Hello,
Why curve drawn is not that expected ?
Fabrice

\starttext
\startMPcode
     input hvdm;
     l:=2.8mm; r:=0.6; alfa:=45; beta:=0; gamma:=0;
     defineDefaultArrow (l, r, alfa, beta, gamma);
     numeric xmin, xmax, ymin, ymax;
     xmin :=-2; xmax := 4; ymax :=5 ;ymin:=-1; u := 1cm;
     pickup pencircle scaled 1pt ;
     drawarrow ((xmin,0) -- (xmax,0)) scaled u;
     drawarrow ((0,ymin) -- (0,ymax)) scaled u;
     draw tightfunction ("x", "2*(x-1)*(x-1)+2", xmin, xmax,
(xmax-xmin)/10)
     scaled u;
     setbounds currentpicture to boundingbox (((xmin,ymin) --
     (xmax,ymax)) scaled u);
\stopMPcode
\stoptext
___________________________________________________________________________________
If your question is of interest to others as well, please add an entry to the 
Wiki!

maillist : ntg-context@ntg.nl / http://www.ntg.nl/mailman/listinfo/ntg-context
webpage  : http://www.pragma-ade.nl / http://tex.aanhet.net
archive  : http://foundry.supelec.fr/projects/contextrev/
wiki     : http://contextgarden.net
___________________________________________________________________________________

Reply via email to