DIMENSION X(100),Y(100),PLBF(150) 1 X(1)=0.0 Y(1)=0.0 CALL CLRPLT(100,PLBF) DO 10 I=2,100 X(I)=X(I-1)+0.01 10 Y(I)=Y(I-1)+0.01 CALL PLOT(100,X,Y) GO TO 1 STOP END