32 |
V4= list(3,VV[5],list(2,VV[3],base[2]),VV[6]); |
V4= list(3,VV[5],list(2,VV[3],base[2]),VV[6]); |
33 |
V5= list(3,VV[5],list(2,VV[3],base[2]),VV[7]); |
V5= list(3,VV[5],list(2,VV[3],base[2]),VV[7]); |
34 |
V6= list(2,VV[3],base[2]); |
V6= list(2,VV[3],base[2]); |
35 |
if(endp(cdr(base[3]))){ |
if(endp_prop(cdr(base[3]))){ |
36 |
goto T11;} |
goto T11;} |
37 |
if(type_of(cadr(base[3]))==t_string){ |
if(type_of(cadr(base[3]))==t_string){ |
38 |
goto T13;} |
goto T13;} |
42 |
vs_top=sup; |
vs_top=sup; |
43 |
goto T13; |
goto T13; |
44 |
T13:; |
T13:; |
45 |
if(endp(cddr(base[3]))){ |
if(endp_prop(cddr(base[3]))){ |
46 |
goto T17;} |
goto T17;} |
47 |
base[4]= VV[9]; |
base[4]= VV[9]; |
48 |
vs_top=(vs_base=base+4)+1; |
vs_top=(vs_base=base+4)+1; |
350 |
Lgensym(); |
Lgensym(); |
351 |
vs_top=sup; |
vs_top=sup; |
352 |
(V43->c.c_car)= vs_base[0]; |
(V43->c.c_car)= vs_base[0]; |
353 |
if(endp(V44=MMcdr(V44))){ |
V44=MMcdr(V44); |
354 |
|
if(endp(V44)){ |
355 |
V41= base[2]; |
V41= base[2]; |
356 |
goto T116;} |
goto T116;} |
357 |
V43=MMcdr(V43)=MMcons(Cnil,Cnil); |
V43=MMcdr(V43)=MMcons(Cnil,Cnil); |
400 |
Lgensym(); |
Lgensym(); |
401 |
vs_top=sup; |
vs_top=sup; |
402 |
(V53->c.c_car)= vs_base[0]; |
(V53->c.c_car)= vs_base[0]; |
403 |
if(endp(V54=MMcdr(V54))){ |
V54=MMcdr(V54); |
404 |
|
if(endp(V54)){ |
405 |
V49= base[6]; |
V49= base[6]; |
406 |
goto T132;} |
goto T132;} |
407 |
V53=MMcdr(V53)=MMcons(Cnil,Cnil); |
V53=MMcdr(V53)=MMcons(Cnil,Cnil); |
1179 |
goto T351; |
goto T351; |
1180 |
T351:; |
T351:; |
1181 |
(V164->c.c_car)= list(2,(V165->c.c_car),(V166->c.c_car)); |
(V164->c.c_car)= list(2,(V165->c.c_car),(V166->c.c_car)); |
1182 |
if(endp(V165=MMcdr(V165))||endp(V166=MMcdr(V166))){ |
V165=MMcdr(V165); |
1183 |
|
V166=MMcdr(V166); |
1184 |
|
if(endp(V165)||endp(V166)){ |
1185 |
V163= base[0]; |
V163= base[0]; |
1186 |
goto T350;} |
goto T350;} |
1187 |
V164=MMcdr(V164)=MMcons(Cnil,Cnil); |
V164=MMcdr(V164)=MMcons(Cnil,Cnil); |
1224 |
{ VMB14 VMS14 VMV14 |
{ VMB14 VMS14 VMV14 |
1225 |
goto TTL; |
goto TTL; |
1226 |
TTL:; |
TTL:; |
1227 |
if(!(endp((V185)))){ |
if(!(endp_prop((V185)))){ |
1228 |
goto T356;} |
goto T356;} |
1229 |
{object V187 = Cnil; |
{object V187 = Cnil; |
1230 |
VMR14(V187)} |
VMR14(V187)} |
1231 |
goto T356; |
goto T356; |
1232 |
T356:; |
T356:; |
1233 |
if(!(endp(cdr((V185))))){ |
if(!(endp_prop(cdr((V185))))){ |
1234 |
goto T359;} |
goto T359;} |
1235 |
base[0]= VV[55]; |
base[0]= VV[55]; |
1236 |
base[1]= (V185); |
base[1]= (V185); |
1257 |
goto TTL; |
goto TTL; |
1258 |
TTL:; |
TTL:; |
1259 |
V194= cdr((V194)); |
V194= cdr((V194)); |
1260 |
if(!(endp((V194)))){ |
if(!(endp_prop((V194)))){ |
1261 |
goto T366;} |
goto T366;} |
1262 |
{object V196 = Cnil; |
{object V196 = Cnil; |
1263 |
VMR15(V196)} |
VMR15(V196)} |
1264 |
goto T366; |
goto T366; |
1265 |
T366:; |
T366:; |
1266 |
if(!(endp(cdr((V194))))){ |
if(!(endp_prop(cdr((V194))))){ |
1267 |
goto T369;} |
goto T369;} |
1268 |
base[0]= VV[56]; |
base[0]= VV[56]; |
1269 |
base[1]= (V194); |
base[1]= (V194); |
1274 |
VMR15(V197)} |
VMR15(V197)} |
1275 |
goto T369; |
goto T369; |
1276 |
T369:; |
T369:; |
1277 |
if(!(endp(cddr((V194))))){ |
if(!(endp_prop(cddr((V194))))){ |
1278 |
goto T374;} |
goto T374;} |
1279 |
{object V198 = (*(LnkLI99))(car((V194)),cadr((V194)),(V195)); |
{object V198 = (*(LnkLI99))(car((V194)),cadr((V194)),(V195)); |
1280 |
VMR15(V198)} |
VMR15(V198)} |
1296 |
vs_top=sup; |
vs_top=sup; |
1297 |
{object V201=base[0]->c.c_cdr; |
{object V201=base[0]->c.c_cdr; |
1298 |
base[2]= V201;} |
base[2]= V201;} |
1299 |
if(!(endp(base[2]))){ |
if(!(endp_prop(base[2]))){ |
1300 |
goto T377;} |
goto T377;} |
1301 |
base[3]= Cnil; |
base[3]= Cnil; |
1302 |
vs_top=(vs_base=base+3)+1; |
vs_top=(vs_base=base+3)+1; |
1303 |
return; |
return; |
1304 |
goto T377; |
goto T377; |
1305 |
T377:; |
T377:; |
1306 |
if(!(endp(cdr(base[2])))){ |
if(!(endp_prop(cdr(base[2])))){ |
1307 |
goto T380;} |
goto T380;} |
1308 |
base[3]= VV[58]; |
base[3]= VV[58]; |
1309 |
base[4]= base[2]; |
base[4]= base[2]; |
1312 |
return; |
return; |
1313 |
goto T380; |
goto T380; |
1314 |
T380:; |
T380:; |
1315 |
if(!(endp(cddr(base[2])))){ |
if(!(endp_prop(cddr(base[2])))){ |
1316 |
goto T385;} |
goto T385;} |
1317 |
V202= (*(LnkLI99))(car(base[2]),cadr(base[2]),base[1]); |
V202= (*(LnkLI99))(car(base[2]),cadr(base[2]),base[1]); |
1318 |
base[3]= list(3,VV[57],/* INLINE-ARGS */V202,Cnil); |
base[3]= list(3,VV[57],/* INLINE-ARGS */V202,Cnil); |
1328 |
V205= Cnil; |
V205= Cnil; |
1329 |
goto T388; |
goto T388; |
1330 |
T388:; |
T388:; |
1331 |
if(!(endp((V203)))){ |
if(!(endp_prop((V203)))){ |
1332 |
goto T389;} |
goto T389;} |
1333 |
V206= nreverse((V205)); |
V206= nreverse((V205)); |
1334 |
base[3]= listA(3,VV[51],(V204),append(/* INLINE-ARGS */V206,VV[59])); |
base[3]= listA(3,VV[51],(V204),append(/* INLINE-ARGS */V206,VV[59])); |
1336 |
return; |
return; |
1337 |
goto T389; |
goto T389; |
1338 |
T389:; |
T389:; |
1339 |
if(!(endp(cdr((V203))))){ |
if(!(endp_prop(cdr((V203))))){ |
1340 |
goto T393;} |
goto T393;} |
1341 |
base[3]= VV[60]; |
base[3]= VV[60]; |
1342 |
base[4]= base[2]; |
base[4]= base[2]; |
1401 |
goto T412; |
goto T412; |
1402 |
T412:; |
T412:; |
1403 |
(V213->c.c_car)= list(2,(V214->c.c_car),(V215->c.c_car)); |
(V213->c.c_car)= list(2,(V214->c.c_car),(V215->c.c_car)); |
1404 |
if(endp(V214=MMcdr(V214))||endp(V215=MMcdr(V215))){ |
V214=MMcdr(V214); |
1405 |
|
V215=MMcdr(V215); |
1406 |
|
if(endp(V214)||endp(V215)){ |
1407 |
V212= base[3]; |
V212= base[3]; |
1408 |
goto T411;} |
goto T411;} |
1409 |
V213=MMcdr(V213)=MMcons(Cnil,Cnil); |
V213=MMcdr(V213)=MMcons(Cnil,Cnil); |
1441 |
V225= Cnil; |
V225= Cnil; |
1442 |
goto T419; |
goto T419; |
1443 |
T419:; |
T419:; |
1444 |
if(!(endp(cdr((V220))))){ |
if(!(endp_prop(cdr((V220))))){ |
1445 |
goto T420;} |
goto T420;} |
1446 |
V222= nreverse((V222)); |
V222= nreverse((V222)); |
1447 |
V223= nreverse((V223)); |
V223= nreverse((V223)); |
1459 |
goto T433; |
goto T433; |
1460 |
T433:; |
T433:; |
1461 |
(V228->c.c_car)= list(2,(V229->c.c_car),(V230->c.c_car)); |
(V228->c.c_car)= list(2,(V229->c.c_car),(V230->c.c_car)); |
1462 |
if(endp(V229=MMcdr(V229))||endp(V230=MMcdr(V230))){ |
V229=MMcdr(V229); |
1463 |
|
V230=MMcdr(V230); |
1464 |
|
if(endp(V229)||endp(V230)){ |
1465 |
base[5]= base[6]; |
base[5]= base[6]; |
1466 |
goto T432;} |
goto T432;} |
1467 |
V228=MMcdr(V228)=MMcons(Cnil,Cnil); |
V228=MMcdr(V228)=MMcons(Cnil,Cnil); |
1537 |
goto T452; |
goto T452; |
1538 |
T452:; |
T452:; |
1539 |
(V240->c.c_car)= list(2,(V241->c.c_car),(V242->c.c_car)); |
(V240->c.c_car)= list(2,(V241->c.c_car),(V242->c.c_car)); |
1540 |
if(endp(V241=MMcdr(V241))||endp(V242=MMcdr(V242))){ |
V241=MMcdr(V241); |
1541 |
|
V242=MMcdr(V242); |
1542 |
|
if(endp(V241)||endp(V242)){ |
1543 |
V239= base[3]; |
V239= base[3]; |
1544 |
goto T451;} |
goto T451;} |
1545 |
V240=MMcdr(V240)=MMcons(Cnil,Cnil); |
V240=MMcdr(V240)=MMcons(Cnil,Cnil); |
1575 |
V248= Cnil; |
V248= Cnil; |
1576 |
goto T463; |
goto T463; |
1577 |
T463:; |
T463:; |
1578 |
if(!(endp((V244)))){ |
if(!(endp_prop((V244)))){ |
1579 |
goto T464;} |
goto T464;} |
1580 |
V246= nreverse((V246)); |
V246= nreverse((V246)); |
1581 |
V247= nreverse((V247)); |
V247= nreverse((V247)); |
1591 |
goto T476; |
goto T476; |
1592 |
T476:; |
T476:; |
1593 |
(V250->c.c_car)= list(2,(V251->c.c_car),(V252->c.c_car)); |
(V250->c.c_car)= list(2,(V251->c.c_car),(V252->c.c_car)); |
1594 |
if(endp(V251=MMcdr(V251))||endp(V252=MMcdr(V252))){ |
V251=MMcdr(V251); |
1595 |
|
V252=MMcdr(V252); |
1596 |
|
if(endp(V251)||endp(V252)){ |
1597 |
base[4]= base[5]; |
base[4]= base[5]; |
1598 |
goto T475;} |
goto T475;} |
1599 |
V250=MMcdr(V250)=MMcons(Cnil,Cnil); |
V250=MMcdr(V250)=MMcons(Cnil,Cnil); |
1668 |
goto T495; |
goto T495; |
1669 |
T495:; |
T495:; |
1670 |
(V261->c.c_car)= list(2,(V262->c.c_car),(V263->c.c_car)); |
(V261->c.c_car)= list(2,(V262->c.c_car),(V263->c.c_car)); |
1671 |
if(endp(V262=MMcdr(V262))||endp(V263=MMcdr(V263))){ |
V262=MMcdr(V262); |
1672 |
|
V263=MMcdr(V263); |
1673 |
|
if(endp(V262)||endp(V263)){ |
1674 |
V260= base[3]; |
V260= base[3]; |
1675 |
goto T494;} |
goto T494;} |
1676 |
V261=MMcdr(V261)=MMcons(Cnil,Cnil); |
V261=MMcdr(V261)=MMcons(Cnil,Cnil); |
1830 |
goto T541; |
goto T541; |
1831 |
T541:; |
T541:; |
1832 |
(V283->c.c_car)= list(2,(V284->c.c_car),(V285->c.c_car)); |
(V283->c.c_car)= list(2,(V284->c.c_car),(V285->c.c_car)); |
1833 |
if(endp(V284=MMcdr(V284))||endp(V285=MMcdr(V285))){ |
V284=MMcdr(V284); |
1834 |
|
V285=MMcdr(V285); |
1835 |
|
if(endp(V284)||endp(V285)){ |
1836 |
V282= base[4]; |
V282= base[4]; |
1837 |
goto T540;} |
goto T540;} |
1838 |
V283=MMcdr(V283)=MMcons(Cnil,Cnil); |
V283=MMcdr(V283)=MMcons(Cnil,Cnil); |
1925 |
goto T557; |
goto T557; |
1926 |
T557:; |
T557:; |
1927 |
(V295->c.c_car)= list(2,(V296->c.c_car),(V297->c.c_car)); |
(V295->c.c_car)= list(2,(V296->c.c_car),(V297->c.c_car)); |
1928 |
if(endp(V296=MMcdr(V296))||endp(V297=MMcdr(V297))){ |
V296=MMcdr(V296); |
1929 |
|
V297=MMcdr(V297); |
1930 |
|
if(endp(V296)||endp(V297)){ |
1931 |
V294= base[4]; |
V294= base[4]; |
1932 |
goto T556;} |
goto T556;} |
1933 |
V295=MMcdr(V295)=MMcons(Cnil,Cnil); |
V295=MMcdr(V295)=MMcons(Cnil,Cnil); |
2019 |
goto T573; |
goto T573; |
2020 |
T573:; |
T573:; |
2021 |
(V310->c.c_car)= list(2,(V311->c.c_car),(V312->c.c_car)); |
(V310->c.c_car)= list(2,(V311->c.c_car),(V312->c.c_car)); |
2022 |
if(endp(V311=MMcdr(V311))||endp(V312=MMcdr(V312))){ |
V311=MMcdr(V311); |
2023 |
|
V312=MMcdr(V312); |
2024 |
|
if(endp(V311)||endp(V312)){ |
2025 |
V309= base[4]; |
V309= base[4]; |
2026 |
goto T572;} |
goto T572;} |
2027 |
V310=MMcdr(V310)=MMcons(Cnil,Cnil); |
V310=MMcdr(V310)=MMcons(Cnil,Cnil); |
2111 |
goto T588; |
goto T588; |
2112 |
T588:; |
T588:; |
2113 |
(V324->c.c_car)= list(2,(V325->c.c_car),(V326->c.c_car)); |
(V324->c.c_car)= list(2,(V325->c.c_car),(V326->c.c_car)); |
2114 |
if(endp(V325=MMcdr(V325))||endp(V326=MMcdr(V326))){ |
V325=MMcdr(V325); |
2115 |
|
V326=MMcdr(V326); |
2116 |
|
if(endp(V325)||endp(V326)){ |
2117 |
V323= base[4]; |
V323= base[4]; |
2118 |
goto T587;} |
goto T587;} |
2119 |
V324=MMcdr(V324)=MMcons(Cnil,Cnil); |
V324=MMcdr(V324)=MMcons(Cnil,Cnil); |
2203 |
goto T603; |
goto T603; |
2204 |
T603:; |
T603:; |
2205 |
(V338->c.c_car)= list(2,(V339->c.c_car),(V340->c.c_car)); |
(V338->c.c_car)= list(2,(V339->c.c_car),(V340->c.c_car)); |
2206 |
if(endp(V339=MMcdr(V339))||endp(V340=MMcdr(V340))){ |
V339=MMcdr(V339); |
2207 |
|
V340=MMcdr(V340); |
2208 |
|
if(endp(V339)||endp(V340)){ |
2209 |
V337= base[5]; |
V337= base[5]; |
2210 |
goto T602;} |
goto T602;} |
2211 |
V338=MMcdr(V338)=MMcons(Cnil,Cnil); |
V338=MMcdr(V338)=MMcons(Cnil,Cnil); |
2299 |
goto T619; |
goto T619; |
2300 |
T619:; |
T619:; |
2301 |
(V355->c.c_car)= list(2,(V356->c.c_car),(V357->c.c_car)); |
(V355->c.c_car)= list(2,(V356->c.c_car),(V357->c.c_car)); |
2302 |
if(endp(V356=MMcdr(V356))||endp(V357=MMcdr(V357))){ |
V356=MMcdr(V356); |
2303 |
|
V357=MMcdr(V357); |
2304 |
|
if(endp(V356)||endp(V357)){ |
2305 |
V354= base[3]; |
V354= base[3]; |
2306 |
goto T618;} |
goto T618;} |
2307 |
V355=MMcdr(V355)=MMcons(Cnil,Cnil); |
V355=MMcdr(V355)=MMcons(Cnil,Cnil); |