SubOfInt: obj
%include MetaSystem,String
SN: ref ObjSnap
meter: integer
-- just a test
x: var char
weigth: integer
-- another test
unit: var char
double:
%globals
out V: var integer
m1: var meter
m2: var meter
w: var weigth