Transformation of Applicative Specifications into Imperative ...

APPENDIX C. FORMAL SPECIFICATIONS OF TRANSFORMATIONS
end,
end
end
end
/∗Transforms a single typing.∗/
/∗
Arguments:
=======
st: the single typing
Result:
=======
ValueDef: the resulting imperative version of
the single typing
∗/
TRSingleTyping :
SingleTyping × FUNC × TRANS → SingleTyping
TRSingleTyping(st, func, trans) ≡
case binding(st) of
IdBinding(id) →
mk_SingleTyping(
binding(st),
TRTypeExpr(id, type_expr(st), func, trans))
end,
/∗Transforms a type expression.∗/
/∗
Arguments:
=======
id: the id of the corresponding function
te: the type expression
Result:
=======
TypeExpr: the resulting imperative version of
the type expression
∗/
TRTypeExpr :
Id × TypeExpr × FUNC × TRANS → TypeExpr
TRTypeExpr(id, te, func, trans) ≡
case te of
TypeLiteral(literal) → te,
TypeName(tid) →
if (tid ∈ dom trans)
then
186