dKinds: obj
%include MetaSystem
m1: var integer
m2: var integer
max: integer
in V1: var integer
in V2: var integer
--out M: var integer
Point: Value
in X: var integer
in Y: var integer
print:
adjustPoint: Point
Box:
M: val max(,)
P1: var Point(,)
SN: ref ObjSnap