S" MATHEMATICAL FUNCTIONS" SET-1STTITLE
S" iForth Plotter"         SET-IXLINE
S" "	 		   SET-VLABEL

graph-id#
0= [IF]
	S" cosine - 0 .. 2 pi" SET-2NDTITLE
	S" Arg [rad]" SET-HLABEL
	0e -1e   PI*2 1e  DIMENSIONS
 [THEN]

graph-id#
1 = [IF]
	S" sine - 0 .. 2 pi" SET-2NDTITLE
	S" Arg [PI/50]" SET-HLABEL
	0e -1e   100e 1e  DIMENSIONS
  [THEN]

graph-id#
2 = [IF]
	S" sine - 0 .. 2 pi" SET-2NDTITLE
	S" Arg [PI/50]" SET-HLABEL
	0e -1.2e   100e 1.2e  DIMENSIONS
	S" Note: error bars"  SET-IXLINE
  [THEN]
