
/* This is the virtual machine code expressed as a c formatted character
   constant for a function that takes a virtual machine program to an equivalent
   program by translating the top level combinator into more primitive
   combinators if possible. */

char *interpreter_code = "{kqwd{gOwhO?[[KQkx{xSqoKmH{AczSHkjhsjccwxhcOz{COqQCwA\
woEJRKkn{MYQa`mZBSo^?pZkwWdzwCaailUZB[_nQ]zKkypqGPqUzsPPtUz=CwLUgAxsKkqZRPzHZhS\
aOgS<Mzb[aVnBSosqhzvQNq?yJodUZwPmJEct@Cvhn=cuQqWqFyKo`bWQtWWNB[qI]GL@CvE{xc<Mzr\
ZS=upi^{OUQmcQPao<@[r?NGDcth[oKAectwIKHpRHrkjmPtuQWciDfU{NT>^mz<EZUac\\L[cHvXxv\
ZyPGz{W]OrUOQZpR=={yK\\>S^WoEuz^[pfqvyGR[]W^hgFiXqgQQTwiPUN^[yQPnEja{NcwAth[w\
\\VSeR=alScqoFngHuUXVmiaqrUdTh[kt`Me[f]z<HS]at<auySKVuiiFScyNKGnkWMQMEqIYMPSOH\
\\>SksM@f]z>EZBS]ctbxqaMxHrhqNCcwAxnafRFSqZJoG^qJjQTl\\bvzqt>>EZf[]ct@[e[mbjQF_\
HnJ><@[]a{>CpZew=sOQUa`tqIjpdazKjgP^ez@]z=CvUzfCwgGVVHNXpDatU{qCyCyCwoQgaoIQPwQ\
WNef]{IGPNp@]zlcvUz==z>EZHnALXcAz>ct@[jM=Z?AtLSaNkVPzLjfeR_PT?DDaxxoD]HEz<mZ==z\
^[fcxcJP]UxpNAvUzqfS]avaylPqJWx?NNuSJPbf[qXna<HS\\cvEzGCtNC{AiFCcuT^[\\L[aXZ[]c\
uu{S`jANxot>ppqRB]D[aRft<cz=ZGCt<aw>[acrD[hSaBnZ^[vt<@[\\Mz<@[ySMRdo^Bp^fHwOG>[\
fq]O\\S]at<atbt?AuuzQLS]az\\<[^m{Jp^SecvE[qOcqf?oG\\icPq<<mZ@p]]ateJEjaz>[cxAzN\
atU{XMj<E[Hg>ct@CtezwnqniPi<MV`vu^<ctenFOawe[f]{\\ShSfSpCct@[q>[tbw>FNAvEzNAwyg\
_JGJHPQPGePb=[XvSj\\cvd[\\^S]atUZZ[v<@[ecwd>CvStCdcth[dctx_kFi=Q<e\\?O`=a{KNDEz\
FCtDavezFO]ct<M{V^S\\L[iNEZfCxnWEt<auhciNvnI_GkqHP>`xcD\\d[hEZf[]D[aw\\Mz^SqDez\
^[jNez>EZM\\<[^W\\<[qGJ]AFaOHfG]Zvo<latf[]D[hEz\\cvUzF[j=DS^mzP]D[fcuEBvSuBtD?x\
<rTbVsN>[]\\FctMbw>[\\HS^]z==zNAyVEz<E[blctNCte{f]zc{gz?I@niJ>]{DMbv=W<HS\\cw>S\
dcvE{qbnZEkP\\HShEz<D[\\^S\\D[nKkLJPh=rlayDAhFV>[tAtf[^mzWEviL<CvSv^>[\\HSdavez\
^S_IOQA<=ITf[\\FNIr=ZBS]BW\\>S\\<[gJ@Wf]ze\\S\\cvez@]zf[`yI?^ILMbtx\\DUZFOdAhEj\
MjAPcz>E[DU[\\S]D[hEz@]zIgGpW^=WDe^`uZtefSv[vv<]zf[hFO]aw>[\\HShE{QBCJyPFVJ]Zv>\
[_`fCt>CuPdatNCtAw^`t?AtEz<mZQOErhF_`DDEzFCv>>EZ^SbFezlcv>[aw\\cz=Z>[vbXqG]eDFC\
w>Sbf[fcy<NCt?Atd[dE{\\S]az=[moFj]y]hEZFcv=D[]D[tlctEzlatd[]ateJBSjnf]q=On>ez@U\
jHEzlcy<HStAtf[hEZFOaw^`wxT=rOf\\@Uj\\Rl?At?Az<ctUZ@UjFcuZv>[aw_nNeNsF\\RleDEz>\
[q\\S^`v=W=BWdEzFCv>[iNfuiTdedy\\StAz]auZteF=W>]zlatd[qF<qDi`IN>BS]aydeJ\\ctxFN\
latf[hEZ><d`xDe^`teKPaw^]z\\_lf[]BW^e{fndB]ZuZwd\\cw>Sb^]BWdAh@UkH]P\\\\cv>[yLd\
[^ez\\V=W>bdAhI^\\d[^]{rO>S]BW^>b_`FV@flaw>SfP^ez\\RlJNFJm>Fctf[gb@UjFV\\]d><Mb\
tMbtqF=W?pVB\\Rn=WB^FV\\F>>b^bpdqB<w?Y^DfD>\\ITTUuFDa@=]RrqGfr_PohITwORmaGOJfpg\
TXpoTT`nP\\<";
