| blob | 503d14f658aef949369cc1ff8b514d444f8d50e6 |
1 %!PS-Adobe-2.0
2 %%Creator: dot version 2.2 (Wed May 18 03:22:07 UTC 2005)
3 %%For: (user)
4 %%Title: MaximaTopLevel
5 %%Pages: (atend)
6 %%BoundingBox: 35 35 991 911
7 %%EndComments
8 save
9 %%BeginProlog
10 /DotDict 200 dict def
11 DotDict begin
13 /setupLatin1 {
14 mark
15 /EncodingVector 256 array def
16 EncodingVector 0
18 ISOLatin1Encoding 0 255 getinterval putinterval
20 EncodingVector
21 dup 306 /AE
22 dup 301 /Aacute
23 dup 302 /Acircumflex
24 dup 304 /Adieresis
25 dup 300 /Agrave
26 dup 305 /Aring
27 dup 303 /Atilde
28 dup 307 /Ccedilla
29 dup 311 /Eacute
30 dup 312 /Ecircumflex
31 dup 313 /Edieresis
32 dup 310 /Egrave
33 dup 315 /Iacute
34 dup 316 /Icircumflex
35 dup 317 /Idieresis
36 dup 314 /Igrave
37 dup 334 /Udieresis
38 dup 335 /Yacute
39 dup 376 /thorn
40 dup 337 /germandbls
41 dup 341 /aacute
42 dup 342 /acircumflex
43 dup 344 /adieresis
44 dup 346 /ae
45 dup 340 /agrave
46 dup 345 /aring
47 dup 347 /ccedilla
48 dup 351 /eacute
49 dup 352 /ecircumflex
50 dup 353 /edieresis
51 dup 350 /egrave
52 dup 355 /iacute
53 dup 356 /icircumflex
54 dup 357 /idieresis
55 dup 354 /igrave
56 dup 360 /dcroat
57 dup 361 /ntilde
58 dup 363 /oacute
59 dup 364 /ocircumflex
60 dup 366 /odieresis
61 dup 362 /ograve
62 dup 365 /otilde
63 dup 370 /oslash
64 dup 372 /uacute
65 dup 373 /ucircumflex
66 dup 374 /udieresis
67 dup 371 /ugrave
68 dup 375 /yacute
69 dup 377 /ydieresis
71 % Set up ISO Latin 1 character encoding
72 /starnetISO {
73 dup dup findfont dup length dict begin
74 { 1 index /FID ne { def }{ pop pop } ifelse
75 } forall
76 /Encoding EncodingVector def
77 currentdict end definefont
78 } def
79 /Times-Roman starnetISO def
80 /Times-Italic starnetISO def
81 /Times-Bold starnetISO def
82 /Times-BoldItalic starnetISO def
83 /Helvetica starnetISO def
84 /Helvetica-Oblique starnetISO def
85 /Helvetica-Bold starnetISO def
86 /Helvetica-BoldOblique starnetISO def
87 /Courier starnetISO def
88 /Courier-Oblique starnetISO def
89 /Courier-Bold starnetISO def
90 /Courier-BoldOblique starnetISO def
91 cleartomark
92 } bind def
94 %%BeginResource: procset graphviz 0 0
95 /coord-font-family /Times-Roman def
96 /default-font-family /Times-Roman def
97 /coordfont coord-font-family findfont 8 scalefont def
99 /InvScaleFactor 1.0 def
100 /set_scale {
101 dup 1 exch div /InvScaleFactor exch def
102 dup scale
103 } bind def
105 % styles
106 /solid { [] 0 setdash } bind def
107 /dashed { [9 InvScaleFactor mul dup ] 0 setdash } bind def
108 /dotted { [1 InvScaleFactor mul 6 InvScaleFactor mul] 0 setdash } bind def
109 /invis {/fill {newpath} def /stroke {newpath} def /show {pop newpath} def} bind def
110 /bold { 2 setlinewidth } bind def
111 /filled { } bind def
112 /unfilled { } bind def
113 /rounded { } bind def
114 /diagonals { } bind def
116 % hooks for setting color
117 /nodecolor { sethsbcolor } bind def
118 /edgecolor { sethsbcolor } bind def
119 /graphcolor { sethsbcolor } bind def
120 /nopcolor {pop pop pop} bind def
122 /beginpage { % i j npages
123 /npages exch def
124 /j exch def
125 /i exch def
126 /str 10 string def
127 npages 1 gt {
128 gsave
129 coordfont setfont
130 0 0 moveto
131 (\() show i str cvs show (,) show j str cvs show (\)) show
132 grestore
133 } if
134 } bind def
136 /set_font {
137 findfont exch
138 scalefont setfont
139 } def
141 % draw aligned label in bounding box aligned to current point
142 /alignedtext { % width adj text
143 /text exch def
144 /adj exch def
145 /width exch def
146 gsave
147 width 0 gt {
148 text stringwidth pop adj mul 0 rmoveto
149 } if
150 [] 0 setdash
151 text show
152 grestore
153 } def
155 /boxprim { % xcorner ycorner xsize ysize
156 4 2 roll
157 moveto
158 2 copy
159 exch 0 rlineto
160 0 exch rlineto
161 pop neg 0 rlineto
162 closepath
163 } bind def
165 /ellipse_path {
166 /ry exch def
167 /rx exch def
168 /y exch def
169 /x exch def
170 matrix currentmatrix
171 newpath
172 x y translate
173 rx ry scale
174 0 0 1 0 360 arc
175 setmatrix
176 } bind def
178 /endpage { showpage } bind def
179 /showpage { } def
181 /layercolorseq
182 [ % layer color sequence - darkest to lightest
183 [0 0 0]
184 [.2 .8 .8]
185 [.4 .8 .8]
186 [.6 .8 .8]
187 [.8 .8 .8]
188 ]
189 def
191 /layerlen layercolorseq length def
193 /setlayer {/maxlayer exch def /curlayer exch def
194 layercolorseq curlayer 1 sub layerlen mod get
195 aload pop sethsbcolor
196 /nodecolor {nopcolor} def
197 /edgecolor {nopcolor} def
198 /graphcolor {nopcolor} def
199 } bind def
201 /onlayer { curlayer ne {invis} if } def
203 /onlayers {
204 /myupper exch def
205 /mylower exch def
206 curlayer mylower lt
207 curlayer myupper gt
208 or
209 {invis} if
210 } def
212 /curlayer 0 def
214 %%EndResource
215 %%EndProlog
216 %%BeginSetup
217 14 default-font-family set_font
218 1 setmiterlimit
219 % /arrowlength 10 def
220 % /arrowwidth 5 def
222 % make sure pdfmark is harmless for PS-interpreters other than Distiller
223 /pdfmark where {pop} {userdict /pdfmark /cleartomark load put} ifelse
224 % make '<<' and '>>' safe on PS Level 1 devices
225 /languagelevel where {pop languagelevel}{1} ifelse
226 2 lt {
227 userdict (<<) cvn ([) cvn load put
228 userdict (>>) cvn ([) cvn load put
229 } if
231 %%EndSetup
232 %%Page: 1 1
233 %%PageBoundingBox: 36 36 991 911
234 %%PageOrientation: Portrait
235 gsave
236 35 35 956 876 boxprim clip newpath
237 36 36 translate
238 0 0 1 beginpage
239 0 0 translate 0 rotate
240 0.000 0.000 0.000 graphcolor
241 14.00 /Times-Roman set_font
243 % startup
244 gsave 10 dict begin
245 392 856 38 18 ellipse_path
246 stroke
247 gsave 10 dict begin
248 366 851 moveto
249 (user::run)
250 [6.96 5.52 6.24 4.56 3.84 3.84 4.8 6.96 6.96]
251 xshow
252 end grestore
253 end grestore
255 % toplevel
256 gsave 10 dict begin
257 392 782 66 18 ellipse_path
258 stroke
259 gsave 10 dict begin
260 339 777 moveto
261 (macsyma-top-level)
262 [10.8 6.24 6.24 5.52 6.96 10.8 6.24 4.56 3.84 6.96 6.96 4.56 3.84 5.76 6.48 6.24 3.84]
263 xshow
264 end grestore
265 end grestore
267 % startup -> toplevel
268 newpath 392 838 moveto
269 392 829 392 820 392 810 curveto
270 stroke
271 gsave 10 dict begin
272 solid
273 1 setlinewidth
274 0.000 0.000 0.000 edgecolor
275 newpath 396 810 moveto
276 392 800 lineto
277 389 810 lineto
278 closepath
279 fill
280 0.000 0.000 0.000 edgecolor
281 newpath 396 810 moveto
282 392 800 lineto
283 389 810 lineto
284 closepath
285 stroke
286 end grestore
288 % replmain
289 gsave 10 dict begin
290 392 686 139 39 ellipse_path
291 stroke
292 gsave 10 dict begin
293 367 697 moveto
294 (continue)
295 [6.24 6.96 6.96 3.84 3.84 6.96 6.96 6.24]
296 xshow
297 312 681 moveto
298 (1. dbm-read parses the input)
299 [6.24 3.6 3.6 6.96 6.96 10.8 4.56 4.56 6.24 6.24 6.96 3.6 6.96 6.24 4.56 5.52 6.24 5.52 3.6 4.08 6.96 6.24 3.6 3.84 6.72 6.96 6.96 3.84]
300 xshow
301 272 665 moveto
302 (2. the eval path begins mathematical work.)
303 [6.96 3.6 3.6 4.08 6.96 6.24 3.6 5.76 6.72 6.24 3.84 3.6 6.96 6.24 4.08 6.96 3.6 6.96 6.24 6.96 3.84 6.96 5.52 3.6 10.8 6.24 4.08 6.96 6.24 10.8 6.24 3.84 3.84 6.24 6.24 3.84 3.6 9.6 6.96 4.32 6.96 3.6]
304 xshow
305 end grestore
306 end grestore
308 % toplevel -> replmain
309 newpath 392 764 moveto
310 392 756 392 746 392 736 curveto
311 stroke
312 gsave 10 dict begin
313 solid
314 1 setlinewidth
315 0.000 0.000 0.000 edgecolor
316 newpath 396 736 moveto
317 392 726 lineto
318 389 736 lineto
319 closepath
320 fill
321 0.000 0.000 0.000 edgecolor
322 newpath 396 736 moveto
323 392 726 lineto
324 389 736 lineto
325 closepath
326 stroke
327 end grestore
329 % dbmread
330 gsave 10 dict begin
331 159 558 40 18 ellipse_path
332 stroke
333 gsave 10 dict begin
334 132 553 moveto
335 (dbm-read)
336 [6.96 6.96 10.8 4.56 4.56 6.24 6.24 6.96]
337 xshow
338 end grestore
339 end grestore
341 % replmain -> dbmread
342 gsave 10 dict begin
343 0.000 1.000 1.000 edgecolor
344 newpath 273 666 moveto
345 230 656 188 643 173 628 curveto
346 163 617 160 601 158 586 curveto
347 stroke
348 gsave 10 dict begin
349 solid
350 1 setlinewidth
351 0.000 1.000 1.000 edgecolor
352 newpath 162 586 moveto
353 158 576 lineto
354 155 586 lineto
355 closepath
356 fill
357 0.000 1.000 1.000 edgecolor
358 newpath 162 586 moveto
359 158 576 lineto
360 155 586 lineto
361 closepath
362 stroke
363 end grestore
364 gsave 10 dict begin
365 10.00 /Times-Roman set_font
366 177 619 moveto
367 (Parse input)
368 [5.28 4.56 3.36 3.84 4.56 2.4 2.88 4.8 5.04 5.04 2.88]
369 xshow
370 end grestore
371 end grestore
373 % firstevalcall
374 gsave 10 dict begin
375 358 558 132 39 ellipse_path
376 stroke
377 gsave 10 dict begin
378 293 569 moveto
379 (toplevel-macsyma-eval)
380 [3.84 6.96 6.96 3.84 5.76 6.48 6.24 3.84 4.56 10.8 6.24 6.24 5.52 6.96 10.8 6.24 4.56 5.76 6.72 6.24 3.84]
381 xshow
382 274 553 moveto
383 (Used in code via $% as set in)
384 [10.08 5.52 6.24 6.96 3.6 3.84 6.96 3.6 6.24 6.96 6.96 6.24 3.6 6.96 3.84 6.24 3.6 6.96 11.76 3.6 6.24 5.52 3.6 5.52 6 3.84 3.6 3.84 6.96]
385 xshow
386 245 537 moveto
387 ( \(setq $% \(toplevel-macsyma-eval $__\)\))
388 [3.6 4.56 5.52 6 3.84 6.96 3.6 6.96 11.76 3.6 4.56 3.84 6.96 6.96 3.84 5.76 6.48 6.24 3.84 4.56 10.8 6.24 6.24 5.52 6.96 10.8 6.24 4.56 5.76 6.72 6.24 3.84 3.6 6.96 6.96 6.96 4.56 4.56]
389 xshow
390 end grestore
391 end grestore
393 % replmain -> firstevalcall
394 gsave 10 dict begin
395 0.000 1.000 1.000 edgecolor
396 newpath 378 646 moveto
397 376 640 374 634 372 628 curveto
398 370 621 368 615 367 608 curveto
399 stroke
400 gsave 10 dict begin
401 solid
402 1 setlinewidth
403 0.000 1.000 1.000 edgecolor
404 newpath 370 607 moveto
405 365 598 lineto
406 364 608 lineto
407 closepath
408 fill
409 0.000 1.000 1.000 edgecolor
410 newpath 370 607 moveto
411 365 598 lineto
412 364 608 lineto
413 closepath
414 stroke
415 end grestore
416 gsave 10 dict begin
417 10.00 /Times-Roman set_font
418 371 619 moveto
419 (Do eval)
420 [7.2 5.04 2.4 4.32 4.8 4.56 2.88]
421 xshow
422 end grestore
423 end grestore
425 % display
426 gsave 10 dict begin
427 665 558 122 28 ellipse_path
428 stroke
429 gsave 10 dict begin
430 648 561 moveto
431 (displa)
432 [6.96 3.84 5.52 6.96 3.84 6.24]
433 xshow
434 558 545 moveto
435 (Uses linear-displa if display2d is false)
436 [10.08 5.52 6.24 5.52 3.6 3.84 3.84 6.96 6.24 6.24 3.84 4.56 6.96 3.84 5.52 6.96 3.84 6.24 3.6 3.84 4.56 3.6 6.96 3.84 5.52 6.96 3.84 5.76 6.96 6.96 6.96 3.6 3.84 5.52 3.6 4.32 6.24 3.84 5.52 6.24]
437 xshow
438 end grestore
439 end grestore
441 % replmain -> display
442 gsave 10 dict begin
443 0.000 1.000 1.000 edgecolor
444 newpath 479 655 moveto
445 529 634 576 609 611 590 curveto
446 stroke
447 gsave 10 dict begin
448 solid
449 1 setlinewidth
450 0.000 1.000 1.000 edgecolor
451 newpath 613 593 moveto
452 620 585 lineto
453 610 587 lineto
454 closepath
455 fill
456 0.000 1.000 1.000 edgecolor
457 newpath 613 593 moveto
458 620 585 lineto
459 610 587 lineto
460 closepath
461 stroke
462 end grestore
463 gsave 10 dict begin
464 10.00 /Times-Roman set_font
465 555 619 moveto
466 (Send to display)
467 [5.52 4.56 5.04 5.04 2.4 2.88 5.04 2.4 5.04 2.88 3.84 5.04 2.88 4.32 5.04]
468 xshow
469 end grestore
470 end grestore
472 % dbmread -> replmain
473 gsave 10 dict begin
474 0.667 1.000 1.000 edgecolor
475 newpath 181 573 moveto
476 192 581 205 590 217 598 curveto
477 256 621 278 636 304 649 curveto
478 stroke
479 gsave 10 dict begin
480 solid
481 1 setlinewidth
482 0.667 1.000 1.000 edgecolor
483 newpath 302 652 moveto
484 313 653 lineto
485 305 646 lineto
486 closepath
487 fill
488 0.667 1.000 1.000 edgecolor
489 newpath 302 652 moveto
490 313 653 lineto
491 305 646 lineto
492 closepath
493 stroke
494 end grestore
495 gsave 10 dict begin
496 10.00 /Times-Roman set_font
497 268 619 moveto
498 (Return parsed input)
499 [6.48 4.56 2.88 5.04 3.6 5.04 2.4 5.04 4.56 3.36 3.84 4.56 5.04 2.4 2.88 4.8 5.04 5.04 2.88]
500 xshow
501 end grestore
502 end grestore
504 % mread
505 gsave 10 dict begin
506 143 462 30 18 ellipse_path
507 stroke
508 gsave 10 dict begin
509 125 457 moveto
510 (mread)
511 [10.8 4.56 6.24 6.24 6.96]
512 xshow
513 end grestore
514 end grestore
516 % dbmread -> mread
517 newpath 156 540 moveto
518 154 526 150 506 148 490 curveto
519 stroke
520 gsave 10 dict begin
521 solid
522 1 setlinewidth
523 0.000 0.000 0.000 edgecolor
524 newpath 151 489 moveto
525 146 480 lineto
526 145 490 lineto
527 closepath
528 fill
529 0.000 0.000 0.000 edgecolor
530 newpath 151 489 moveto
531 146 480 lineto
532 145 490 lineto
533 closepath
534 stroke
535 end grestore
537 % firstevalcall -> replmain
538 gsave 10 dict begin
539 0.667 1.000 1.000 edgecolor
540 newpath 400 596 moveto
541 403 601 406 607 409 616 curveto
542 411 623 412 630 411 637 curveto
543 stroke
544 gsave 10 dict begin
545 solid
546 1 setlinewidth
547 0.667 1.000 1.000 edgecolor
548 newpath 408 637 moveto
549 409 647 lineto
550 414 638 lineto
551 closepath
552 fill
553 0.667 1.000 1.000 edgecolor
554 newpath 408 637 moveto
555 409 647 lineto
556 414 638 lineto
557 closepath
558 stroke
559 end grestore
560 gsave 10 dict begin
561 10.00 /Times-Roman set_font
562 409 619 moveto
563 (Return)
564 [6.48 4.56 2.88 5.04 3.6 5.04]
565 xshow
566 end grestore
567 end grestore
569 % mevalmacro
570 gsave 10 dict begin
571 290 462 33 18 ellipse_path
572 stroke
573 gsave 10 dict begin
574 269 457 moveto
575 (meval*)
576 [10.8 5.76 6.72 6.24 3.84 6.96]
577 xshow
578 end grestore
579 end grestore
581 % firstevalcall -> mevalmacro
582 newpath 331 519 moveto
583 323 508 315 497 308 487 curveto
584 stroke
585 gsave 10 dict begin
586 solid
587 1 setlinewidth
588 0.000 0.000 0.000 edgecolor
589 newpath 311 485 moveto
590 302 479 lineto
591 305 489 lineto
592 closepath
593 fill
594 0.000 0.000 0.000 edgecolor
595 newpath 311 485 moveto
596 302 479 lineto
597 305 489 lineto
598 closepath
599 stroke
600 end grestore
602 % display -> replmain
603 gsave 10 dict begin
604 0.667 1.000 1.000 edgecolor
605 newpath 653 586 moveto
606 646 600 636 617 623 628 curveto
607 588 657 565 665 534 671 curveto
608 stroke
609 gsave 10 dict begin
610 solid
611 1 setlinewidth
612 0.667 1.000 1.000 edgecolor
613 newpath 533 668 moveto
614 524 673 lineto
615 534 674 lineto
616 closepath
617 fill
618 0.667 1.000 1.000 edgecolor
619 newpath 533 668 moveto
620 524 673 lineto
621 534 674 lineto
622 closepath
623 stroke
624 end grestore
625 gsave 10 dict begin
626 10.00 /Times-Roman set_font
627 632 619 moveto
628 (Return after display)
629 [6.48 4.56 2.88 5.04 3.6 5.04 2.4 4.56 3.36 2.88 4.56 3.36 2.4 5.04 2.88 3.84 5.04 2.88 4.32 5.04]
630 xshow
631 end grestore
632 end grestore
634 % checkrat
635 gsave 10 dict begin
636 569 462 36 18 ellipse_path
637 stroke
638 gsave 10 dict begin
639 545 457 moveto
640 (checkrat)
641 [6 6.96 6.24 6 6.96 4.56 6.24 3.84]
642 xshow
643 end grestore
644 end grestore
646 % display -> checkrat
647 newpath 637 530 moveto
648 623 516 606 499 592 485 curveto
649 stroke
650 gsave 10 dict begin
651 solid
652 1 setlinewidth
653 0.000 0.000 0.000 edgecolor
654 newpath 595 483 moveto
655 585 478 lineto
656 590 488 lineto
657 closepath
658 fill
659 0.000 0.000 0.000 edgecolor
660 newpath 595 483 moveto
661 585 478 lineto
662 590 488 lineto
663 closepath
664 stroke
665 end grestore
667 % dimension
668 gsave 10 dict begin
669 665 462 42 18 ellipse_path
670 stroke
671 gsave 10 dict begin
672 635 457 moveto
673 (dimension)
674 [6.96 3.84 10.8 6.24 6.96 5.52 3.84 6.96 6.96]
675 xshow
676 end grestore
677 end grestore
679 % display -> dimension
680 newpath 665 529 moveto
681 665 517 665 502 665 490 curveto
682 stroke
683 gsave 10 dict begin
684 solid
685 1 setlinewidth
686 0.000 0.000 0.000 edgecolor
687 newpath 669 490 moveto
688 665 480 lineto
689 662 490 lineto
690 closepath
691 fill
692 0.000 0.000 0.000 edgecolor
693 newpath 669 490 moveto
694 665 480 lineto
695 662 490 lineto
696 closepath
697 stroke
698 end grestore
700 % checkbreak
701 gsave 10 dict begin
702 894 388 45 18 ellipse_path
703 stroke
704 gsave 10 dict begin
705 862 383 moveto
706 (checkbreak)
707 [6 6.96 6.24 6 6.96 6.96 4.56 6.24 6.24 6.96]
708 xshow
709 end grestore
710 end grestore
712 % display -> checkbreak
713 newpath 685 530 moveto
714 705 504 735 468 769 444 curveto
715 783 434 821 417 852 405 curveto
716 stroke
717 gsave 10 dict begin
718 solid
719 1 setlinewidth
720 0.000 0.000 0.000 edgecolor
721 newpath 854 408 moveto
722 862 401 lineto
723 851 401 lineto
724 closepath
725 fill
726 0.000 0.000 0.000 edgecolor
727 newpath 854 408 moveto
728 862 401 lineto
729 851 401 lineto
730 closepath
731 stroke
732 end grestore
734 % output
735 gsave 10 dict begin
736 809 462 31 18 ellipse_path
737 stroke
738 gsave 10 dict begin
739 791 457 moveto
740 (output)
741 [6.96 6.96 3.84 6.96 6.96 3.84]
742 xshow
743 end grestore
744 end grestore
746 % display -> output
747 newpath 713 532 moveto
748 730 522 748 511 764 500 curveto
749 771 495 778 489 784 484 curveto
750 stroke
751 gsave 10 dict begin
752 solid
753 1 setlinewidth
754 0.000 0.000 0.000 edgecolor
755 newpath 787 486 moveto
756 792 477 lineto
757 782 481 lineto
758 closepath
759 fill
760 0.000 0.000 0.000 edgecolor
761 newpath 787 486 moveto
762 792 477 lineto
763 782 481 lineto
764 closepath
765 stroke
766 end grestore
768 % lineardisplay
769 gsave 10 dict begin
770 906 462 48 18 ellipse_path
771 stroke
772 gsave 10 dict begin
773 871 457 moveto
774 (linear-displa)
775 [3.84 3.84 6.96 6.24 6.24 3.84 4.56 6.96 3.84 5.52 6.96 3.84 6.24]
776 xshow
777 end grestore
778 end grestore
780 % display -> lineardisplay
781 newpath 757 539 moveto
782 801 522 844 499 872 482 curveto
783 stroke
784 gsave 10 dict begin
785 solid
786 1 setlinewidth
787 0.000 0.000 0.000 edgecolor
788 newpath 874 485 moveto
789 881 477 lineto
790 871 479 lineto
791 closepath
792 fill
793 0.000 0.000 0.000 edgecolor
794 newpath 874 485 moveto
795 881 477 lineto
796 871 479 lineto
797 closepath
798 stroke
799 end grestore
801 % mreadraw
802 gsave 10 dict begin
803 139 388 43 18 ellipse_path
804 stroke
805 gsave 10 dict begin
806 109 383 moveto
807 (mread-raw)
808 [10.8 4.56 6.24 6.24 6.96 4.56 4.56 5.76 10.08]
809 xshow
810 end grestore
811 end grestore
813 % mread -> mreadraw
814 newpath 142 444 moveto
815 141 435 141 426 141 416 curveto
816 stroke
817 gsave 10 dict begin
818 solid
819 1 setlinewidth
820 0.000 0.000 0.000 edgecolor
821 newpath 144 416 moveto
822 140 406 lineto
823 138 416 lineto
824 closepath
825 fill
826 0.000 0.000 0.000 edgecolor
827 newpath 144 416 moveto
828 140 406 lineto
829 138 416 lineto
830 closepath
831 stroke
832 end grestore
834 % peekonetokeng
835 gsave 10 dict begin
836 128 314 62 18 ellipse_path
837 stroke
838 gsave 10 dict begin
839 78 309 moveto
840 (peek-one-token-g)
841 [6.96 6.24 6.24 6 4.56 6.96 6.96 6.24 4.56 3.84 6.96 6.72 6.24 6.96 4.56 6.96]
842 xshow
843 end grestore
844 end grestore
846 % mreadraw -> peekonetokeng
847 newpath 136 370 moveto
848 135 361 133 352 132 342 curveto
849 stroke
850 gsave 10 dict begin
851 solid
852 1 setlinewidth
853 0.000 0.000 0.000 edgecolor
854 newpath 135 342 moveto
855 131 332 lineto
856 129 342 lineto
857 closepath
858 fill
859 0.000 0.000 0.000 edgecolor
860 newpath 135 342 moveto
861 131 332 lineto
862 129 342 lineto
863 closepath
864 stroke
865 end grestore
867 % scanonetokeng
868 gsave 10 dict begin
869 128 240 61 18 ellipse_path
870 stroke
871 gsave 10 dict begin
872 79 235 moveto
873 (scan-one-token-g)
874 [5.52 6.24 6.24 6.96 4.56 6.96 6.96 6.24 4.56 3.84 6.96 6.72 6.24 6.96 4.56 6.96]
875 xshow
876 end grestore
877 end grestore
879 % peekonetokeng -> scanonetokeng
880 newpath 128 296 moveto
881 128 287 128 278 128 268 curveto
882 stroke
883 gsave 10 dict begin
884 solid
885 1 setlinewidth
886 0.000 0.000 0.000 edgecolor
887 newpath 132 268 moveto
888 128 258 lineto
889 125 268 lineto
890 closepath
891 fill
892 0.000 0.000 0.000 edgecolor
893 newpath 132 268 moveto
894 128 258 lineto
895 125 268 lineto
896 closepath
897 stroke
898 end grestore
900 % readcommandtoken
901 gsave 10 dict begin
902 128 166 73 18 ellipse_path
903 stroke
904 gsave 10 dict begin
905 68 161 moveto
906 (read-command-token)
907 [4.56 6.24 6.24 6.96 4.56 6.24 6.96 10.8 10.8 6.24 6.96 6.96 4.56 3.84 6.96 6.72 6.24 6.96]
908 xshow
909 end grestore
910 end grestore
912 % scanonetokeng -> readcommandtoken
913 newpath 128 222 moveto
914 128 213 128 204 128 194 curveto
915 stroke
916 gsave 10 dict begin
917 solid
918 1 setlinewidth
919 0.000 0.000 0.000 edgecolor
920 newpath 132 194 moveto
921 128 184 lineto
922 125 194 lineto
923 closepath
924 fill
925 0.000 0.000 0.000 edgecolor
926 newpath 132 194 moveto
927 128 184 lineto
928 125 194 lineto
929 closepath
930 stroke
931 end grestore
933 % gobblewhitespace
934 gsave 10 dict begin
935 128 92 65 18 ellipse_path
936 stroke
937 gsave 10 dict begin
938 75 87 moveto
939 (gobble-whitespace)
940 [6.96 6.96 6.96 6.96 3.84 6.24 4.56 10.08 6.96 3.84 3.84 6.24 5.52 6.96 6.24 6.24 6.24]
941 xshow
942 end grestore
943 end grestore
945 % readcommandtoken -> gobblewhitespace
946 newpath 128 148 moveto
947 128 139 128 130 128 120 curveto
948 stroke
949 gsave 10 dict begin
950 solid
951 1 setlinewidth
952 0.000 0.000 0.000 edgecolor
953 newpath 132 120 moveto
954 128 110 lineto
955 125 120 lineto
956 closepath
957 fill
958 0.000 0.000 0.000 edgecolor
959 newpath 132 120 moveto
960 128 110 lineto
961 125 120 lineto
962 closepath
963 stroke
964 end grestore
966 % parsetyipeek
967 gsave 10 dict begin
968 51 18 51 18 ellipse_path
969 stroke
970 gsave 10 dict begin
971 12 13 moveto
972 (parse-tyipeek)
973 [6.96 6.24 4.56 5.52 6.24 4.56 3.84 6.96 3.84 6.96 6.24 6.24 6.96]
974 xshow
975 end grestore
976 end grestore
978 % gobblewhitespace -> parsetyipeek
979 newpath 110 74 moveto
980 99 65 87 53 76 42 curveto
981 stroke
982 gsave 10 dict begin
983 solid
984 1 setlinewidth
985 0.000 0.000 0.000 edgecolor
986 newpath 79 40 moveto
987 69 35 lineto
988 74 45 lineto
989 closepath
990 fill
991 0.000 0.000 0.000 edgecolor
992 newpath 79 40 moveto
993 69 35 lineto
994 74 45 lineto
995 closepath
996 stroke
997 end grestore
999 % readcommandtokenaux
1000 gsave 10 dict begin
1001 205 18 85 18 ellipse_path
1002 stroke
1003 gsave 10 dict begin
1004 132 13 moveto
1005 (read-command-token-aux)
1006 [4.56 6.24 6.24 6.96 4.56 6.24 6.96 10.8 10.8 6.24 6.96 6.96 4.56 3.84 6.96 6.72 6.24 6.96 4.56 6.24 6.96 6.96]
1007 xshow
1008 end grestore
1009 end grestore
1011 % gobblewhitespace -> readcommandtokenaux
1012 newpath 146 74 moveto
1013 156 65 168 53 179 43 curveto
1014 stroke
1015 gsave 10 dict begin
1016 solid
1017 1 setlinewidth
1018 0.000 0.000 0.000 edgecolor
1019 newpath 182 45 moveto
1020 187 36 lineto
1021 177 40 lineto
1022 closepath
1023 fill
1024 0.000 0.000 0.000 edgecolor
1025 newpath 182 45 moveto
1026 187 36 lineto
1027 177 40 lineto
1028 closepath
1029 stroke
1030 end grestore
1032 % meval
1033 gsave 10 dict begin
1034 239 388 30 18 ellipse_path
1035 stroke
1036 gsave 10 dict begin
1037 222 383 moveto
1038 (meval)
1039 [10.8 5.76 6.72 6.24 3.84]
1040 xshow
1041 end grestore
1042 end grestore
1044 % mevalmacro -> meval
1045 newpath 278 445 moveto
1046 272 436 264 424 257 413 curveto
1047 stroke
1048 gsave 10 dict begin
1049 solid
1050 1 setlinewidth
1051 0.000 0.000 0.000 edgecolor
1052 newpath 260 411 moveto
1053 251 405 lineto
1054 254 415 lineto
1055 closepath
1056 fill
1057 0.000 0.000 0.000 edgecolor
1058 newpath 260 411 moveto
1059 251 405 lineto
1060 254 415 lineto
1061 closepath
1062 stroke
1063 end grestore
1065 % simplifya
1066 gsave 10 dict begin
1067 247 314 39 18 ellipse_path
1068 stroke
1069 gsave 10 dict begin
1070 221 309 moveto
1071 (simplifya)
1072 [5.52 3.84 10.56 6.96 3.84 3.84 4.56 6.48 6.24]
1073 xshow
1074 end grestore
1075 end grestore
1077 % meval -> simplifya
1078 newpath 241 370 moveto
1079 242 361 243 352 244 342 curveto
1080 stroke
1081 gsave 10 dict begin
1082 solid
1083 1 setlinewidth
1084 0.000 0.000 0.000 edgecolor
1085 newpath 247 342 moveto
1086 245 332 lineto
1087 241 342 lineto
1088 closepath
1089 fill
1090 0.000 0.000 0.000 edgecolor
1091 newpath 247 342 moveto
1092 245 332 lineto
1093 241 342 lineto
1094 closepath
1095 stroke
1096 end grestore
1098 % meval1
1099 gsave 10 dict begin
1100 247 240 33 18 ellipse_path
1101 stroke
1102 gsave 10 dict begin
1103 226 235 moveto
1104 (meval1)
1105 [10.8 5.76 6.72 6.24 3.84 6.96]
1106 xshow
1107 end grestore
1108 end grestore
1110 % simplifya -> meval1
1111 newpath 247 296 moveto
1112 247 287 247 278 247 268 curveto
1113 stroke
1114 gsave 10 dict begin
1115 solid
1116 1 setlinewidth
1117 0.000 0.000 0.000 edgecolor
1118 newpath 251 268 moveto
1119 247 258 lineto
1120 244 268 lineto
1121 closepath
1122 fill
1123 0.000 0.000 0.000 edgecolor
1124 newpath 251 268 moveto
1125 247 258 lineto
1126 244 268 lineto
1127 closepath
1128 stroke
1129 end grestore
1131 % dimensionatom
1132 gsave 10 dict begin
1133 345 388 58 18 ellipse_path
1134 stroke
1135 gsave 10 dict begin
1136 299 383 moveto
1137 (dimension-atom)
1138 [6.96 3.84 10.8 6.24 6.96 5.52 3.84 6.96 6.96 4.56 6.24 3.84 6.96 10.8]
1139 xshow
1140 end grestore
1141 end grestore
1143 % dimension -> dimensionatom
1144 newpath 625 456 moveto
1145 620 452 619 447 612 444 curveto
1146 601 439 423 408 412 406 curveto
1147 407 405 403 404 398 402 curveto
1148 stroke
1149 gsave 10 dict begin
1150 solid
1151 1 setlinewidth
1152 0.000 0.000 0.000 edgecolor
1153 newpath 398 399 moveto
1154 388 400 lineto
1155 397 405 lineto
1156 closepath
1157 fill
1158 0.000 0.000 0.000 edgecolor
1159 newpath 398 399 moveto
1160 388 400 lineto
1161 397 405 lineto
1162 closepath
1163 stroke
1164 end grestore
1166 % dimensionparen
1167 gsave 10 dict begin
1168 481 388 60 18 ellipse_path
1169 stroke
1170 gsave 10 dict begin
1171 434 383 moveto
1172 (dimension-paren)
1173 [6.96 3.84 10.8 6.24 6.96 5.52 3.84 6.96 6.96 4.56 6.96 6.24 4.56 6.24 6.96]
1174 xshow
1175 end grestore
1176 end grestore
1178 % dimension -> dimensionparen
1179 newpath 631 451 moveto
1180 605 440 559 421 526 407 curveto
1181 stroke
1182 gsave 10 dict begin
1183 solid
1184 1 setlinewidth
1185 0.000 0.000 0.000 edgecolor
1186 newpath 527 403 moveto
1187 516 403 lineto
1188 524 410 lineto
1189 closepath
1190 fill
1191 0.000 0.000 0.000 edgecolor
1192 newpath 527 403 moveto
1193 516 403 lineto
1194 524 410 lineto
1195 closepath
1196 stroke
1197 end grestore
1199 % dimensionarray
1200 gsave 10 dict begin
1201 618 388 59 18 ellipse_path
1202 stroke
1203 gsave 10 dict begin
1204 572 383 moveto
1205 (dimension-array)
1206 [6.96 3.84 10.8 6.24 6.96 5.52 3.84 6.96 6.96 4.56 6.24 5.04 4.56 5.76 6.96]
1207 xshow
1208 end grestore
1209 end grestore
1211 % dimension -> dimensionarray
1212 newpath 654 444 moveto
1213 650 439 646 432 642 426 curveto
1214 640 422 637 418 635 414 curveto
1215 stroke
1216 gsave 10 dict begin
1217 solid
1218 1 setlinewidth
1219 0.000 0.000 0.000 edgecolor
1220 newpath 638 412 moveto
1221 629 406 lineto
1222 632 416 lineto
1223 closepath
1224 fill
1225 0.000 0.000 0.000 edgecolor
1226 newpath 638 412 moveto
1227 629 406 lineto
1228 632 416 lineto
1229 closepath
1230 stroke
1231 end grestore
1233 % dimensionfunction
1234 gsave 10 dict begin
1235 763 388 68 18 ellipse_path
1236 stroke
1237 gsave 10 dict begin
1238 708 383 moveto
1239 (dimension-function)
1240 [6.96 3.84 10.8 6.24 6.96 5.52 3.84 6.96 6.96 4.56 4.56 6.96 6.96 6.24 3.84 3.84 6.96 6.96]
1241 xshow
1242 end grestore
1243 end grestore
1245 % dimension -> dimensionfunction
1246 newpath 670 444 moveto
1247 675 437 682 430 689 424 curveto
1248 696 418 705 413 713 408 curveto
1249 stroke
1250 gsave 10 dict begin
1251 solid
1252 1 setlinewidth
1253 0.000 0.000 0.000 edgecolor
1254 newpath 715 411 moveto
1255 722 403 lineto
1256 712 405 lineto
1257 closepath
1258 fill
1259 0.000 0.000 0.000 edgecolor
1260 newpath 715 411 moveto
1261 722 403 lineto
1262 712 405 lineto
1263 closepath
1264 stroke
1265 end grestore
1267 % dimension -> checkbreak
1268 newpath 691 448 moveto
1269 705 439 714 431 736 424 curveto
1270 780 408 794 417 840 406 curveto
1271 843 405 847 404 850 403 curveto
1272 stroke
1273 gsave 10 dict begin
1274 solid
1275 1 setlinewidth
1276 0.000 0.000 0.000 edgecolor
1277 newpath 851 406 moveto
1278 860 400 lineto
1279 849 400 lineto
1280 closepath
1281 fill
1282 0.000 0.000 0.000 edgecolor
1283 newpath 851 406 moveto
1284 860 400 lineto
1285 849 400 lineto
1286 closepath
1287 stroke
1288 end grestore
1290 % dimensionfunction -> dimension
1291 newpath 736 405 moveto
1292 726 410 716 417 707 424 curveto
1293 702 428 697 433 692 438 curveto
1294 stroke
1295 gsave 10 dict begin
1296 solid
1297 1 setlinewidth
1298 0.000 0.000 0.000 edgecolor
1299 newpath 689 436 moveto
1300 685 446 lineto
1301 694 441 lineto
1302 closepath
1303 fill
1304 0.000 0.000 0.000 edgecolor
1305 newpath 689 436 moveto
1306 685 446 lineto
1307 694 441 lineto
1308 closepath
1309 stroke
1310 end grestore
1311 endpage
1312 showpage
1313 grestore
1314 %%PageTrailer
1315 %%EndPage: 1
1316 %%Trailer
1317 %%Pages: 1
1318 end
1319 restore
1320 %%EOF