Sig: obj
doMore:
max:
in ax: var integer
in bx: var integer
a: var integer
b: var integer
init: obj
S: obj max(a,b +)
@putAt::at:
in putAt: var integer
in at: var integer
a: var integer
R: obj
go:
Z: var integer
max:
in ax: var integer
in bx: var integer
S: obj max(,)
@putIt::at:
in putIt: var integer
in at: var integer
a: var integer
R: obj