Transformation of Applicative Specifications into Imperative ...

APPENDIX C. FORMAL SPECIFICATIONS OF TRANSFORMATIONS
if id(vn) ∈ dom func
then
/∗The application expression is a function application.
∗/
case type_expr(func(id(vn))) of
FunctionTypeExpr(arg, fa, res) →
CheckFunctionAppl(
ve, vel, typeExprToExpTypeList(arg),
typings, func, trans, env, types)
end
else
/∗The application expression is a list or map
application.∗/
CheckListMapAppl(
ve, vel, et, typings, func, trans, env,
types)
end,
→
CheckListMapAppl(
ve, vel, et, typings, func, trans, env, types)
end,
/∗Checks if a function application can be transformed.
∗/
/∗
Arguments:
=======
ve: the value expression
vel: the arguments of the function application
et: the expected types of the arguments of the
function application
Results:
=====
Bool: true if the function application is transformable,
false otherwise
∗/
CheckFunctionAppl :
ValueExpr × ValueExpr ∗ × ExpType ∗ ×
TYPINGS × FUNC × TRANS × ENV × TYPES →
Bool × ENV × TYPES
CheckFunctionAppl(
ve, vel, etl, typings, func, trans, env, types) ≡
let
(b, env ′ , types ′ ) =
172