This is MetaPost, C Version 0.632 (INIMP) 24 JAN 1997 11:13 **\input trap (trap.mp >> << == >> ::: ||`` ''--!! ??## && @@ $$[[]]{{ }}((5.5 0.5)) >> ".." ! Not implemented: (unknown numeric)++(string). ; l.4 ...}} . (( 5.5.5 )) ++ ".."; I'm afraid I don't know how to apply that operation to that combination of types. Continue, and I'll return the second argument (see above) as the result of the operation. .. ! Missing `=' has been inserted. , l.5 begingroup save =; let=, ; save,; newinternal $=,; let )... You should have said `let symbol = something'. But don't worry; I'll pretend that an equals sign was present. The next token I read will be `something'. > errorstopmode=errorstopmode > readstring=readstring > 2 > "2" > ,=, > (=tag > )=, << == >> ::: ||`` ''--!! ??## && @@ $$[[]]{{ }}(([][]))=numeric << == >> ::: ||`` ''--!! ??## && @@ $$[[]]{{ }}((5.5 0.5))=<< == >> ::: ||`` ''--!! ??## && @@ $$[[]]{{ }}((5.5 0.5)) > year=month ! OK. l.6 ...ring,2,"2",,,(,),<<,year; ! Missing `:' has been inserted. ; l.8 ...not cycle "":1.1 forever; fi; The next thing in this loop should have been a `:'. So I'll pretend that a colon was present; everything from here to `endfor' will be iterated. {fi} {exitif} {[repeat the loop]} {false} {fi} {exitif} {[repeat the loop]} {(2.1)>(2)} {true} {tracingcommands:=2.1} {showtoken} > |=:|>=|=:|> ! OK. l.9 ... endfor; showtoken |=:|>; ! Arithmetic overflow. l.10 ...acinglostchars:=1/.00001 ; tracingequations:=$+1; p~=t... Uh, oh. A little while ago one of the quantities that I was computing got too large, so I'm afraid your answers will be somewhat askew. You'll probably have to adopt different tactics next time. But I shall try to carry on anyway. {tracinglostchars:=32767.99998} {(0)+(1)} {tracingequations:=1} {(32767.99998)+(0.00002)} ! Arithmetic overflow. l.10 ...tracinglostchars+.00001; Uh, oh. A little while ago one of the quantities that I was computing got too large, so I'm afraid your answers will be somewhat askew. You'll probably have to adopt different tactics next time. But I shall try to carry on anyway. {(p~)=(32767.99998)} ## p~=32767.99998 {interim} {tracingmacros:=1} {tracingoutput:=1} {warningcheck:=1} {tracingstats:=1} {tracingchoices:=1} {tracingspecs:=1} {ASCII("")} {$:=-1} {$:=x} >> x ! Internal quantity `$' must receive a known value. ; l.12 ...os:=1; $:=ASCII""; $:=x; p~:=p~; I can't set an internal quantity to anything but a known numeric value, so I'll have to ignore this assignment. {p~:=32767.99998} ## p~=32767.99998 ! Value is too large (32767.99998). l.12 ...:=ASCII""; $:=x; p~:=p~; The equation I just processed has given some variable a value of 4096 or more. Continue and I'll try to cope with that big value; but it might be dangerous. (Set warningcheck:=0 to suppress this message.) {delimiters} {delimiters} {vardef} {def} foo(TEXT2)->begingroup(TEXT2)endgroup (SUFFIX0)<- (SUFFIX1)<-foo (TEXT2)<-interim.tracinglostchars:=(0.5;show.urcorner("flubo"infont"trap f"),2+2 {begingroup} {interim} ! Missing `)' has been inserted. ; ...nglostchars:=(0.5; show.urcorner("flubo"infont"t... foo->begingroup(TEXT2) endgroup l.17 ),2+2endtext ; for n=tracingspecs step 1 until $:fi end... I found no right delimiter to match a left one. So I've put one in, behind the scenes; this may fix the problem. {tracinglostchars:=0.5} {show} {("flubo")infont("trapf")} Missing character: There is no f in font trapf! Missing character: There is no l in font trapf! Missing character: There is no o in font trapf! {urcorner(picture)} >> (2.9888,7.97011) {(2)+(2)} >> 4 ! OK. endgroup l.17 ),2+2endtext ; for n=tracingspecs step 1 until $:fi end... {restoring tracinglostchars=32767.99998} {endgroup} {for} {showstats} Memory usage 292&42 (3418 still untouched) String usage 28&93 (1282&9362 now untouched) ! OK. l.17 ...l $:fi endfor showstats; {let} {path} {-(15)} {-(12)} Path at line 18, before choices: (0,0)..controls (15,4) and (-15,-12) ..(4,0) Path at line 18, after choices: (0,0)..controls (15,4) and (-15,-12) ..(4,0) {(unknown path p~)=(path)} {everyjob} {vardef} {let} {vardef} {def} {begingroup} {errorstopmode} {endgroup} {elseif} {endinput} {\} ) *dump Beginning to dump on file trap.mem (preloaded mem=trap 97.1.24) at most 1226 strings of total length 22670 398 memory locations dumped; current usage is 318&68 279 symbolic tokens