Transformation of Applicative Specifications into Imperative ...

APPENDIX D. SPECIFICATION OF TRANSFORMER IN RSL1
end,
or, Known(TypeLiteral(BOOL)), typings,
func, trans,
envMap(
CheckValueExpr(
ve, et, typings, func, trans,
env, types)),
typesMap(
CheckValueExpr(
ve, et, typings, func, trans,
env, types)))))
CheckListExpr :
ListExpr × ExpType × TYPINGS × FUNC × TRANS ×
ENV × TYPES →
BOOL_ENV_TYPES
CheckListExpr(le, et, typings, func, trans, env, types) ≡
case le of
RangedListExpr(fve, sve) →
CheckValueExprList(
〈fve, sve〉, 〈et, et〉, typings, func,
trans, env, types),
EnumeratedListExpr(ovel) →
CheckOptValueExprList(
ovel, et, typings, func, trans, env, types),
ComprehendedListExpr(ve1, b, ve2, or) →
mk_BOOL_ENV_TYPES(
and(
and(
bool(
CheckValueExpr(
ve1, et, typings, func, trans,
env, types)),
bool(
CheckValueExpr(
ve2, et, typings, func, trans,
envMap(
CheckValueExpr(
ve1, et, typings, func,
trans, env, types)),
typesMap(
CheckValueExpr(
ve1, et, typings, func,
trans, env, types))))),
332