// $Id: xpt.g,v 16.1 2000/03/02 14:43:39 ajay Exp $
create xform /f
create xgraph /f/g
setfield ^ xmax 10 ymax 10
create xplot /f/g/p

pushe /f/g/p

loadtab /f/g/p xpts 1 9 0 9 1 2 3 4 5 6 7 8 9 10
loadtab /f/g/p ypts 1 9 0 9 1 2 3 4 5 6 7 8 9 10
setfield ^ fg red

pope

xshow /f