***************************************************************************
* 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 ************************************