*************************************************************************** * This file was created at Fri Apr 05 01:09:27 2002 * Here is a residual program of the last supercompilation by the SCP4. * A task from ryba.mst was supercompiled. * The residual program is in Refal5. * You have to change the parametrs of the calls of ryba with data, * as well as to choose a call to run. * Please, be carefull: * a) the order of the parametrs can be incorrect; *************************************************************************** /* $ENTRY Go { = <Prout <ryba1 s.11 s.12 s.13 s.14 s.15 s.21 s.22 s.23 s.24 s.25 s.31 s.32 s.33 s.34 s.35 s.41 s.42 s.43 s.44 s.45 s.51 s.52 s.53 s.54 s.55 >> ; } */ * InputFormat: <ryba1 s.1 s.2 s.3 s.4 s.5 s.6 s.7 s.8 s.9 s.10 s.11 s.12 s.13 *s.14 s.15 s.16 s.17 s.18 s.19 s.20 s.21 s.22 s.23 s.24 s.25 > ryba1 { Norwegian Yellow Dunhill Cat Water Dane Blue Marlboro Horse Tea Englishman Red PallMall Bird Milk German Green Rothmans Fish Coffee Swede White Winfield Dog Beer = German ; } ****************************** The End ************************************