m𡤏←types, no𡤏ile := $other←types$, $other𡤌onsts$;

m𡤏←proc𡤊rray, m𡤏←proc𡤊rray←impl := mem;

(~TRAP) Define external versions of graphics routines.

(TRAP) Don't define external versions of graphics routines.

m𡤏←init, m𡤏←init←impl1 := bad, base←ident, base𡤏ile, init←terminal, get←strings←started, open�se𡤏ile, load�se𡤏ile, init←tab, init←prim;

m𡤏←init, m𡤏←init←impl2 := initialize;

m𡤏←interaction, m𡤏←interaction←impl := xord, xchr, name←of𡤏ile, name←length, buffer, first, last, max𡤋uf←stack, term←in, term←out, str←pool, str←start, pool←ptr, str←ptr, init←pool←ptr, init←str←ptr, max←pool←ptr, max←str←ptr, str←ref, pool𡤏ile, log𡤏ile, selector, dig, tally, term←offset, file←offset, trick𡤋uf, trick𡤌ount, first𡤌ount, interaction, deletions𡤊llowed, history, error𡤌ount, help←line, help←ptr, use𡤎rr←help, err←help, interrupt, ok←to←interrupt;

m𡤏←interaction, m𡤏←interaction←impl := slow←print, print←ln, print𡤌har, print, print←nl, print←the𡤍igs, print←int, print←scaled, print←two, print←type, begin𡤍iagnostic, end𡤍iagnostic, print𡤍iagnostic, flush←string, jump←out, error, fatal𡤎rror, overflow, confusion, make←string, str𡤎q𡤋uf, str←vs←str, print�, term←input, normalize←selector, pause𡤏or←instructions, missing𡤎rr, open←log𡤏ile;

m𡤏←math, m𡤏←math←impl1 := arith𡤎rror, two←to←the, spec←log, spec𡤊tan, n←sin, n𡤌os, randoms, j←random;

m𡤏←math, m𡤏←math←impl1 := clear𡤊rith, round�imals, make𡤏raction, take𡤏raction, take←scaled, make←scaled, velocity, ab←vs�, floor←scaled, floor←unscaled, round←unscaled;

m𡤏←math, m𡤏←math←impl2 := round𡤏raction, square←rt, pyth�, pyth←sub, m←log, m𡤎xp, n𡤊rg, n←sin𡤌os, new←randoms, init←randoms, unif←rand, norm←rand;

m𡤏←memory, m𡤏←memory←impl := temp←ptr, var←used, dyn←used, max←var←used, avail, mem𡤎nd, rover, lo←mem←max, hi←mem←min;

m𡤏←memory, m𡤏←memory←impl := get𡤊vail, get←node, free←node, sort𡤊vail, flush←list, flush←node←list;

m𡤏←symbols, m𡤏←symbols←impl1 := internal, int←name, int←ptr, old←setting, char𡤌lass, hash←used, st𡤌ount, hash, eqtb, big←node←size, save←ptr, g←pointer;

m𡤏←symbols, m𡤏←symbols←impl1 := show←token←list, runaway, print←op, fix�te𡤊nd←time, id←lookup, primitive, new←num←tok, flush←token←list, delete←mac←ref, print𡤌md←mod, print�psule, token←recycle;

m𡤏←symbols, m𡤏←symbols←impl2 := show←macro, init𡤋ig←node, id←transform, new←root, print←variable←name, new←structure, find←variable, flush�low←variable, flush←variable, und←type, clear←symbol, save←variable, save←internal, unsave, show𡤌md←mod, show𡤌ontext, interesting;

m𡤏←paths, m𡤏←paths←impl1 := path←tail, delta←x, delta←y, delta, psi, theta, uu, vv, ww, st, ct, sf, cf;

m𡤏←paths, m𡤏←paths←impl1 := toss←knot←list, null←path, print←path, copy←knot, copy←path, htap←ypoc, curl←ratio, set𡤌ontrols;

m𡤏←paths, m𡤏←paths←impl2 := make𡤌hoices, solve𡤌hoices;

m𡤏←moves, m𡤏←moves←impl := move, move←ptr, bisect←stack, bisect←ptr;

m𡤏←moves, m𡤏←moves←impl := make←moves, smooth←moves;

m𡤏�ges, m𡤏�ges←impl1 := cur�ges, cur←wt, trace←x, trace←y, trace←yy;

m𡤏�ges, m𡤏�ges←impl1 := toss�ges, init�ges, new�ges, print�ges, print←weight, fix←offset, edge←prep, copy�ges, negate�ges;

m𡤏�ges, m𡤏�ges←impl2 := y←reflect�ges, x←reflect�ges, y←scale�ges, x←scale�ges, xy←swap�ges;

m𡤏�ges, m𡤏�ges←impl3 := begin�ge←tracing, trace𡤊𡤌orner, end�ge←tracing, trace←new�ge, line�ges, move←to�ges;

