*************************************************************************** * This file was created at Tue Jan 18 18:23:01 2000 * Here is a residual program of the last supercompilation by the SCP4. * A task from DI.mst was supercompiled. * The residual program is in Refal5. * You have to change the parametrs of the calls of DI with data, * as well as to choose a call to run. * Please, be carefull: * a) the order of the parametrs can be incorrect; *************************************************************************** $EXTERN XML_REF1 ; $ENTRY Go { = <Prout <DI1 >> ; } * InputFormat: <DI1 > DI1 { , <XML_REF1 >:e.101 = <F8 e.101 > ; } * InputFormat: <F1234 e.102 > F1234 { s.1147 e.102 = <F1234 e.102 > ; e.102 = <F1013 e.102 > ; } * InputFormat: <F1013 e.102 > F1013 { = ; ((s.911 ) e.909 ) e.102 = <F11 e.909 s.911 > <S1 e.102 s.911 > ; s.914 e.102 = <F1234 e.102 > ; } * InputFormat: <F979 e.102 > F979 { = ; ((s.873 ) e.871 ) e.102 = <F11 e.871 s.873 > <S2 e.102 s.873 > ; s.876 e.102 = (FALSE2 ) ; } * InputFormat: <F945 e.102 > F945 { = ; ((s.836 ) e.834 ) e.102 = <F11 e.834 s.836 > <S3 e.102 s.836 > ; s.839 e.102 = (FALSE2 ) ; } * InputFormat: <F889 e.102 > F889 { = ; ((s.748 ) e.746 ) e.102 = <F11 e.746 s.748 > <S4 e.102 s.748 > ; s.751 e.102 = (FALSE2 ) ; } * InputFormat: <F801 e.102 > F801 { s.596 e.102 = <F801 e.102 > ; e.102 = <F723 e.102 > ; } * InputFormat: <F723 e.102 > F723 { = ; ((s.547 ) e.545 ) e.102 = <F11 e.545 s.547 > <S5 e.102 s.547 > ; s.550 e.102 = <F801 e.102 > ; } * InputFormat: <F559 e.102 > F559 { = ; ((s.396 ) e.394 ) e.102 = <F11 e.394 s.396 > <S6 e.102 s.396 > ; s.399 e.102 = (FALSE2 ) ; } * InputFormat: <F495 e.102 > F495 { s.346 e.102 = <F495 e.102 > ; e.102 = <F430 e.102 > ; } * InputFormat: <F430 e.102 > F430 { = ; ((s.308 ) e.306 ) e.102 = <F11 e.306 s.308 > <S7 e.102 s.308 > ; s.311 e.102 = <F495 e.102 > ; } * InputFormat: <F408 e.102 > F408 { s.290 e.102 = <F408 e.102 > ; e.102 = <F343 e.102 > ; } * InputFormat: <F343 e.102 > F343 { = ; ((s.252 ) e.250 ) e.102 = <F11 e.250 s.252 > <S8 e.102 s.252 > ; s.255 e.102 = <F408 e.102 > ; } * InputFormat: <F321 e.102 > F321 { s.235 e.102 = <F321 e.102 > ; e.102 = <F256 e.102 > ; } * InputFormat: <F256 e.102 > F256 { = ; ((s.197 ) e.195 ) e.102 = <F11 e.195 s.197 > <S9 e.102 s.197 > ; s.200 e.102 = <F321 e.102 > ; } * InputFormat: <F193 e.102 > F193 { s.168 e.102 = <F193 e.102 > ; = ; ((s.173 ) e.171 ) e.102 = <F11 e.171 s.173 > (FALSE2 ) ; } * InputFormat: <F128 e.102 > F128 { = ; ((s.145 ) e.143 ) e.102 = <F11 e.143 s.145 > <S10 e.102 s.145 > ; s.148 e.102 = (FALSE2 ) ; } * InputFormat: <F11 e.102 s.104 > F11 { HTML = (FALSE3 ) ; ((s.110 ) e.108 ) e.102 HTML = <F11 e.108 s.110 > <S11 e.102 s.110 > ; s.113 e.102 HTML = (FALSE2 ) ; HEAD = (FALSE3 ) ; ((s.138 ) e.136 ) e.102 HEAD = <F11 e.136 s.138 > <S13 e.102 s.138 > ; s.141 e.102 HEAD = (FALSE2 ) ; TITLE = (FALSE3 ) ; ((s.164 ) e.162 ) e.102 TITLE = <F11 e.162 s.164 > (FALSE2 ) ; s.167 e.102 TITLE = <F193 e.102 > ; STYLE = (FALSE3 ) ; ((s.184 ) e.182 ) e.102 STYLE = <F11 e.182 s.184 > (FALSE2 ) ; s.187 e.102 STYLE = <F193 e.102 > ; e.102 EM = <F256 e.102 > ; e.102 B = <F343 e.102 > ; e.102 A = <F430 e.102 > ; BR = ; ((s.365 ) e.363 ) e.102 BR = <F11 e.363 s.365 > (FALSE2 ) ; s.368 e.102 BR = (FALSE2 ) ; IMG = ; ((s.380 ) e.378 ) e.102 IMG = <F11 e.378 s.380 > (FALSE2 ) ; s.383 e.102 IMG = (FALSE2 ) ; e.102 BODY = <F559 e.102 > ; e.102 P = <F723 e.102 > ; e.102 H1 = <F723 e.102 > ; e.102 H2 = <F723 e.102 > ; e.102 H3 = <F723 e.102 > ; e.102 H4 = <F723 e.102 > ; e.102 H5 = <F723 e.102 > ; e.102 H6 = <F723 e.102 > ; e.102 UL = <F889 e.102 > ; e.102 OL = <F889 e.102 > ; e.102 LI = <F723 e.102 > ; e.102 TABLE = <F945 e.102 > ; e.102 TR = <F979 e.102 > ; e.102 TD = <F1013 e.102 > ; e.102 CENTER = <F1013 e.102 > ; e.102 s.104 = (FALSE1 ) ; } * InputFormat: <F8 e.101 > F8 { ((s.104 ) e.102 ) e.101 = <F11 e.102 s.104 > <F8 e.101 > ; = ; } * InputFormat: <S13 e.102 s.138 > S13 { e.102 TITLE = <F128 e.102 > ; e.102 s.138 = (FALSE2 ) ; } * InputFormat: <S11 e.102 s.110 > S11 { HEAD = (FALSE3 ) ; ((s.117 ) e.115 ) e.102 HEAD = <F11 e.115 s.117 > <S12 e.102 s.117 > ; s.120 e.102 HEAD = (FALSE2 ) ; e.102 s.110 = (FALSE2 ) ; } * InputFormat: <S12 e.102 s.117 > S12 { BODY = ; ((s.124 ) e.122 ) e.102 BODY = <F11 e.122 s.124 > (FALSE2 ) ; s.127 e.102 BODY = (FALSE2 ) ; e.102 s.117 = (FALSE2 ) ; } * InputFormat: <S10 e.102 s.145 > S10 { e.102 STYLE = <F128 e.102 > ; e.102 s.145 = (FALSE2 ) ; } * InputFormat: <S9 e.102 s.197 > S9 { e.102 BR = <F256 e.102 > ; e.102 IMG = <F256 e.102 > ; e.102 B = <F256 e.102 > ; e.102 A = <F256 e.102 > ; e.102 s.197 = (FALSE2 ) ; } * InputFormat: <S8 e.102 s.252 > S8 { e.102 BR = <F343 e.102 > ; e.102 IMG = <F343 e.102 > ; e.102 EM = <F343 e.102 > ; e.102 A = <F343 e.102 > ; e.102 s.252 = (FALSE2 ) ; } * InputFormat: <S7 e.102 s.308 > S7 { e.102 BR = <F430 e.102 > ; e.102 IMG = <F430 e.102 > ; e.102 EM = <F430 e.102 > ; e.102 B = <F430 e.102 > ; e.102 s.308 = (FALSE2 ) ; } * InputFormat: <S6 e.102 s.396 > S6 { e.102 CENTER = <F559 e.102 > ; e.102 TABLE = <F559 e.102 > ; e.102 OL = <F559 e.102 > ; e.102 UL = <F559 e.102 > ; e.102 H6 = <F559 e.102 > ; e.102 H5 = <F559 e.102 > ; e.102 H4 = <F559 e.102 > ; e.102 H3 = <F559 e.102 > ; e.102 H2 = <F559 e.102 > ; e.102 H1 = <F559 e.102 > ; e.102 P = <F559 e.102 > ; e.102 s.396 = (FALSE2 ) ; } * InputFormat: <S5 e.102 s.547 > S5 { e.102 BR = <F723 e.102 > ; e.102 IMG = <F723 e.102 > ; e.102 A = <F723 e.102 > ; e.102 B = <F723 e.102 > ; e.102 EM = <F723 e.102 > ; e.102 s.547 = (FALSE2 ) ; } * InputFormat: <S4 e.102 s.748 > S4 { e.102 LI = <F889 e.102 > ; e.102 s.748 = (FALSE2 ) ; } * InputFormat: <S3 e.102 s.836 > S3 { e.102 TR = <F945 e.102 > ; e.102 s.836 = (FALSE2 ) ; } * InputFormat: <S2 e.102 s.873 > S2 { e.102 TD = <F979 e.102 > ; e.102 s.873 = (FALSE2 ) ; } * InputFormat: <S1 e.102 s.911 > S1 { e.102 CENTER = <F1013 e.102 > ; e.102 TABLE = <F1013 e.102 > ; e.102 OL = <F1013 e.102 > ; e.102 UL = <F1013 e.102 > ; e.102 H6 = <F1013 e.102 > ; e.102 H5 = <F1013 e.102 > ; e.102 H4 = <F1013 e.102 > ; e.102 H3 = <F1013 e.102 > ; e.102 H2 = <F1013 e.102 > ; e.102 H1 = <F1013 e.102 > ; e.102 P = <F1013 e.102 > ; e.102 BR = <F1013 e.102 > ; e.102 IMG = <F1013 e.102 > ; e.102 A = <F1013 e.102 > ; e.102 B = <F1013 e.102 > ; e.102 EM = <F1013 e.102 > ; e.102 s.911 = (FALSE2 ) ; } ****************************** The End ************************************