Transformation of Applicative Specifications into Imperative ...
Transformation of Applicative Specifications into Imperative ... Transformation of Applicative Specifications into Imperative ...
APPENDIX D. SPECIFICATION OF TRANSFORMER IN RSL1 end, ))) envMap( CheckValueExprList( 〈first(vep), second(vep)〉, 〈tedom(et), terange(et)〉, typings, func, trans, env, types)), typesMap( CheckValueExprList( 〈first(vep), second(vep)〉, 〈tedom(et), terange(et)〉, typings, func, trans, env, types)) CheckOptValueExprList : OptionalValueExprList × ExpType × TYPINGS × FUNC × TRANS × ENV × TYPES → BOOL_ENV_TYPES CheckOptValueExprList( ovel, et, typings, func, trans, env, types) ≡ case ovel of ValueExprList(vel) → CheckValueExprList( vel, toExpTypeList(et, lengthVE(vel)), typings, func, trans, env, types), NoValueExprList → mk_BOOL_ENV_TYPES(true, env, types) end, CheckOptValueExprPairList : OptionalValueExprPairList × MapType × TYPINGS × FUNC × TRANS × ENV × TYPES → BOOL_ENV_TYPES CheckOptValueExprPairList( ovel, et, typings, func, trans, env, types) ≡ case ovel of ValueExprPairList(vel) → CheckValueExprPairList( vel, et, typings, func, trans, env, types), NoValueExprPairList → mk_BOOL_ENV_TYPES(true, env, types) end, CheckValueExprPairList : ValueExprPair ∗ × MapType × TYPINGS × FUNC × 336
D.2. FORMAL SPECIFICATION OF THE TRANSFORMER IN RSL1 TRANS × ENV × TYPES → BOOL_ENV_TYPES CheckValueExprPairList( vel, et, typings, func, trans, env, types) ≡ if vel = 〈〉 then mk_BOOL_ENV_TYPES(true, env, types) else if not( bool( CheckValueExprList( 〈first(hd vel), second(hd vel)〉, 〈tedom(et), terange(et)〉, typings, func, trans, env, types))) then mk_BOOL_ENV_TYPES( bool( CheckValueExprList( 〈first(hd vel), second(hd vel)〉, 〈tedom(et), terange(et)〉, typings, func, trans, env, types)), envMap( CheckValueExprList( 〈first(hd vel), second(hd vel)〉, 〈tedom(et), terange(et)〉, typings, func, trans, env, types)), typesMap( CheckValueExprList( 〈first(hd vel), second(hd vel)〉, 〈tedom(et), terange(et)〉, typings, func, trans, env, types))) else CheckValueExprPairList( tl vel, et, typings, func, trans, envMap( CheckValueExprList( 〈first(hd vel), second(hd vel)〉, 〈tedom(et), terange(et)〉, typings, func, trans, env, types)), typesMap( CheckValueExprList( 〈first(hd vel), second(hd vel)〉, 〈tedom(et), terange(et)〉, typings, func, trans, env, types))) 337
- Page 302 and 303: APPENDIX C. FORMAL SPECIFICATIONS O
- Page 304 and 305: APPENDIX C. FORMAL SPECIFICATIONS O
- Page 306 and 307: APPENDIX C. FORMAL SPECIFICATIONS O
- Page 308 and 309: APPENDIX C. FORMAL SPECIFICATIONS O
- Page 310 and 311: APPENDIX C. FORMAL SPECIFICATIONS O
- Page 312 and 313: APPENDIX C. FORMAL SPECIFICATIONS O
- Page 314 and 315: APPENDIX C. FORMAL SPECIFICATIONS O
- Page 316 and 317: APPENDIX C. FORMAL SPECIFICATIONS O
- Page 318 and 319: APPENDIX D. SPECIFICATION OF TRANSF
- Page 320 and 321: APPENDIX D. SPECIFICATION OF TRANSF
- Page 322 and 323: APPENDIX D. SPECIFICATION OF TRANSF
- Page 324 and 325: APPENDIX D. SPECIFICATION OF TRANSF
- Page 326 and 327: APPENDIX D. SPECIFICATION OF TRANSF
- Page 328 and 329: APPENDIX D. SPECIFICATION OF TRANSF
- Page 330 and 331: APPENDIX D. SPECIFICATION OF TRANSF
- Page 332 and 333: APPENDIX D. SPECIFICATION OF TRANSF
- Page 334 and 335: APPENDIX D. SPECIFICATION OF TRANSF
- Page 336 and 337: APPENDIX D. SPECIFICATION OF TRANSF
- Page 338 and 339: APPENDIX D. SPECIFICATION OF TRANSF
- Page 340 and 341: APPENDIX D. SPECIFICATION OF TRANSF
- Page 342 and 343: APPENDIX D. SPECIFICATION OF TRANSF
- Page 344 and 345: APPENDIX D. SPECIFICATION OF TRANSF
- Page 346 and 347: APPENDIX D. SPECIFICATION OF TRANSF
- Page 348 and 349: APPENDIX D. SPECIFICATION OF TRANSF
- Page 350 and 351: APPENDIX D. SPECIFICATION OF TRANSF
- Page 354 and 355: APPENDIX D. SPECIFICATION OF TRANSF
- Page 356 and 357: APPENDIX D. SPECIFICATION OF TRANSF
- Page 358 and 359: APPENDIX D. SPECIFICATION OF TRANSF
- Page 360 and 361: APPENDIX D. SPECIFICATION OF TRANSF
- Page 362 and 363: APPENDIX D. SPECIFICATION OF TRANSF
- Page 364 and 365: APPENDIX D. SPECIFICATION OF TRANSF
- Page 366 and 367: APPENDIX D. SPECIFICATION OF TRANSF
- Page 368 and 369: APPENDIX D. SPECIFICATION OF TRANSF
- Page 370 and 371: APPENDIX D. SPECIFICATION OF TRANSF
- Page 372 and 373: APPENDIX D. SPECIFICATION OF TRANSF
- Page 374 and 375: APPENDIX D. SPECIFICATION OF TRANSF
- Page 376 and 377: APPENDIX D. SPECIFICATION OF TRANSF
- Page 378 and 379: APPENDIX D. SPECIFICATION OF TRANSF
- Page 380 and 381: APPENDIX D. SPECIFICATION OF TRANSF
- Page 382 and 383: APPENDIX D. SPECIFICATION OF TRANSF
- Page 384 and 385: APPENDIX D. SPECIFICATION OF TRANSF
- Page 386 and 387: APPENDIX D. SPECIFICATION OF TRANSF
- Page 388 and 389: APPENDIX D. SPECIFICATION OF TRANSF
- Page 390 and 391: APPENDIX D. SPECIFICATION OF TRANSF
- Page 392 and 393: APPENDIX D. SPECIFICATION OF TRANSF
- Page 394 and 395: APPENDIX D. SPECIFICATION OF TRANSF
- Page 396 and 397: APPENDIX D. SPECIFICATION OF TRANSF
- Page 398 and 399: APPENDIX D. SPECIFICATION OF TRANSF
- Page 400 and 401: APPENDIX D. SPECIFICATION OF TRANSF
D.2. FORMAL SPECIFICATION OF THE TRANSFORMER IN RSL1<br />
TRANS × ENV × TYPES →<br />
BOOL_ENV_TYPES<br />
CheckValueExprPairList(<br />
vel, et, typings, func, trans, env, types) ≡<br />
if vel = 〈〉<br />
then mk_BOOL_ENV_TYPES(true, env, types)<br />
else<br />
if<br />
not(<br />
bool(<br />
CheckValueExprList(<br />
〈first(hd vel), second(hd vel)〉,<br />
〈tedom(et), terange(et)〉, typings,<br />
func, trans, env, types)))<br />
then<br />
mk_BOOL_ENV_TYPES(<br />
bool(<br />
CheckValueExprList(<br />
〈first(hd vel), second(hd vel)〉,<br />
〈tedom(et), terange(et)〉, typings,<br />
func, trans, env, types)),<br />
envMap(<br />
CheckValueExprList(<br />
〈first(hd vel), second(hd vel)〉,<br />
〈tedom(et), terange(et)〉, typings,<br />
func, trans, env, types)),<br />
typesMap(<br />
CheckValueExprList(<br />
〈first(hd vel), second(hd vel)〉,<br />
〈tedom(et), terange(et)〉, typings,<br />
func, trans, env, types)))<br />
else<br />
CheckValueExprPairList(<br />
tl vel, et, typings, func, trans,<br />
envMap(<br />
CheckValueExprList(<br />
〈first(hd vel), second(hd vel)〉,<br />
〈tedom(et), terange(et)〉, typings,<br />
func, trans, env, types)),<br />
typesMap(<br />
CheckValueExprList(<br />
〈first(hd vel), second(hd vel)〉,<br />
〈tedom(et), terange(et)〉, typings,<br />
func, trans, env, types)))<br />
337
Change language