m𡤏�ges, m𡤏�ges←impl4 := sort�ges, cull�ges, merge�ges, total←weight;

m𡤏←octants, m𡤏←octants←impl1 := cur←spec, cur←x, cur←y, turning←number, octant←number, octant𡤌ode, octant𡤍ir, max𡤊llowed, cur←pen, cur←path←type, rev←turns, cur←gran, cur←rounding←ptr, max←rounding←ptr, before, after, node←to←round;

m𡤏←octants, m𡤏←octants←impl1 := unrotate, rotate, crossing←point, print←spec, split𡤌ubic, unskew, abnegate, print←strange, compromise, good←val, before𡤊nd�ter, make←safe;

m𡤏←octants, m𡤏←octants←impl2 := remove𡤌ubic, new𡤋oundary;

m𡤏←octants, m𡤏←octants←impl3 := quadrant←subdivide;

m𡤏←octants, m𡤏←octants←impl4 := make←spec;

m𡤏←octants, m𡤏←octants←impl5 := xy←round, diag←round;

m𡤏←octants, m𡤏←octants←impl6 := octant←subdivide;

m𡤏𡤌ontours, m𡤏𡤌ontours←impl := x𡤌orr, y𡤌orr, xy𡤌orr, z𡤌orr, cur←m, cur←n, cur𡤍, cur�, octant, good1, good2, good3, m0, n0, m1, n1, x0, y0, x1, y1, d0, dd0, d1;

m𡤏𡤌ontours, m𡤏𡤌ontours←impl := skew, make←good, fill←spec;

m𡤏𡤎nvelopes, m𡤏𡤎nvelopes←impl1 := env←move, toss←pen, print←pen, dup←offset, make←pen, find←offset, trivial←knot, make←path, end←round;

m𡤏𡤎nvelopes, m𡤏𡤎nvelopes←impl2 := split𡤏or←offset, fin←offset←prep;

m𡤏𡤎nvelopes, m𡤏𡤎nvelopes←impl3 := fill𡤎nvelope;

m𡤏𡤎nvelopes, m𡤏𡤎nvelopes←impl4 := dual←moves;

m𡤏𡤎nvelopes, m𡤏𡤎nvelopes←impl5 := offset←prep, skew←line�ges, make𡤎llipse;

m𡤏←time, m𡤏←time←impl1 := cur←t, cur←tt, delx, dely, uv, xy, find𡤍irection←time, path←intersection, tol←step, time←to←go, tol, three←l;

m𡤏←time, m𡤏←time←impl2 := cubic←intersection;

m𡤏←time, m𡤏←time←impl3 := inter←subdivide;

m𡤏←screen, m𡤏←screen←impl := screen←started, screen←ok, window←open, left𡤌ol, right𡤌ol, top←row, bot←row, m←window, n←window, window←time, row←transition;

m𡤏←screen, m𡤏←screen←impl := open𡤊←window, disp�ges;

m𡤏𡤎quations, m𡤏𡤎quations←impl := fix←needed, watch𡤌oefs, dep𡤏inal;

m𡤏𡤎quations, m𡤏𡤎quations←impl := show←implied𡤎quation, ring�lete, print�pendency, max𡤌oef, p←plus𡤏q, p←plus←q, p←times←v, p←over←v, p←with←x�oming←q, fix�pendencies, new�p, linear𡤎q, new←ring𡤎ntry, nonlinear𡤎q, ring←merge, make←known, slow�, val←too𡤋ig;

m𡤏←input, m𡤏←input←impl1 := cur𡤌md, cur←mod, cur←sym, input←stack, input←ptr, max←in←stack, cur←input, in←open, input𡤏ile, line, line←stack, param←stack, param←ptr, max←param←stack, file←ptr, scanner←status, warning←info, force𡤎of, cond←ptr, if←limit, cur←if, if←line, loop←ptr, bg←loc, eg←loc;

m𡤏←input, m𡤏←input←impl1 := input←ln, begin←token←list, end←token←list, cur←tok, back←input, back𡤎rror, ins𡤎rror, begin𡤏ile←reading, end𡤏ile←reading, clear𡤏or𡤎rror←prompt, check←outer←validity, get←next, firm←up←the←line, scan←toks, get←symbol;

m𡤏←input, m𡤏←input←impl2 := get𡤌lear←symbol, check𡤎quals, make←op�, check�limiter, scan�lared←variable, scan�, read←toks, print←macro←name;

m𡤏←input, m𡤏←input←impl3 := print𡤊rg, macro�ll, get←x←next, stack𡤊rgument, pass←text, change←if←limit, check𡤌olon, conditional, bad𡤏or, begin←iteration, resume←iteration, stop←iteration, start←input, scan←text𡤊rg, expand;

m𡤏𡤏ile←names, m𡤏𡤏ile←names←impl := cur←name, cur𡤊rea, cur𡤎xt, area�limiter, ext�limiter, mf𡤊rea, job←name, log←name, gf𡤏ile, output𡤏ile←name;

