26.09.2013 Views

Transformation of Applicative Specifications into Imperative ...

Transformation of Applicative Specifications into Imperative ...

Transformation of Applicative Specifications into Imperative ...

SHOW MORE
SHOW LESS

You also want an ePaper? Increase the reach of your titles

YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.

APPENDIX C. FORMAL SPECIFICATIONS OF TRANSFORMATIONS<br />

AccessResult<br />

getAccessObsOptVEL(idset, ovel, et, func, trans) ≡<br />

case ovel <strong>of</strong><br />

ValueExprList(vel) →<br />

getAccessObsList(idset, vel, et, func, trans),<br />

NoValueExprList → mk_AccessResult(〈〉, idset)<br />

end,<br />

/∗Returns an access list <strong>of</strong> the values <strong>of</strong> types<br />

<strong>of</strong> interest read from during evaluation <strong>of</strong> an<br />

optional value expression pair list.∗/<br />

/∗<br />

Arguments:<br />

=======<br />

idset: the functions already evaluated<br />

ovel: the optional value expression pair list<br />

et: the expected type <strong>of</strong> the optional value expression<br />

pair list<br />

Result:<br />

=======<br />

AccessResult: the corresponding access result<br />

∗/<br />

getAccessObsOptVEPL :<br />

Id-set × OptionalValueExprPairList × MapType ×<br />

FUNC × TRANS →<br />

AccessResult<br />

getAccessObsOptVEPL(idset, ovel, et, func, trans) ≡<br />

case ovel <strong>of</strong><br />

ValueExprPairList(vel) →<br />

getAccessObsListList(<br />

idset, pairListToList(vel),<br />

pairListToTypeList(vel, et), func, trans),<br />

NoValueExprPairList →<br />

mk_AccessResult(〈〉, idset)<br />

end,<br />

/∗Turns a value expression pair list <strong>into</strong> a value<br />

expression list.∗/<br />

/∗<br />

Arguments:<br />

=======<br />

vepl: the value expression pair list<br />

Result:<br />

=======<br />

256

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!