xmin=-1;
xmax=3;
ymin=-1/2;
ymax=3;
Setwindow([xmin,xmax], [ymin,ymax]);

function f=f(x)
  f=1/2*(x-1)+3/2;
endfunction

L1=Paramplot('[x, f(x)]', 'x=[xmin,xmax]', 'N=100');

//Windisp(L1);

Setax('a');
Openfile('tex/axis_sample2.tex');
Beginpicture('1cm');
Setpen(1);
Drwline(L1, 1.5);
Endpicture(1);
Closefile();
