%GCL // Demonstration of CURVE N=101 PI = 3.1415926 XRAY = FALLOC (N) XRAY = (XRAY - 1.) * 3.6 YRAY1 = SIN (XRAY * PI / 180.) YRAY2 = COS (XRAY * PI / 180.) METAFL ('CONS') DISINI () COMPLX () PAGERA () NAME ('X-axis', 'X') NAME ('Y-axis', 'Y') TITLIN ('Demostration of CURVE', 2) TICKS (10, 'X') LABDIG (-1, 'X') GRAF (0.,360.,0.,90.,-1.,1.,-1.,0.5) TITLE () CURVE (xray, yray1, n) CURVE (xray, yray2, n) DASH () XAXGIT () DISFIN ()
Figure B.1: Demonstration of CURVE