m𡤏𡤏ile←names, m𡤏𡤏ile←names←impl := print𡤏ile←name, begin←name, more←name, end←name, pack𡤏ile←name, make←name←string, scan𡤏ile←name, pack←job←name, prompt𡤏ile←name;

m𡤏←parsing, m𡤏←parsing←impl1 := cur←type, cur𡤎xp, var𡤏lag, max𡤌, max←ptr, max←link, recycle←value, flush𡤌ur𡤎xp, flush𡤎rror, put←get𡤎rror, put←get𡤏lush𡤎rror, print𡤍p, stash𡤌ur𡤎xp, unstash𡤌ur𡤎xp, print𡤎xp, disp𡤎rr, bad𡤎xp, stash←in, back𡤎xpr, bad←subscript, obliterated, const�pendency, single�pendency, copy�p←list, new←knot;

m𡤏←parsing, m𡤏←parsing←impl2 := encapsulate, install, make𡤎xp𡤌opy, binary←mac, materialize←pen, known←pair, new𡤏ragment, fix𡤏ragment, scan←primary, scan←suffix, scan𡤍irection;

m𡤏←parsing, m𡤏←parsing←impl3 := scan←secondary, scan←tertiary, scan𡤎xpression, get𡤋oolean;

m𡤏←ops, m𡤏←ops←impl1 := txx, txy, tyx, tyy, tx, ty, start←sym, long←help←seen;

m𡤏←ops, m𡤏←ops←impl1 := do←nullary, nice←pair, print←known←or←unknown←type, bad←unary, negate�p←list, pair←to←path, take←part, str←to←num, path←length, test←known, do←unary;

m𡤏←ops, m𡤏←ops←impl2 := bilin1, add←mult�p, bilin2, bilin3, big←trans, cat, chop←string, chop←path, pair←value, set←up←offset, set←up𡤍irection←time;

m𡤏←ops, m𡤏←ops←impl3 := do←interim, do←let, do←new←internal, do←show, disp←token, do←show←token, do←show←stats, disp←var, do←show←var, do←show�pendencies, do←show←whatever, find�ges←var, do�←to;

m𡤏←ops, m𡤏←ops←impl4 := find←point, do𡤋inary, frac←mult, ship←out, try𡤎q, make𡤎q, do𡤎quation;

m𡤏←ops, m𡤏←ops←impl5 := tfm𡤌heck, do←ship←out, do𡤍isplay, get←pair, do←open←window, do𡤌ull, do←message, get𡤌ode, set←tag, do←tfm𡤌ommand, do←special, store�se𡤏ile, do←statement, scan←with;

m𡤏←ops, m𡤏←ops←impl6 := bad𡤋inary, dep𡤏inish, add←or←subtract, dep←mult, hard←times, dep𡤍iv, set←up←trans, set←up←known←trans, trans, path←trans, edges←trans, tarnished;

m𡤏←ops, m𡤏←ops←impl7 := do𡤊ssignment, do←type�laration, do←random←seed, do←protection, def�lims, boc𡤌, boc←p;

m𡤏←t𡤏←m, m𡤏←t𡤏←m←impl := tfm𡤏ile, metric𡤏ile←name, bc, ec, tfm←width, tfm←height, tfm�pth, tfm←ital𡤌orr, char𡤎xists, char←tag, char←remainder, header𡤋yte, lig←kern, nl, nk, ne, np, nw, nh, nd, ni, perturbation, dimen←head, max←tfm𡤍imen, tfm𡤌hanged, kern, exten, param;

m𡤏←t𡤏←m, m𡤏←t𡤏←m←impl := sort←in, min𡤌over, threshold, skimp, tfm←warning, fix𡤌heck←sum, fix�sign←size, tfm←two, tfm𡤏our, tfm←qqqq, dimen←out;

m𡤏←g𡤏, m𡤏←g𡤏←impl := gf←min←m, gf←max←m, gf←min←n, gf←max←n, gf←prev←ptr, total𡤌hars, char←ptr, gf←width, gf𡤋uf, half𡤋uf, gf←limit, gf←ptr, gf←offset, gf𡤎xt, gf𡤍x, gf𡤍y;

m𡤏←g𡤏, m𡤏←g𡤏←impl := write←gf, gf←swap, gf𡤏our, gf←two, gf←three, gf←paint, gf←new←row, gf←string, init←gf, gf𡤋oc;

m𡤏←rest, m𡤏𡤏inalize←impl := close𡤏iles𡤊nd←terminate, final𡤌leanup;

m𡤏←rest, m𡤏←main𡤌ontrol←impl := main𡤌ontrol;

m𡤏�ug, m𡤏�ug←impl := free, was𡤏ree, was←mem𡤎nd, was←lo←max, was←hi←min, panicking, check←mem, search←mem, debug←help, print←word;

m𡤏←rest, m𡤏←main := $other←vars$, $other←procs$;

m𡤏←types, m𡤏←main := $global←labels$, $main$;