Line: obj
Point: Value
%globals
in X: var Integer
in Y: var Integer
print:<
Line: Value
%globals
PL1: var Point(,)
PL2: var Point(,)
print:
q1: var integer
q2: var integer
q3: var integer
L: var Line