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