eForth for SUBLEQ in one file

eforth.c

#include <stdio.h> /* [email protected], Richard James Howe */
int main(void){short p=0,m[65536] = { /* eForth for 16-bit SUBLEQ */
0,0,40,7,3168,-32768,-2,-1,1,2,16,0,5646,7642,8728,10118,11034,8728,0,0,0,
0,0,0,0,0,11492,0,0,10,-1,0,0,11474,0,3358,-32768,-32768,32512,32512,37,37,
43,36,0,46,0,37,49,0,0,52,39,39,55,38,0,58,0,39,61,0,0,64,18,18,67,12,0,70,
0,18,73,0,0,76,19,19,79,18,0,82,0,19,85,0,0,88,7,18,91,106,106,94,19,0,97,0,
106,100,0,0,103,21,21,106,0,0,109,0,21,112,0,0,115,19,19,118,21,0,121,0,19,
124,0,0,127,35,21,130,21,0,136,0,0,139,0,0,154,153,153,142,19,0,145,0,153,
148,0,0,151,0,0,154,7,39,157,193,193,160,39,0,163,0,193,166,0,0,169,194,194,
172,39,0,175,0,194,178,0,0,181,200,200,184,39,0,187,0,200,190,0,0,193,0,0,
196,18,0,199,0,0,202,0,0,205,18,18,208,19,0,211,0,18,214,0,0,217,0,0,76,0,
0,-1,0,0,76,8,25,229,0,0,76,7,25,235,0,0,76,11,11,241,25,11,244,25,25,247,
11,0,250,0,25,253,0,0,256,8,25,259,0,0,76,277,277,265,25,0,268,0,277,271,0,
0,274,25,25,277,0,0,280,0,25,283,0,0,286,0,0,76,304,304,292,37,0,295,0,304,
298,0,0,301,19,19,304,0,0,307,0,19,310,0,0,313,349,349,316,25,0,319,0,349,
322,0,0,325,350,350,328,25,0,331,0,350,334,0,0,337,356,356,340,25,0,343,0,
356,346,0,0,349,0,0,352,19,0,355,0,0,358,0,0,361,7,37,364,379,379,367,37,0,
370,0,379,373,0,0,376,25,25,379,0,0,382,0,25,385,0,0,388,7,37,391,0,0,76,25,
-1,397,412,412,400,37,0,403,0,412,406,0,0,409,25,25,412,0,0,415,0,25,418,0,
0,421,7,37,424,0,0,76,8,37,430,466,466,433,37,0,436,0,466,439,0,0,442,467,
467,445,37,0,448,0,467,451,0,0,454,473,473,457,37,0,460,0,473,463,0,0,466,
0,0,469,25,0,472,0,0,475,0,0,478,-1,25,481,0,0,76,8,37,487,523,523,490,37,
0,493,0,523,496,0,0,499,524,524,502,37,0,505,0,524,508,0,0,511,530,530,514,
37,0,517,0,530,520,0,0,523,0,0,526,25,0,529,0,0,532,0,0,535,550,550,538,18,
0,541,0,550,544,0,0,547,25,25,550,0,0,553,0,25,556,0,0,559,7,18,562,0,0,76,
19,19,568,25,0,571,0,19,574,0,0,577,592,592,580,37,0,583,0,592,586,0,0,589,
25,25,592,0,0,595,0,25,598,0,0,601,637,637,604,37,0,607,0,637,610,0,0,613,
638,638,616,37,0,619,0,638,622,0,0,625,644,644,628,37,0,631,0,644,634,0,0,
637,0,0,640,19,0,643,0,0,646,0,0,649,0,0,76,8,37,655,691,691,658,37,0,661,0,
691,664,0,0,667,692,692,670,37,0,673,0,692,676,0,0,679,698,698,682,37,0,685,
0,698,688,0,0,691,0,0,694,25,0,697,0,0,700,0,0,703,0,0,76,721,721,709,37,0,
712,0,721,715,0,0,718,19,19,721,0,0,724,0,19,727,0,0,730,8,37,733,769,769,
736,37,0,739,0,769,742,0,0,745,770,770,748,37,0,751,0,770,754,0,0,757,776,
776,760,37,0,763,0,776,766,0,0,769,0,0,772,25,0,775,0,0,778,0,0,781,25,25,
784,19,0,787,0,25,790,0,0,793,0,0,76,811,811,799,37,0,802,0,811,805,0,0,808,
25,25,811,0,0,814,0,25,817,0,0,820,7,37,823,0,0,76,7,39,829,865,865,832,39,
0,835,0,865,838,0,0,841,866,866,844,39,0,847,0,866,850,0,0,853,872,872,856,
39,0,859,0,872,862,0,0,865,0,0,868,25,0,871,0,0,874,0,0,877,892,892,880,37,
0,883,0,892,886,0,0,889,25,25,892,0,0,895,0,25,898,0,0,901,7,37,904,0,0,76,
8,37,910,946,946,913,37,0,916,0,946,919,0,0,922,947,947,925,37,0,928,0,947,
931,0,0,934,953,953,937,37,0,940,0,953,943,0,0,946,0,0,949,25,0,952,0,0,955,
0,0,958,973,973,961,39,0,964,0,973,967,0,0,970,25,25,973,0,0,976,0,25,979,
0,0,982,8,39,985,0,0,76,1003,1003,991,37,0,994,0,1003,997,0,0,1000,19,19,
1003,0,0,1006,0,19,1009,0,0,1012,21,21,1015,19,0,1021,0,0,1027,0,0,1024,0,19,
1042,25,0,1030,0,21,1033,0,0,1036,8,19,1039,0,0,1015,25,25,1045,21,0,1048,0,
25,1051,0,0,1054,7,37,1057,0,0,76,1075,1075,1063,39,0,1066,0,1075,1069,0,0,
1072,18,18,1075,0,0,1078,0,18,1081,0,0,1084,8,39,1087,0,0,76,1105,1105,1093,
37,0,1096,0,1105,1099,0,0,1102,19,19,1105,0,0,1108,0,19,1111,0,0,1114,25,
19,1117,25,25,1120,19,0,1123,0,25,1126,0,0,1129,7,37,1132,0,0,76,1150,1150,
1138,37,0,1141,0,1150,1144,0,0,1147,19,19,1150,0,0,1153,0,19,1156,0,0,1159,
19,0,1162,0,25,1165,0,0,1168,7,37,1171,0,0,76,8,37,1177,1213,1213,1180,37,
0,1183,0,1213,1186,0,0,1189,1214,1214,1192,37,0,1195,0,1214,1198,0,0,1201,
1220,1220,1204,37,0,1207,0,1220,1210,0,0,1213,0,0,1216,25,0,1219,0,0,1222,0,
0,1225,1240,1240,1228,39,0,1231,0,1240,1234,0,0,1237,25,25,1240,0,0,1243,0,
25,1246,0,0,1249,0,0,76,8,39,1255,0,0,76,8,37,1261,1297,1297,1264,37,0,1267,
0,1297,1270,0,0,1273,1298,1298,1276,37,0,1279,0,1298,1282,0,0,1285,1304,1304,
1288,37,0,1291,0,1304,1294,0,0,1297,0,0,1300,25,0,1303,0,0,1306,0,0,1309,25,
25,1312,37,0,1315,0,25,1318,0,0,1321,7,25,1324,0,0,76,37,37,1330,25,0,1333,
0,37,1336,0,0,1339,0,0,76,8,37,1345,1381,1381,1348,37,0,1351,0,1381,1354,0,0,
1357,1382,1382,1360,37,0,1363,0,1382,1366,0,0,1369,1388,1388,1372,37,0,1375,
0,1388,1378,0,0,1381,0,0,1384,25,0,1387,0,0,1390,0,0,1393,25,25,1396,39,0,
1399,0,25,1402,0,0,1405,0,0,76,39,39,1411,25,0,1414,0,39,1417,0,0,1420,1435,
1435,1423,37,0,1426,0,1435,1429,0,0,1432,25,25,1435,0,0,1438,0,25,1441,0,0,
1444,7,37,1447,0,0,76,1465,1465,1453,39,0,1456,0,1465,1459,0,0,1462,19,19,
1465,0,0,1468,0,19,1471,0,0,1474,7,19,1477,1513,1513,1480,39,0,1483,0,1513,
1486,0,0,1489,1514,1514,1492,39,0,1495,0,1514,1498,0,0,1501,1520,1520,1504,
39,0,1507,0,1520,1510,0,0,1513,0,0,1516,19,0,1519,0,0,1522,0,0,1525,0,0,76,
1543,1543,1531,39,0,1534,0,1543,1537,0,0,1540,19,19,1543,0,0,1546,0,19,1549,
0,0,1552,19,0,1558,0,0,1564,0,0,1561,0,19,1654,8,19,1567,1603,1603,1570,39,
0,1573,0,1603,1576,0,0,1579,1604,1604,1582,39,0,1585,0,1604,1588,0,0,1591,
1610,1610,1594,39,0,1597,0,1610,1600,0,0,1603,0,0,1606,19,0,1609,0,0,1612,0,
0,1615,1630,1630,1618,18,0,1621,0,1630,1624,0,0,1627,21,21,1630,0,0,1633,0,
21,1636,0,0,1639,18,18,1642,21,0,1645,0,18,1648,0,0,1651,0,0,76,7,18,1657,8,
39,1660,0,0,76,25,0,1666,0,25,1669,0,0,1672,25,0,1675,0,25,1678,0,0,1681,25,
0,1684,0,25,1687,0,0,1690,25,0,1693,0,25,1696,0,0,1699,25,0,1702,0,25,1705,0,
0,1708,25,0,1711,0,25,1714,0,0,1717,25,0,1720,0,25,1723,0,0,1726,25,0,1729,0,
25,1732,0,0,1735,25,0,1738,0,25,1741,0,0,1744,25,0,1747,0,25,1750,0,0,1753,
25,0,1756,0,25,1759,0,0,1762,25,0,1765,0,25,1768,0,0,1771,25,0,1774,0,25,
1777,0,0,1780,25,0,1783,0,25,1786,0,0,1789,19,19,1792,25,0,1795,0,19,1798,0,
0,1801,25,25,1804,0,0,1807,0,25,1810,0,0,1813,19,0,1819,0,0,1825,0,0,1822,
0,19,1837,25,25,1828,7,0,1831,0,25,1834,0,0,1837,0,0,76,1855,1855,1843,18,
0,1846,0,1855,1849,0,0,1852,18,18,1855,0,0,1858,0,18,1861,0,0,1864,0,0,76,
19,19,1870,25,0,1873,0,19,1876,0,0,1879,21,21,1882,0,0,1885,0,21,1888,0,0,
1891,19,0,1897,0,0,1903,0,0,1900,0,19,1915,21,21,1906,7,0,1909,0,21,1912,0,
0,1915,8,19,1918,0,19,1933,21,21,1924,7,0,1927,0,21,1930,0,0,1933,1948,1948,
1936,37,0,1939,0,1948,1942,0,0,1945,25,25,1948,0,0,1951,0,25,1954,0,0,1957,
7,37,1960,21,0,1966,0,0,1972,0,0,1969,0,21,1978,7,18,1975,0,0,76,1993,1993,
1981,18,0,1984,0,1993,1987,0,0,1990,19,19,1993,0,0,1996,0,19,1999,0,0,2002,
18,18,2005,19,0,2008,0,18,2011,0,0,2014,0,0,76,19,19,2020,25,0,2023,0,19,
2026,0,0,2029,25,25,2032,0,0,2035,0,25,2038,0,0,2041,0,19,2056,25,25,2047,7,
0,2050,0,25,2053,0,0,2056,0,0,76,19,19,2062,25,0,2065,0,19,2068,0,0,2071,25,
25,2074,7,0,2077,0,25,2080,0,0,2083,19,0,2089,0,0,2095,0,0,2092,0,19,2107,
25,25,2098,0,0,2101,0,25,2104,0,0,2107,8,19,2110,0,19,2125,25,25,2116,0,0,
2119,0,25,2122,0,0,2125,0,0,76,19,19,2131,25,0,2134,0,19,2137,0,0,2140,25,25,
2143,0,0,2146,0,25,2149,0,0,2152,19,0,2158,0,0,2161,0,0,2173,25,25,2164,7,0,
2167,0,25,2170,0,0,2173,7,19,2176,19,0,2182,0,0,2185,0,0,2197,25,25,2188,7,0,
2191,0,25,2194,0,0,2197,0,0,76,2215,2215,2203,37,0,2206,0,2215,2209,0,0,2212,
19,19,2215,0,0,2218,0,19,2221,0,0,2224,7,37,2227,25,19,2230,25,25,2233,0,0,
2236,0,25,2239,0,0,2242,19,0,2248,0,0,2251,0,0,2263,25,25,2254,7,0,2257,0,
25,2260,0,0,2263,0,0,76,2281,2281,2269,37,0,2272,0,2281,2275,0,0,2278,19,19,
2281,0,0,2284,0,19,2287,0,0,2290,7,37,2293,25,19,2296,25,25,2299,0,0,2302,0,
25,2305,0,0,2308,0,19,2323,25,25,2314,7,0,2317,0,25,2320,0,0,2323,0,0,76,25,
0,2329,0,25,2332,0,0,2335,0,0,76,20,20,2341,21,21,2344,25,0,2350,0,0,2353,0,
0,2386,11,11,2356,25,11,2359,25,25,2362,11,0,2365,0,25,2368,0,0,2371,8,25,
2374,20,20,2377,7,0,2380,0,20,2383,0,0,2386,19,19,2389,8,0,2392,0,19,2395,
0,0,2398,25,0,2404,0,0,2407,0,0,2419,19,19,2410,0,0,2413,0,19,2416,0,0,2419,
19,0,2425,0,0,2431,0,0,2428,0,19,2440,9,25,2434,7,21,2437,0,0,2386,8,21,2443,
20,0,2449,0,0,2455,0,0,2452,0,20,2479,5,21,2458,11,11,2461,21,11,2464,21,21,
2467,11,0,2470,0,21,2473,0,0,2476,8,21,2479,25,25,2482,21,0,2485,0,25,2488,
0,0,2491,0,0,76,19,19,2497,10,0,2500,0,19,2503,0,0,2506,20,20,2509,2524,2524,
2512,37,0,2515,0,2524,2518,0,0,2521,21,21,2524,0,0,2527,0,21,2530,0,0,2533,7,
37,2536,19,0,2542,0,0,2548,0,0,2545,0,19,2743,20,0,2551,0,20,2554,0,0,2557,
24,24,2560,25,0,2563,0,24,2566,0,0,2569,22,22,2572,0,0,2575,0,22,2578,0,0,
2581,24,0,2587,0,0,2590,0,0,2602,22,22,2593,7,0,2596,0,22,2599,0,0,2602,7,
24,2605,24,0,2611,0,0,2614,0,0,2626,22,22,2617,7,0,2620,0,22,2623,0,0,2626,
24,24,2629,21,0,2632,0,24,2635,0,0,2638,23,23,2641,0,0,2644,0,23,2647,0,0,
2650,24,0,2656,0,0,2659,0,0,2671,23,23,2662,7,0,2665,0,23,2668,0,0,2671,7,24,
2674,24,0,2680,0,0,2683,0,0,2695,23,23,2686,7,0,2689,0,23,2692,0,0,2695,22,0,
2698,0,23,2701,0,0,2704,23,0,2710,0,0,2716,0,0,2713,0,23,2719,7,20,2719,21,0,
2722,0,21,2725,0,0,2728,25,0,2731,0,25,2734,0,0,2737,8,19,2740,0,0,2536,25,
25,2746,20,0,2749,0,25,2752,0,0,2755,0,0,76,19,19,2761,10,0,2764,0,19,2767,
0,0,2770,20,20,2773,2788,2788,2776,37,0,2779,0,2788,2782,0,0,2785,21,21,2788,
0,0,2791,0,21,2794,0,0,2797,7,37,2800,19,0,2806,0,0,2812,0,0,2809,0,19,3040,
20,0,2815,0,20,2818,0,0,2821,24,24,2824,25,0,2827,0,24,2830,0,0,2833,22,22,
2836,0,0,2839,0,22,2842,0,0,2845,24,0,2851,0,0,2854,0,0,2866,22,22,2857,7,0,
2860,0,22,2863,0,0,2866,7,24,2869,24,0,2875,0,0,2878,0,0,2890,22,22,2881,7,0,
2884,0,22,2887,0,0,2890,24,24,2893,21,0,2896,0,24,2899,0,0,2902,23,23,2905,0,
0,2908,0,23,2911,0,0,2914,24,0,2920,0,0,2923,0,0,2935,23,23,2926,7,0,2929,0,
23,2932,0,0,2935,7,24,2938,24,0,2944,0,0,2947,0,0,2959,23,23,2950,7,0,2953,
0,23,2956,0,0,2959,22,0,2962,0,23,2965,0,0,2968,7,23,2971,22,22,2974,8,0,
2977,0,22,2980,0,0,2983,23,0,2989,0,0,2995,0,0,2992,0,23,3007,22,22,2998,0,
0,3001,0,22,3004,0,0,3007,22,0,3010,0,20,3013,0,0,3016,21,0,3019,0,21,3022,0,
0,3025,25,0,3028,0,25,3031,0,0,3034,8,19,3037,0,0,2800,25,25,3043,20,0,3046,
0,25,3049,0,0,3052,0,0,76,19,19,3058,10,0,3061,0,19,3064,0,0,3067,20,20,3070,
3085,3085,3073,37,0,3076,0,3085,3079,0,0,3082,21,21,3085,0,0,3088,0,21,3091,
0,0,3094,7,37,3097,19,0,3103,0,0,3109,0,0,3106,0,19,3343,20,0,3112,0,20,3115,
0,0,3118,24,24,3121,25,0,3124,0,24,3127,0,0,3130,22,22,3133,0,0,3136,0,22,
3139,0,0,3142,24,0,3148,0,0,3151,0,0,3163,22,22,3154,7,0,3157,0,22,3160,0,
0,3163,7,24,3166,24,0,3172,0,0,3175,0,0,3187,22,22,3178,7,0,3181,0,22,3184,
0,0,3187,24,24,3190,21,0,3193,0,24,3196,0,0,3199,23,23,3202,0,0,3205,0,23,
3208,0,0,3211,24,0,3217,0,0,3220,0,0,3232,23,23,3223,7,0,3226,0,23,3229,0,0,
3232,7,24,3235,24,0,3241,0,0,3244,0,0,3256,23,23,3247,7,0,3250,0,23,3253,0,
0,3256,22,0,3259,0,23,3262,0,0,3265,9,0,3268,0,23,3271,0,0,3274,22,22,3277,8,
0,3280,0,22,3283,0,0,3286,23,0,3292,0,0,3298,0,0,3295,0,23,3310,22,22,3301,0,
0,3304,0,22,3307,0,0,3310,22,0,3313,0,20,3316,0,0,3319,21,0,3322,0,21,3325,0,
0,3328,25,0,3331,0,25,3334,0,0,3337,8,19,3340,0,0,3097,25,25,3346,20,0,3349,
0,25,3352,0,0,3355,0,0,76,484,0,1060,484,1,1060,484,-1,1060,0,12546,43,232,
1060,6734,12546,45,226,1060,6744,11009,1135,1060,6754,11521,1090,1060,6762,
26886,30318,29285,116,238,1060,6770,25091,25977,220,1060,6784,25603,28789,652,
1060,6794,25604,28530,112,796,1060,6804,28420,25974,114,706,1060,6816,29444,
24951,112,565,1060,6828,23299,23872,262,1060,6840,23299,23841,289,1060,6850,
29443,16496,1258,1060,6860,29443,8560,1327,1060,6870,12290,62,2017,1060,6880,
12290,61,2059,1060,6890,12290,60,2128,1060,6900,27651,25203,1663,1060,6910,
15361,2200,1060,6920,15873,2266,1060,6928,12802,47,2338,1060,6936,28418,114,
2494,1060,6946,30723,29295,2758,1060,6956,24835,25710,3055,1060,6966,15366,
28005,29801,62,484,28,1060,6976,15365,25963,15993,484,26,1060,6992,15369,
26988,25972,24946,15980,484,30,1060,7006,15366,28515,25708,62,484,24,1060,
7024,15364,27503,62,484,32,1060,7040,15366,25445,28520,62,484,34,1060,7054,
26628,29285,101,484,26,262,1060,7070,25092,29537,101,484,58,1060,7086,25603,
27760,484,60,1060,7100,26627,25708,484,56,1060,7112,25090,108,484,32,1060,
7124,15875,28265,484,62,1060,7136,26627,30821,484,16,484,29,289,1060,7148,
25607,25445,28009,27745,484,10,484,29,289,1060,7166,29446,30063,25458,101,
484,32256,484,34,262,1060,7188,27652,29537,116,484,33,262,1060,7210,29445,
24948,25972,484,54,1060,7226,23809,3364,484,27,289,1060,7240,23361,3358,484,
27,289,1060,7254,28163,28777,565,796,1060,7268,29700,25461,107,565,706,1060,
7280,16132,30052,112,652,1867,3655,652,1060,7294,29187,29807,826,565,907,565,
1060,7312,11524,28530,116,3659,3659,1060,7328,12805,29284,28783,796,796,1060,
7342,12804,30052,112,706,706,1060,7356,12291,15676,2017,2059,1060,7370,12291,
15932,2059,2059,1060,7382,15617,1090,2059,1060,7394,15362,62,3699,2059,1060,
7404,15874,61,2200,2059,1060,7416,15362,61,2266,2059,1060,7428,12291,15678,
2128,2059,1060,7440,28166,26469,29793,101,226,238,1060,7452,29443,25662,652,
2128,1060,7468,24835,29538,3737,1867,3747,3731,1060,7480,12802,42,2326,1060,
7496,25348,27749,108,484,2,1060,7506,25349,27749,11116,3757,1135,1060,7520,
29954,60,3682,2128,2059,565,2128,2059,3705,826,2200,907,3705,1060,7534,29954,
62,565,3770,1060,7564,29955,15678,3770,2059,1060,7576,29955,15676,3785,2059,
1060,7588,10753,3682,3770,1867,3807,565,988,1060,7600,25863,25976,30051,25972,
2338,826,1060,7618,27396,31077,63,427,652,2128,1867,3829,796,3358,1060,3364,
1060,7634,27395,31077,484,13,262,3814,1867,3834,1060,7662,25860,26989,116,484,
14,262,3814,1060,7682,25346,114,484,13,3845,484,10,3845,1060,7700,16385,2338,
262,1060,7720,8449,2338,289,1060,7730,28676,25449,107,1258,1135,262,1060,7740,
11010,33,2338,3644,262,1135,565,289,1060,7756,27654,26739,26217,116,3651,1867,
3902,226,565,3751,565,1840,3893,1060,7776,29190,26739,26217,116,3651,1867,3917,
226,565,2338,565,1840,3908,1060,7806,25346,64,652,3862,565,1663,1867,3932,484,
8,3908,1840,3935,484,255,3055,1060,7836,25346,33,565,484,255,3055,652,484,
8,3893,2494,565,3644,652,3862,565,1663,2059,484,255,2758,826,706,2758,907,
3055,2758,565,3867,1060,7872,27907,30817,3682,2200,1867,3977,3637,1840,3978,
796,1060,7934,27907,28265,3682,2266,1867,3989,3637,1840,3990,796,1060,7958,
25349,30063,29806,652,232,565,3921,1060,7982,27655,26479,25449,27745,3694,
1867,4011,3361,1840,4012,3358,1060,8000,24839,26988,28263,25701,652,1663,
4005,1135,1060,8026,24837,26988,28263,3539,4018,484,26,289,1060,8046,11015,
29811,26994,26478,3361,706,3982,3659,706,1135,3659,3659,1090,1060,8066,29700,
28793,101,652,1867,4062,565,3995,3845,565,226,1840,4052,3675,1060,8096,25349,
28525,25974,826,1840,4079,826,652,3921,1174,3939,232,907,232,1528,4071,3675,
1060,8128,25603,9327,907,907,3751,652,3995,1135,4018,2338,826,565,826,1060,
8166,10243,10532,4086,1060,8196,11778,36,4086,3995,4052,1060,8206,29445,24944,
25955,3565,3845,1060,8220,25349,29793,26723,1258,826,484,32,262,826,1342,484,
32,289,3814,907,484,32,289,1252,3358,1060,8234,29701,29288,30575,3651,1867,
4160,484,32,262,1408,907,484,32,289,907,565,826,1327,796,907,1060,8278,29955,
11117,3682,1135,826,1174,3358,3711,826,3682,3055,2128,907,2494,826,2494,2128,
907,3055,238,232,907,565,1060,8322,25607,25966,24935,25972,238,826,238,3361,
4164,907,1135,1060,8372,25602,43,826,565,826,4164,907,1135,907,1135,1060,8398,
29955,10861,3358,565,484,15,826,652,4164,826,826,652,4164,907,1135,907,1867,
4235,826,706,4164,907,1135,1528,4219,3659,796,1060,8422,29958,12141,28525,100,
3651,2059,1867,4252,484,-10,4143,3682,3770,1867,4292,3731,484,15,826,826,652,
4164,826,826,652,4164,907,1135,652,907,1174,565,826,4164,907,2494,1867,4285,
826,796,232,907,1840,4286,796,907,1528,4260,796,565,1060,3675,796,3364,652,
1060,8480,27909,27951,25711,652,2128,652,826,1867,4311,3731,826,4191,907,826,
652,2128,1867,4318,1174,1135,907,4245,907,1867,4327,565,3731,565,1060,1060,
8594,12036,28525,100,706,2128,565,4301,1060,8656,27907,25711,4332,796,1060,
8674,12033,4332,3637,1060,8686,25605,28773,26740,484,36,262,1258,1090,226,
1060,8696,10246,28005,29801,41,394,1060,8718,10246,29284,28783,41,796,1060,
8732,25860,26723,111,484,17,262,3814,1060,8746,29699,28769,652,4377,706,3939,
232,1060,8764,27396,24948,112,652,652,484,13,3705,826,484,10,3705,907,3055,
1867,4439,652,484,8,3705,826,484,127,3705,907,3055,1867,4423,3565,4385,1060,
826,706,1174,2200,652,1867,4436,484,8,652,4377,4114,4377,907,1135,1060,796,
3637,652,1060,8782,24838,25443,28773,116,706,1135,706,3682,3705,1867,4470,
3834,652,3565,1090,484,95,3770,1867,4467,4385,1840,4468,4395,1840,4451,796,
706,1090,1060,8886,28933,25973,31090,484,32256,484,256,4448,484,68,3867,796,
3358,3571,3867,1060,8948,16134,25956,29808,104,4352,2266,1867,4503,484,-4,
4143,1060,8982,11529,29300,26977,26988,26478,826,1840,4524,3565,706,1174,
1135,3921,2200,1867,4524,907,232,1060,1528,4513,3358,1060,9008,27652,28527,
107,565,826,3659,3659,652,1867,4559,706,3921,1174,1090,1174,3565,3699,484,4,
3874,3814,1867,4556,1252,3659,796,1060,4038,1840,4536,1252,3659,796,1060,9056,
28168,11631,24941,25460,104,1867,4573,2017,1060,3694,1060,9126,27909,29793,
26723,4569,238,1060,9150,28677,29281,25971,826,3599,796,3571,3862,1135,484,
68,3862,3571,3862,1090,1174,826,706,907,565,826,826,1174,484,9138,4532,3682,
907,484,9158,4532,565,907,1090,826,1090,907,232,3571,3881,907,3565,3699,1867,
4629,4510,3358,3970,1060,9164,29446,24944,25955,115,652,2017,1867,4645,4114,
226,1840,4637,796,1060,9264,26628,27759,100,3364,3559,3881,3559,3862,3939,
1060,9294,8962,62,3675,3559,3862,484,32512,706,1090,1060,9316,25863,29816,
24946,29795,652,826,4245,907,565,826,4245,907,3659,1060,9338,25605,26473,
29801,484,9,706,2200,484,7,3055,1135,484,48,1135,1060,9368,8961,484,2,4496,
3358,3547,3862,4674,4688,4651,1060,9400,8962,115,4702,3682,2494,2059,1867,
4715,1060,9424,15362,35,484,32512,3559,3867,1060,9444,29444,26473,110,2128,
1867,4740,484,45,4651,1060,9460,29955,29230,826,3358,4725,4715,4661,907,706,
1090,4637,4052,1060,9482,29954,46,3358,4725,4715,4661,4114,4052,1060,9510,
11777,652,826,3743,3358,4725,4715,907,4734,4661,4114,4052,1060,9530,15879,
30062,25197,29285,3682,826,826,796,3921,3547,3862,826,484,48,1090,484,9,706,
2200,1867,4809,484,7,1090,652,484,10,2200,2494,652,907,3770,2059,1867,4819,
796,907,907,1060,565,3547,3862,4214,796,3659,3547,3862,4214,4202,907,907,
4038,652,2059,1867,4784,1060,9558,28167,28021,25954,16242,3364,3553,3867,
3547,3862,826,706,3921,484,45,3699,652,826,1867,4858,4038,706,3921,484,36,
3699,1867,4867,3577,4038,826,826,3358,652,907,907,4784,652,1867,4902,706,
3921,484,46,2758,1867,4894,3659,796,3659,907,3675,3358,907,3547,3867,1060,
226,3553,3867,232,3553,3862,1840,4873,3675,907,1867,4907,4191,907,3547,3867,
3364,1060,9674,25351,28015,24944,25970,3659,706,1090,3651,1867,4928,826,3675,
907,3637,1060,826,1840,4943,3995,3659,3995,3659,1090,3651,1867,4943,1252,
3637,3637,1060,1528,4931,3675,3358,1060,9824,11778,115,4352,826,1840,4958,
1174,3874,4767,1528,4955,1060,9896,28163,24934,3764,1060,9922,25347,24934,
4964,652,3921,484,31,3055,1135,3764,3757,3731,3055,1060,9932,24837,27756,
29807,4018,484,52,3881,1060,9962,11265,4027,3539,3867,3757,4985,1060,9980,
10246,26982,25710,41,565,826,652,652,1867,5039,652,4964,3995,484,159,3055,
1174,3995,4917,2059,1867,5034,1252,652,4964,484,64,565,3862,3055,3694,3361,
2494,3731,1060,3637,652,3862,1840,5006,3675,3358,907,3358,1060,9996,26116,
28265,100,3609,5003,3659,796,1060,10088,10249,26988,25972,24946,10604,3617,
3862,1867,5067,484,484,4992,4992,1060,10106,27719,29801,29285,27745,3509,
3862,3814,1060,10136,25352,28015,26992,25964,44,2338,4027,4992,1060,10154,
16134,28518,28277,100,1867,5095,1060,4114,3995,4052,484,63,3845,3853,484,
-13,4143,1060,10174,26889,29806,29285,29296,29797,5048,3651,1867,5144,3617,
3862,1867,5129,2017,1867,5126,4969,3814,1060,4969,5083,1060,796,652,4964,
3921,484,32,3055,1867,5141,484,-14,4143,4969,3814,1060,652,826,3995,4842,
1867,5167,1252,3553,3862,2128,1867,5159,796,1840,5165,3617,3862,1867,5164,
565,5073,5073,1060,907,3358,5092,1060,10212,30468,29295,100,4586,3539,652,
826,3682,3867,232,565,4068,907,1060,10342,30469,29295,29540,3609,652,4964,
3995,484,31,3055,4114,4052,3862,3651,2059,1867,5191,1060,10372,14849,4027,
3539,3609,4992,484,33,289,3565,5175,652,3921,2059,1867,5224,484,-10,4143,
3995,1135,484,26,289,4027,3622,484,-17730,1060,10410,15201,3629,484,-17730,
3705,1867,5245,484,-22,4143,484,1060,4992,1060,10468,25189,26469,28265,4027,
3539,1060,10498,30053,29806,27753,484,1867,4992,2338,4992,1060,10512,24933,
24935,28265,484,1840,4992,2338,4992,1060,10532,26978,102,484,1867,4992,3539,
3358,4992,1060,10552,29796,25960,110,3539,2338,565,3867,1060,10572,26211,
29295,484,826,4992,3539,1060,10590,28260,30821,116,484,1528,4992,2338,4992,
1060,10606,10049,3565,5175,5048,5092,4969,5073,1060,10626,25383,28015,26992,
25964,907,652,3751,3862,4992,232,826,1060,10644,29283,8560,5327,1408,1060,
10670,29283,16496,5327,1342,1060,10682,15970,114,5327,826,1060,10694,29282,
62,5327,907,1060,10706,29282,64,5327,1174,1060,10718,29285,29284,28783,5327,
1252,1060,10730,25956,27000,116,5327,1060,1060,10744,11874,34,5327,4106,484,
34,5175,3995,1135,484,26,289,4027,1060,10758,9314,34,5327,4101,484,34,5175,
3995,1135,484,26,289,4027,1060,10788,10305,484,41,4586,3675,1060,10818,23617,
3599,796,3862,484,31,289,1060,10832,26889,28013,25701,24937,25972,3609,4964,
3862,484,64,2494,3609,4964,3867,1060,10850,29443,25957,3565,5175,5048,5092,
3853,652,3862,484,1060,3705,1867,5462,652,3862,4758,3764,1840,5449,3862,4758,
1060,10882,25604,28021,112,4018,3651,1867,5483,565,652,3862,4767,3764,565,
3757,1090,1840,5470,796,1060,10930,25349,29547,28021,4018,652,484,-16162,
1090,826,3651,1867,5510,565,652,3862,907,1135,826,3764,565,3757,1090,1840,
5495,796,907,1060,10970,10244,27503,41,4106,8195,27503,3853,1060,11026,25860,
24950,108,3565,5175,652,3921,1867,5537,5112,3361,4496,1840,5526,796,484,16,
262,3814,1060,11044,26884,26222,111,3853,4106,16667,29813,28520,14962,8224,
26962,26723,29281,8292,24906,25965,8307,28488,25975,3853,4106,17694,24941,
27753,8250,8224,28520,25975,29230,27182,14382,16441,28007,26977,11884,28515,
109,3853,4106,21033,28773,14959,8224,8224,29800,28788,14963,12079,26983,
26740,25205,25390,28015,26671,30575,29285,12138,30067,27746,29029,3853,4106,
19494,25449,28261,25971,8250,26708,8293,28245,26988,25955,29550,8293,8239,
30032,27746,25449,17440,28015,26977,110,3853,1060,11086,26883,26990,3588,
3629,3358,484,31,289,3364,484,30,289,1060,11256,28932,26997,116,5631,484,3,
262,1663,1867,5658,484,8742,484,17,289,484,3,262,484,4,3055,1867,5676,4106,
25867,28486,29810,8296,12662,12846,3539,4767,3853,484,3,262,484,2,3055,1867,
5716,484,35,262,3751,652,3539,565,1090,5489,484,4,262,3705,1867,5707,4106,
25354,29547,28021,26144,26977,108,220,484,3,262,484,2,2758,484,3,289,484,16,
262,3814,4478,484,11052,4121,3651,1867,5734,4114,4767,484,63,3845,3853,5631,
1840,5720,1060,11284,25348,27759,100,484,12,262,3814,1060}; while(p>=0){int 
a=m[p++],b=m[p++],c=m[p++];a<0?m[b]=getchar():b<0?putchar(m[a]):(m[b]-=m[a])
<=0?p=c:0;}}