***************************************************************************
* Here is a residual program of the last supercompilation by the SCP4.
* The residual program is in Refal5.
* You have to change the parametrs of the call of ADDS2 with data.
* Please, be carefull: 
*         a) the order of the parametrs can be incorrect;
*         b) the residual program cannot be supercompiled
*            without some transformation to a fragment of Refal5;
***************************************************************************

$EXTERN ADD ,DIVMOD ;
$ENTRY Go {
 = <Prout <ADDS2 e.1 >> ;
}

* InputFormat: <ADDS2 e.1 >
ADDS2 {
 (e.41 ) e.1  = <F22 e.1 0 (e.41 )> ;
}

* InputFormat: <F22 e.53 s.54 (e.55 ) >
F22 {
 e.53 s.57 s.54 (e.55 s.56 )  , <ADD (s.56 ) s.57 >:s.58  , <ADD (s.58 )
 s.54 >:s.59  , <DIVMOD (s.59 ) 10 >:(s.62 ) s.63  = <F22 e.53 s.62 (e.55 
)> s.63 ;
 0 ()  = ;
 e.53 s.54 ()  = <F22 e.53 0 (s.54 )> ;
 s.54 (e.55 )  = <F22 s.54 0 (e.55 )> ;
}

****************************** The End ************************************