Transformation of Applicative Specifications into Imperative ...

APPENDIX C. FORMAL SPECIFICATIONS OF TRANSFORMATIONS
id ∈ elems typings(id),
AbbreviationDef(id, te) →
CheckTypeExpr(te, typings, func, trans) ∧
id ∈ elems typings(id)
end,
/∗Checks for transformability of a variant list.
∗/
/∗
Arguments:
=======
id: the id of the variant definition
vl: the list of variants
Results:
=====
Bool: true if the list is transformable, false
otherwise
∗/
CheckVariantList :
Id × Variant ∗ × TYPINGS × FUNC × TRANS →
Bool
CheckVariantList(id, vl, typings, func, trans) ≡
if vl = 〈〉 then true
else
CheckVariant(id, hd vl, typings, func, trans) ∧
CheckVariantList(id, tl vl, typings, func, trans)
end,
/∗Checks for transformability of a variant.∗/
/∗
Arguments:
=======
id: the id of the variant definition
v: the variant
Results:
=====
Bool: true if the variant is transformable, false
otherwise
∗/
CheckVariant :
Id × Variant × TYPINGS × FUNC × TRANS → Bool
CheckVariant(id, v, typings, func, trans) ≡
case v of
RecordVariant(c, cl) →
148