[[ |- var I: {I:intloc}dec]] =
({I=}, )
where (, ) = allocate()
and allocate: Store
(Location
x Store)
allocate <, , ..., >=
(loc, <, , ..., ,
init>)
where init is some arbitrary integer
[[ |- define I=U: {I:}dec]] =
({I=}, )
where = [[ |- U: ]]
[[D in C: comm]] = [[ |-C: comm]]
,
where (, ) = [[{} |- D:
dec]]{}