home *** CD-ROM | disk | FTP | other *** search
open in: 
MacOS 8.1
|
Win98
|
DOS
browse contents |
view JSON data
|
view as text
This file was processed as: LaTeX Document
(document/latex).
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| dexvert
| LaTeX Document (document/latex)
| magic
| Supported |
| 100%
| dexvert
| Texinfo Document (document/texInfo)
| magic
| Supported |
| 1%
| dexvert
| DirectMusic Style (music/directMusicStyle)
| ext
| Unsupported |
| 1%
| dexvert
| Microsoft Word Style Sheet (other/microsoftWordStyleSheet)
| ext
| Unsupported |
| 1%
| dexvert
| Grand Theft Auto 2 Style data (other/grandTheftAuto2StyleData)
| ext
| Unsupported |
| 1%
| dexvert
| KORG File (other/korgFile)
| ext
| Unsupported |
| 1%
| dexvert
| MAGIX music studio Style (other/magixMusicStudioStyle)
| ext
| Unsupported |
| 1%
| dexvert
| Text File (text/txt)
| fallback
| Supported |
| 100%
| file
| LaTeX document text
| default
| |
| 99%
| file
| TeX document, ASCII text
| default
| |
| 100%
| checkBytes
| Printable ASCII
| default
| |
| 100%
| perlTextCheck
| Likely Text (Perl)
| default
| |
| 100%
| detectItEasy
| Format: plain text[LF]
| default (weak)
| |
| 100%
| xdgMime
| text/x-matlab
| default (weak)
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 25 20 50 73 66 69 67 2f | 54 65 58 20 0a 5c 64 65 |% Psfig/|TeX .\de|
|00000010| 66 5c 50 73 66 69 67 56 | 65 72 73 69 6f 6e 7b 31 |f\PsfigV|ersion{1|
|00000020| 2e 31 30 7d 0a 5c 64 65 | 66 5c 73 65 74 44 72 69 |.10}.\de|f\setDri|
|00000030| 76 65 72 7b 5c 44 76 69 | 70 73 44 72 69 76 65 72 |ver{\Dvi|psDriver|
|00000040| 7d 20 25 20 5c 44 76 69 | 70 73 44 72 69 76 65 72 |} % \Dvi|psDriver|
|00000050| 20 6f 72 20 5c 4f 7a 54 | 65 58 44 72 69 76 65 72 | or \OzT|eXDriver|
|00000060| 0a 25 0a 25 20 41 6c 6c | 20 73 6f 66 74 77 61 72 |.%.% All| softwar|
|00000070| 65 2c 20 64 6f 63 75 6d | 65 6e 74 61 74 69 6f 6e |e, docum|entation|
|00000080| 2c 20 61 6e 64 20 72 65 | 6c 61 74 65 64 20 66 69 |, and re|lated fi|
|00000090| 6c 65 73 20 69 6e 20 74 | 68 69 73 20 64 69 73 74 |les in t|his dist|
|000000a0| 72 69 62 75 74 69 6f 6e | 20 6f 66 0a 25 20 70 73 |ribution| of.% ps|
|000000b0| 66 69 67 2f 74 65 78 20 | 61 72 65 20 43 6f 70 79 |fig/tex |are Copy|
|000000c0| 72 69 67 68 74 20 31 39 | 39 33 20 54 72 65 76 6f |right 19|93 Trevo|
|000000d0| 72 20 4a 2e 20 44 61 72 | 72 65 6c 6c 0a 25 0a 25 |r J. Dar|rell.%.%|
|000000e0| 20 50 65 72 6d 69 73 73 | 69 6f 6e 20 69 73 20 67 | Permiss|ion is g|
|000000f0| 72 61 6e 74 65 64 20 66 | 6f 72 20 75 73 65 20 61 |ranted f|or use a|
|00000100| 6e 64 20 6e 6f 6e 2d 70 | 72 6f 66 69 74 20 64 69 |nd non-p|rofit di|
|00000110| 73 74 72 69 62 75 74 69 | 6f 6e 20 6f 66 20 70 73 |stributi|on of ps|
|00000120| 66 69 67 2f 74 65 78 20 | 0a 25 20 70 72 6f 76 69 |fig/tex |.% provi|
|00000130| 64 69 6e 67 20 74 68 61 | 74 20 74 68 69 73 20 6e |ding tha|t this n|
|00000140| 6f 74 69 63 65 20 69 73 | 20 63 6c 65 61 72 6c 79 |otice is| clearly|
|00000150| 20 6d 61 69 6e 74 61 69 | 6e 65 64 2e 20 54 68 65 | maintai|ned. The|
|00000160| 20 72 69 67 68 74 20 74 | 6f 0a 25 20 64 69 73 74 | right t|o.% dist|
|00000170| 72 69 62 75 74 65 20 61 | 6e 79 20 70 6f 72 74 69 |ribute a|ny porti|
|00000180| 6f 6e 20 6f 66 20 70 73 | 66 69 67 2f 74 65 78 20 |on of ps|fig/tex |
|00000190| 66 6f 72 20 70 72 6f 66 | 69 74 20 6f 72 20 61 73 |for prof|it or as|
|000001a0| 20 70 61 72 74 20 6f 66 | 20 61 6e 79 20 63 6f 6d | part of| any com|
|000001b0| 6d 65 72 63 69 61 6c 0a | 25 20 70 72 6f 64 75 63 |mercial.|% produc|
|000001c0| 74 20 69 73 20 73 70 65 | 63 69 66 69 63 61 6c 6c |t is spe|cificall|
|000001d0| 79 20 72 65 73 65 72 76 | 65 64 20 66 6f 72 20 74 |y reserv|ed for t|
|000001e0| 68 65 20 61 75 74 68 6f | 72 28 73 29 20 6f 66 20 |he autho|r(s) of |
|000001f0| 74 68 61 74 20 70 6f 72 | 74 69 6f 6e 2e 0a 25 0a |that por|tion..%.|
|00000200| 25 20 54 6f 20 75 73 65 | 20 77 69 74 68 20 4c 61 |% To use| with La|
|00000210| 54 65 58 2c 20 75 73 65 | 20 5c 64 6f 63 75 6d 65 |TeX, use| \docume|
|00000220| 6e 74 73 74 79 6c 65 5b | 70 73 66 69 67 2c 2e 2e |ntstyle[|psfig,..|
|00000230| 2e 5d 7b 2e 2e 2e 7d 0a | 25 20 54 6f 20 75 73 65 |.]{...}.|% To use|
|00000240| 20 77 69 74 68 20 54 65 | 58 2c 20 75 73 65 20 5c | with Te|X, use \|
|00000250| 69 6e 70 75 74 20 70 73 | 66 69 67 2e 73 74 79 0a |input ps|fig.sty.|
|00000260| 25 0a 25 20 42 75 67 73 | 20 61 6e 64 20 69 6d 70 |%.% Bugs| and imp|
|00000270| 72 6f 76 65 6d 65 6e 74 | 73 20 74 6f 20 74 72 65 |rovement|s to tre|
|00000280| 76 6f 72 40 6d 65 64 69 | 61 2e 6d 69 74 2e 65 64 |vor@medi|a.mit.ed|
|00000290| 75 2e 0a 25 0a 25 20 54 | 68 61 6e 6b 73 20 74 6f |u..%.% T|hanks to|
|000002a0| 20 4e 65 64 20 42 61 74 | 63 68 65 6c 64 65 72 2c | Ned Bat|chelder,|
|000002b0| 20 47 72 65 67 20 48 61 | 67 65 72 20 28 47 44 48 | Greg Ha|ger (GDH|
|000002c0| 29 2c 20 4a 2e 20 44 61 | 6e 69 65 6c 20 53 6d 69 |), J. Da|niel Smi|
|000002d0| 74 68 20 28 4a 44 53 29 | 2c 0a 25 20 54 6f 6d 20 |th (JDS)|,.% Tom |
|000002e0| 52 6f 6b 69 63 6b 69 20 | 28 54 52 29 2c 20 52 6f |Rokicki |(TR), Ro|
|000002f0| 62 65 72 74 20 52 75 73 | 73 65 6c 6c 20 28 52 52 |bert Rus|sell (RR|
|00000300| 29 2c 20 47 65 6f 72 67 | 65 20 56 2e 20 52 65 69 |), Georg|e V. Rei|
|00000310| 6c 6c 79 20 28 47 56 52 | 29 2c 0a 25 20 4b 65 6e |lly (GVR|),.% Ken|
|00000320| 20 4d 63 47 6c 6f 74 68 | 6c 65 6e 20 28 4b 48 43 | McGloth|len (KHC|
|00000330| 29 2c 20 42 61 72 6f 6e | 20 47 72 65 79 20 28 42 |), Baron| Grey (B|
|00000340| 47 29 2c 20 47 65 72 68 | 61 72 64 20 54 6f 62 65 |G), Gerh|ard Tobe|
|00000350| 72 6d 61 6e 6e 20 28 47 | 54 29 2e 0a 25 20 61 6e |rmann (G|T)..% an|
|00000360| 64 20 61 6c 6c 20 6f 74 | 68 65 72 73 20 77 68 6f |d all ot|hers who|
|00000370| 20 68 61 76 65 20 63 6f | 6e 74 72 69 62 75 74 65 | have co|ntribute|
|00000380| 64 20 63 6f 64 65 20 61 | 6e 64 20 63 6f 6d 6d 65 |d code a|nd comme|
|00000390| 6e 74 73 20 74 6f 20 74 | 68 69 73 20 70 72 6f 6a |nts to t|his proj|
|000003a0| 65 63 74 21 0a 25 0a 25 | 20 3d 3d 3d 3d 3d 3d 3d |ect!.%.%| =======|
|000003b0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000003c0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000003d0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000003e0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 0a |========|=======.|
|000003f0| 25 20 4d 6f 64 69 66 69 | 63 61 74 69 6f 6e 20 48 |% Modifi|cation H|
|00000400| 69 73 74 6f 72 79 3a 0a | 25 0a 25 20 20 39 20 4f |istory:.|%.% 9 O|
|00000410| 63 74 20 31 39 39 30 20 | 20 20 4a 44 53 09 75 73 |ct 1990 | JDS.us|
|00000420| 65 64 20 6d 6f 72 65 20 | 72 6f 62 75 73 74 20 62 |ed more |robust b|
|00000430| 62 6f 78 20 72 65 61 64 | 69 6e 67 20 63 6f 64 65 |box read|ing code|
|00000440| 20 66 72 6f 6d 20 54 6f | 6d 20 52 6f 6b 69 63 6b | from To|m Rokick|
|00000450| 69 0a 25 20 32 39 20 4d | 61 72 20 31 39 39 31 20 |i.% 29 M|ar 1991 |
|00000460| 20 20 4a 44 53 09 69 6d | 70 6c 65 6d 65 6e 74 65 | JDS.im|plemente|
|00000470| 64 20 72 6f 74 61 74 69 | 6f 6e 3d 20 6f 70 74 69 |d rotati|on= opti|
|00000480| 6f 6e 0a 25 20 32 35 20 | 4a 75 6e 20 31 39 39 31 |on.% 25 |Jun 1991|
|00000490| 20 20 20 52 52 09 69 66 | 20 62 62 20 73 70 65 63 | RR.if| bb spec|
|000004a0| 69 66 69 65 64 20 6f 6e | 20 63 6d 64 20 6c 69 6e |ified on| cmd lin|
|000004b0| 65 20 64 6f 6e 27 74 20 | 63 68 65 63 6b 0a 25 09 |e don't |check.%.|
|000004c0| 09 09 66 6f 72 20 2e 70 | 73 20 66 69 6c 65 2e 0a |..for .p|s file..|
|000004d0| 25 20 20 33 20 4a 75 6c | 20 31 39 39 31 09 4a 44 |% 3 Jul| 1991.JD|
|000004e0| 53 09 63 68 65 63 6b 20 | 69 66 20 66 69 6c 65 20 |S.check |if file |
|000004f0| 61 6c 72 65 61 64 79 20 | 72 65 61 64 20 69 6e 20 |already |read in |
|00000500| 6f 6e 63 65 0a 25 20 20 | 34 20 53 65 70 20 31 39 |once.% |4 Sep 19|
|00000510| 39 31 09 4a 44 53 09 66 | 69 78 65 64 20 69 6e 63 |91.JDS.f|ixed inc|
|00000520| 6f 72 72 65 63 74 20 63 | 6f 6d 70 75 74 61 74 69 |orrect c|omputati|
|00000530| 6f 6e 20 6f 66 20 72 6f | 74 61 74 65 64 0a 25 09 |on of ro|tated.%.|
|00000540| 09 09 62 6f 75 6e 64 69 | 6e 67 20 62 6f 78 0a 25 |..boundi|ng box.%|
|00000550| 20 32 35 20 53 65 70 20 | 31 39 39 31 09 47 56 52 | 25 Sep |1991.GVR|
|00000560| 09 65 78 70 61 6e 64 65 | 64 20 73 79 6e 6f 70 73 |.expande|d synops|
|00000570| 69 73 20 6f 66 20 5c 70 | 73 66 69 67 0a 25 20 31 |is of \p|sfig.% 1|
|00000580| 34 20 4f 63 74 20 31 39 | 39 31 09 4a 44 53 09 5c |4 Oct 19|91.JDS.\|
|00000590| 66 62 6f 78 20 63 6f 64 | 65 20 66 72 6f 6d 20 4c |fbox cod|e from L|
|000005a0| 61 54 65 58 20 73 6f 20 | 5c 70 73 64 72 61 66 74 |aTeX so |\psdraft|
|000005b0| 20 77 6f 72 6b 73 20 77 | 69 74 68 20 54 65 58 0a | works w|ith TeX.|
|000005c0| 25 09 09 09 63 68 61 6e | 67 65 64 20 5c 74 79 70 |%...chan|ged \typ|
|000005d0| 65 6f 75 74 20 74 6f 20 | 5c 70 73 40 74 79 70 65 |eout to |\ps@type|
|000005e0| 6f 75 74 0a 25 20 31 37 | 20 4f 63 74 20 31 39 39 |out.% 17| Oct 199|
|000005f0| 31 09 4a 44 53 09 61 64 | 64 65 64 20 5c 70 73 73 |1.JDS.ad|ded \pss|
|00000600| 63 61 6c 65 66 69 72 73 | 74 20 61 6e 64 20 5c 70 |calefirs|t and \p|
|00000610| 73 72 6f 74 61 74 65 66 | 69 72 73 74 0a 25 20 32 |srotatef|irst.% 2|
|00000620| 33 20 4a 75 6e 20 31 39 | 39 33 20 20 20 4b 48 43 |3 Jun 19|93 KHC|
|00000630| 20 20 20 20 20 60 60 64 | 6f 63 6c 69 70 27 27 20 | ``d|oclip'' |
|00000640| 6d 75 73 74 20 61 70 70 | 65 61 72 20 62 65 66 6f |must app|ear befo|
|00000650| 72 65 20 60 60 72 6f 74 | 61 74 65 27 27 0a 25 20 |re ``rot|ate''.% |
|00000660| 32 37 20 4f 63 74 20 31 | 39 39 33 20 20 20 54 4a |27 Oct 1|993 TJ|
|00000670| 44 09 72 65 6d 6f 76 65 | 64 20 70 72 69 6e 74 69 |D.remove|d printi|
|00000680| 6e 67 20 6f 66 20 66 69 | 6c 65 6e 61 6d 65 20 74 |ng of fi|lename t|
|00000690| 6f 20 61 76 6f 69 64 20 | 0a 25 09 09 09 75 6e 64 |o avoid |.%...und|
|000006a0| 65 72 73 63 6f 72 65 20 | 70 72 6f 62 6c 65 6d 73 |erscore |problems|
|000006b0| 2e 20 63 68 61 6e 67 65 | 64 20 5c 66 72 61 6d 65 |. change|d \frame|
|000006c0| 20 74 6f 20 5c 66 62 6f | 78 2e 0a 25 09 09 09 41 | to \fbo|x..%...A|
|000006d0| 64 64 65 64 20 4f 7a 54 | 65 58 20 73 75 70 70 6f |dded OzT|eX suppo|
|000006e0| 72 74 20 66 72 6f 6d 20 | 42 47 2e 20 41 64 64 65 |rt from |BG. Adde|
|000006f0| 64 20 6e 65 77 0a 25 09 | 09 09 66 69 67 75 72 65 |d new.%.|..figure|
|00000700| 20 73 65 61 72 63 68 20 | 70 61 74 68 20 63 6f 64 | search |path cod|
|00000710| 65 20 66 72 6f 6d 20 47 | 54 2e 0a 25 0a 25 20 3d |e from G|T..%.% =|
|00000720| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000730| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000740| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000750| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000760| 3d 3d 3d 3d 3d 0a 25 0a | 25 20 43 6f 6d 6d 61 6e |=====.%.|% Comman|
|00000770| 64 20 73 79 6e 6f 70 73 | 69 73 3a 0a 25 0a 25 20 |d synops|is:.%.% |
|00000780| 5c 70 73 64 72 61 66 74 | 09 64 72 61 77 73 20 61 |\psdraft|.draws a|
|00000790| 6e 20 6f 75 74 6c 69 6e | 65 20 62 6f 78 2c 20 62 |n outlin|e box, b|
|000007a0| 75 74 20 64 6f 65 73 6e | 27 74 20 69 6e 63 6c 75 |ut doesn|'t inclu|
|000007b0| 64 65 20 74 68 65 20 66 | 69 67 75 72 65 0a 25 09 |de the f|igure.%.|
|000007c0| 09 69 6e 20 74 68 65 20 | 44 56 49 20 66 69 6c 65 |.in the |DVI file|
|000007d0| 2e 20 20 55 73 65 66 75 | 6c 20 66 6f 72 20 70 72 |. Usefu|l for pr|
|000007e0| 65 76 69 65 77 69 6e 67 | 2e 0a 25 0a 25 20 5c 70 |eviewing|..%.% \p|
|000007f0| 73 66 75 6c 6c 09 69 6e | 63 6c 75 64 65 73 20 74 |sfull.in|cludes t|
|00000800| 68 65 20 66 69 67 75 72 | 65 20 69 6e 20 74 68 65 |he figur|e in the|
|00000810| 20 44 56 49 20 66 69 6c | 65 20 28 64 65 66 61 75 | DVI fil|e (defau|
|00000820| 6c 74 29 2e 0a 25 0a 25 | 20 5c 70 73 73 63 61 6c |lt)..%.%| \psscal|
|00000830| 65 66 69 72 73 74 20 77 | 69 64 74 68 3d 20 6f 72 |efirst w|idth= or|
|00000840| 20 68 65 69 67 68 74 3d | 20 73 70 65 63 69 66 69 | height=| specifi|
|00000850| 65 73 20 74 68 65 20 73 | 69 7a 65 20 6f 66 20 74 |es the s|ize of t|
|00000860| 68 65 20 66 69 67 75 72 | 65 0a 25 20 09 09 62 65 |he figur|e.% ..be|
|00000870| 66 6f 72 65 20 72 6f 74 | 61 74 69 6f 6e 2e 0a 25 |fore rot|ation..%|
|00000880| 20 5c 70 73 72 6f 74 61 | 74 65 66 69 72 73 74 20 | \psrota|tefirst |
|00000890| 28 64 65 66 61 75 6c 74 | 29 20 77 69 64 74 68 3d |(default|) width=|
|000008a0| 20 6f 72 20 68 65 69 67 | 68 74 3d 20 73 70 65 63 | or heig|ht= spec|
|000008b0| 69 66 69 65 73 20 74 68 | 65 20 73 69 7a 65 20 6f |ifies th|e size o|
|000008c0| 66 20 74 68 65 0a 25 20 | 09 09 20 66 69 67 75 72 |f the.% |.. figur|
|000008d0| 65 20 61 66 74 65 72 20 | 72 6f 74 61 74 69 6f 6e |e after |rotation|
|000008e0| 2e 20 20 41 73 79 6d 65 | 74 72 69 63 20 66 69 67 |. Asyme|tric fig|
|000008f0| 75 72 65 73 20 77 69 6c | 6c 0a 25 20 09 09 20 61 |ures wil|l.% .. a|
|00000900| 70 70 65 61 72 20 74 6f | 20 73 68 72 69 6e 6b 2e |ppear to| shrink.|
|00000910| 0a 25 0a 25 20 5c 70 73 | 66 69 67 75 72 65 70 61 |.%.% \ps|figurepa|
|00000920| 74 68 7b 64 69 72 3a 64 | 69 72 3a 2e 2e 2e 7d 20 |th{dir:d|ir:...} |
|00000930| 20 73 65 74 73 20 74 68 | 65 20 70 61 74 68 20 74 | sets th|e path t|
|00000940| 6f 20 73 65 61 72 63 68 | 20 66 6f 72 20 74 68 65 |o search| for the|
|00000950| 20 66 69 67 75 72 65 0a | 25 0a 25 20 5c 70 73 66 | figure.|%.% \psf|
|00000960| 69 67 0a 25 20 75 73 61 | 67 65 3a 20 5c 70 73 66 |ig.% usa|ge: \psf|
|00000970| 69 67 7b 66 69 6c 65 3d | 2c 20 66 69 67 75 72 65 |ig{file=|, figure|
|00000980| 3d 2c 20 68 65 69 67 68 | 74 3d 2c 20 77 69 64 74 |=, heigh|t=, widt|
|00000990| 68 3d 2c 0a 25 09 09 09 | 62 62 6c 6c 78 3d 2c 20 |h=,.%...|bbllx=, |
|000009a0| 62 62 6c 6c 79 3d 2c 20 | 62 62 75 72 78 3d 2c 20 |bblly=, |bburx=, |
|000009b0| 62 62 75 72 79 3d 2c 0a | 25 09 09 09 72 68 65 69 |bbury=,.|%...rhei|
|000009c0| 67 68 74 3d 2c 20 72 77 | 69 64 74 68 3d 2c 20 63 |ght=, rw|idth=, c|
|000009d0| 6c 69 70 3d 2c 20 61 6e | 67 6c 65 3d 2c 20 73 69 |lip=, an|gle=, si|
|000009e0| 6c 65 6e 74 3d 7d 0a 25 | 0a 25 09 22 66 69 6c 65 |lent=}.%|.%."file|
|000009f0| 22 20 69 73 20 74 68 65 | 20 66 69 6c 65 6e 61 6d |" is the| filenam|
|00000a00| 65 2e 20 20 49 66 20 6e | 6f 20 70 61 74 68 20 6e |e. If n|o path n|
|00000a10| 61 6d 65 20 69 73 20 73 | 70 65 63 69 66 69 65 64 |ame is s|pecified|
|00000a20| 20 61 6e 64 20 74 68 65 | 0a 25 09 09 66 69 6c 65 | and the|.%..file|
|00000a30| 20 69 73 20 6e 6f 74 20 | 66 6f 75 6e 64 20 69 6e | is not |found in|
|00000a40| 20 74 68 65 20 63 75 72 | 72 65 6e 74 20 64 69 72 | the cur|rent dir|
|00000a50| 65 63 74 6f 72 79 2c 0a | 25 09 09 69 74 20 77 69 |ectory,.|%..it wi|
|00000a60| 6c 6c 20 62 65 20 6c 6f | 6f 6b 65 64 20 66 6f 72 |ll be lo|oked for|
|00000a70| 20 69 6e 20 64 69 72 65 | 63 74 6f 72 79 20 5c 70 | in dire|ctory \p|
|00000a80| 73 66 69 67 75 72 65 70 | 61 74 68 2e 0a 25 09 22 |sfigurep|ath..%."|
|00000a90| 66 69 67 75 72 65 22 20 | 69 73 20 61 20 73 79 6e |figure" |is a syn|
|00000aa0| 6f 6e 79 6d 20 66 6f 72 | 20 22 66 69 6c 65 22 2e |onym for| "file".|
|00000ab0| 0a 25 09 42 79 20 64 65 | 66 61 75 6c 74 2c 20 74 |.%.By de|fault, t|
|00000ac0| 68 65 20 77 69 64 74 68 | 20 61 6e 64 20 68 65 69 |he width| and hei|
|00000ad0| 67 68 74 20 6f 66 20 74 | 68 65 20 66 69 67 75 72 |ght of t|he figur|
|00000ae0| 65 20 61 72 65 20 74 61 | 6b 65 6e 20 66 72 6f 6d |e are ta|ken from|
|00000af0| 0a 25 09 09 74 68 65 20 | 42 6f 75 6e 64 69 6e 67 |.%..the |Bounding|
|00000b00| 42 6f 78 20 6f 66 20 74 | 68 65 20 66 69 67 75 72 |Box of t|he figur|
|00000b10| 65 2e 0a 25 09 49 66 20 | 22 77 69 64 74 68 22 20 |e..%.If |"width" |
|00000b20| 69 73 20 73 70 65 63 69 | 66 69 65 64 2c 20 74 68 |is speci|fied, th|
|00000b30| 65 20 66 69 67 75 72 65 | 20 69 73 20 73 63 61 6c |e figure| is scal|
|00000b40| 65 64 20 73 6f 20 74 68 | 61 74 20 69 74 20 68 61 |ed so th|at it ha|
|00000b50| 73 0a 25 09 09 74 68 65 | 20 73 70 65 63 69 66 69 |s.%..the| specifi|
|00000b60| 65 64 20 77 69 64 74 68 | 2e 20 20 49 74 73 20 68 |ed width|. Its h|
|00000b70| 65 69 67 68 74 20 63 68 | 61 6e 67 65 73 20 70 72 |eight ch|anges pr|
|00000b80| 6f 70 6f 72 74 69 6f 6e | 61 74 65 6c 79 2e 0a 25 |oportion|ately..%|
|00000b90| 09 49 66 20 22 68 65 69 | 67 68 74 22 20 69 73 20 |.If "hei|ght" is |
|00000ba0| 73 70 65 63 69 66 69 65 | 64 2c 20 74 68 65 20 66 |specifie|d, the f|
|00000bb0| 69 67 75 72 65 20 69 73 | 20 73 63 61 6c 65 64 20 |igure is| scaled |
|00000bc0| 73 6f 20 74 68 61 74 20 | 69 74 20 68 61 73 0a 25 |so that |it has.%|
|00000bd0| 09 09 74 68 65 20 73 70 | 65 63 69 66 69 65 64 20 |..the sp|ecified |
|00000be0| 68 65 69 67 68 74 2e 20 | 20 49 74 73 20 77 69 64 |height. | Its wid|
|00000bf0| 74 68 20 63 68 61 6e 67 | 65 73 20 70 72 6f 70 6f |th chang|es propo|
|00000c00| 72 74 69 6f 6e 61 74 65 | 6c 79 2e 0a 25 09 49 66 |rtionate|ly..%.If|
|00000c10| 20 62 6f 74 68 20 22 77 | 69 64 74 68 22 20 61 6e | both "w|idth" an|
|00000c20| 64 20 22 68 65 69 67 68 | 74 22 20 61 72 65 20 73 |d "heigh|t" are s|
|00000c30| 70 65 63 69 66 69 65 64 | 2c 20 74 68 65 20 66 69 |pecified|, the fi|
|00000c40| 67 75 72 65 20 69 73 20 | 73 63 61 6c 65 64 0a 25 |gure is |scaled.%|
|00000c50| 09 09 61 6e 61 6d 6f 72 | 70 68 69 63 61 6c 6c 79 |..anamor|phically|
|00000c60| 2e 0a 25 09 22 62 62 6c | 6c 78 22 2c 20 22 62 62 |..%."bbl|lx", "bb|
|00000c70| 6c 6c 79 22 2c 20 22 62 | 62 75 72 78 22 2c 20 61 |lly", "b|burx", a|
|00000c80| 6e 64 20 22 62 62 75 72 | 79 22 20 63 6f 6e 74 72 |nd "bbur|y" contr|
|00000c90| 6f 6c 20 74 68 65 20 50 | 6f 73 74 53 63 72 69 70 |ol the P|ostScrip|
|00000ca0| 74 0a 25 09 09 42 6f 75 | 6e 64 69 6e 67 42 6f 78 |t.%..Bou|ndingBox|
|00000cb0| 2e 20 20 49 66 20 74 68 | 65 73 65 20 66 6f 75 72 |. If th|ese four|
|00000cc0| 20 76 61 6c 75 65 73 20 | 61 72 65 20 73 70 65 63 | values |are spec|
|00000cd0| 69 66 69 65 64 0a 25 20 | 20 20 20 20 20 20 20 20 |ified.% | |
|00000ce0| 20 20 20 20 20 20 2a 62 | 65 66 6f 72 65 2a 20 74 | *b|efore* t|
|00000cf0| 68 65 20 22 66 69 6c 65 | 22 20 6f 70 74 69 6f 6e |he "file|" option|
|00000d00| 2c 20 74 68 65 20 50 53 | 46 49 47 20 77 69 6c 6c |, the PS|FIG will|
|00000d10| 20 6e 6f 74 20 74 72 79 | 20 74 6f 0a 25 20 20 20 | not try| to.% |
|00000d20| 20 20 20 20 20 20 20 20 | 20 20 20 20 6f 70 65 6e | | open|
|00000d30| 20 74 68 65 20 50 6f 73 | 74 53 63 72 69 70 74 20 | the Pos|tScript |
|00000d40| 66 69 6c 65 2e 0a 25 09 | 22 72 68 65 69 67 68 74 |file..%.|"rheight|
|00000d50| 22 20 61 6e 64 20 22 72 | 77 69 64 74 68 22 20 61 |" and "r|width" a|
|00000d60| 72 65 20 74 68 65 20 72 | 65 73 65 72 76 65 64 20 |re the r|eserved |
|00000d70| 68 65 69 67 68 74 20 61 | 6e 64 20 77 69 64 74 68 |height a|nd width|
|00000d80| 0a 25 09 09 6f 66 20 74 | 68 65 20 66 69 67 75 72 |.%..of t|he figur|
|00000d90| 65 2c 20 69 2e 65 2e 2c | 20 68 6f 77 20 62 69 67 |e, i.e.,| how big|
|00000da0| 20 54 65 58 20 61 63 74 | 75 61 6c 6c 79 20 74 68 | TeX act|ually th|
|00000db0| 69 6e 6b 73 0a 25 09 09 | 74 68 65 20 66 69 67 75 |inks.%..|the figu|
|00000dc0| 72 65 20 69 73 2e 20 20 | 54 68 65 79 20 64 65 66 |re is. |They def|
|00000dd0| 61 75 6c 74 20 74 6f 20 | 22 77 69 64 74 68 22 20 |ault to |"width" |
|00000de0| 61 6e 64 20 22 68 65 69 | 67 68 74 22 2e 0a 25 09 |and "hei|ght"..%.|
|00000df0| 54 68 65 20 22 63 6c 69 | 70 22 20 6f 70 74 69 6f |The "cli|p" optio|
|00000e00| 6e 20 65 6e 73 75 72 65 | 73 20 74 68 61 74 20 6e |n ensure|s that n|
|00000e10| 6f 20 70 6f 72 74 69 6f | 6e 20 6f 66 20 74 68 65 |o portio|n of the|
|00000e20| 20 66 69 67 75 72 65 20 | 77 69 6c 6c 0a 25 09 09 | figure |will.%..|
|00000e30| 61 70 70 65 61 72 20 6f | 75 74 73 69 64 65 20 69 |appear o|utside i|
|00000e40| 74 73 20 42 6f 75 6e 64 | 69 6e 67 42 6f 78 2e 20 |ts Bound|ingBox. |
|00000e50| 20 22 63 6c 69 70 3d 22 | 20 69 73 20 61 20 73 77 | "clip="| is a sw|
|00000e60| 69 74 63 68 20 61 6e 64 | 0a 25 09 09 74 61 6b 65 |itch and|.%..take|
|00000e70| 73 20 6e 6f 20 76 61 6c | 75 65 2c 20 62 75 74 20 |s no val|ue, but |
|00000e80| 74 68 65 20 60 3d 27 20 | 6d 75 73 74 20 62 65 20 |the `=' |must be |
|00000e90| 70 72 65 73 65 6e 74 2e | 0a 25 09 54 68 65 20 22 |present.|.%.The "|
|00000ea0| 61 6e 67 6c 65 22 20 6f | 70 74 69 6f 6e 20 73 70 |angle" o|ption sp|
|00000eb0| 65 63 69 66 69 65 73 20 | 74 68 65 20 61 6e 67 6c |ecifies |the angl|
|00000ec0| 65 20 6f 66 20 72 6f 74 | 61 74 69 6f 6e 20 28 64 |e of rot|ation (d|
|00000ed0| 65 67 72 65 65 73 2c 20 | 63 63 77 29 2e 0a 25 09 |egrees, |ccw)..%.|
|00000ee0| 54 68 65 20 22 73 69 6c | 65 6e 74 22 20 6f 70 74 |The "sil|ent" opt|
|00000ef0| 69 6f 6e 20 6d 61 6b 65 | 73 20 5c 70 73 66 69 67 |ion make|s \psfig|
|00000f00| 20 77 6f 72 6b 20 73 69 | 6c 65 6e 74 6c 79 2e 0a | work si|lently..|
|00000f10| 25 0a 25 20 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |%.% ====|========|
|00000f20| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000f30| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000f40| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000f50| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 0a 25 20 63 68 65 |========|==.% che|
|00000f60| 63 6b 20 74 6f 20 73 65 | 65 20 69 66 20 6d 61 63 |ck to se|e if mac|
|00000f70| 72 6f 73 20 61 6c 72 65 | 61 64 79 20 6c 6f 61 64 |ros alre|ady load|
|00000f80| 65 64 20 69 6e 20 28 6d | 61 79 62 65 20 73 6f 6d |ed in (m|aybe som|
|00000f90| 65 20 6f 74 68 65 72 20 | 66 69 6c 65 20 73 61 79 |e other |file say|
|00000fa0| 73 0a 25 20 22 5c 69 6e | 70 75 74 20 70 73 66 69 |s.% "\in|put psfi|
|00000fb0| 67 22 29 20 2e 2e 2e 0a | 5c 69 66 78 5c 75 6e 64 |g") ....|\ifx\und|
|00000fc0| 65 66 69 6e 65 64 5c 70 | 73 66 69 67 5c 65 6c 73 |efined\p|sfig\els|
|00000fd0| 65 5c 65 6e 64 69 6e 70 | 75 74 5c 66 69 0a 25 0a |e\endinp|ut\fi.%.|
|00000fe0| 25 20 66 72 6f 6d 20 61 | 20 73 75 67 67 65 73 74 |% from a| suggest|
|00000ff0| 69 6f 6e 20 62 79 20 65 | 69 6a 6b 68 6f 75 74 40 |ion by e|ijkhout@|
|00001000| 63 73 72 64 2e 75 69 75 | 63 2e 65 64 75 20 74 6f |csrd.uiu|c.edu to|
|00001010| 20 61 6c 6c 6f 77 0a 25 | 20 6c 6f 61 64 69 6e 67 | allow.%| loading|
|00001020| 20 61 73 20 61 20 73 74 | 79 6c 65 20 66 69 6c 65 | as a st|yle file|
|00001030| 2e 20 43 68 61 6e 67 65 | 64 20 74 6f 20 61 76 6f |. Change|d to avo|
|00001040| 69 64 20 70 72 6f 62 6c | 65 6d 73 0a 25 20 77 69 |id probl|ems.% wi|
|00001050| 74 68 20 61 6d 73 74 65 | 78 20 70 65 72 20 73 75 |th amste|x per su|
|00001060| 67 67 65 73 74 69 6f 6e | 20 62 79 20 6a 62 65 6e |ggestion| by jben|
|00001070| 63 65 40 6d 61 74 68 2e | 75 63 6c 61 2e 65 64 75 |ce@math.|ucla.edu|
|00001080| 0a 0a 5c 6c 65 74 5c 4c | 61 54 65 58 41 74 53 69 |..\let\L|aTeXAtSi|
|00001090| 67 6e 3d 5c 40 0a 5c 6c | 65 74 5c 40 3d 5c 72 65 |gn=\@.\l|et\@=\re|
|000010a0| 6c 61 78 0a 5c 65 64 65 | 66 5c 70 73 66 69 67 52 |lax.\ede|f\psfigR|
|000010b0| 65 73 74 6f 72 65 41 74 | 7b 5c 63 61 74 63 6f 64 |estoreAt|{\catcod|
|000010c0| 65 60 5c 40 3d 5c 6e 75 | 6d 62 65 72 5c 63 61 74 |e`\@=\nu|mber\cat|
|000010d0| 63 6f 64 65 60 40 5c 72 | 65 6c 61 78 7d 0a 25 5c |code`@\r|elax}.%\|
|000010e0| 65 64 65 66 5c 70 73 66 | 69 67 52 65 73 74 6f 72 |edef\psf|igRestor|
|000010f0| 65 41 74 7b 5c 63 61 74 | 63 6f 64 65 60 40 3d 5c |eAt{\cat|code`@=\|
|00001100| 6e 75 6d 62 65 72 5c 63 | 61 74 63 6f 64 65 60 40 |number\c|atcode`@|
|00001110| 5c 72 65 6c 61 78 7d 0a | 5c 63 61 74 63 6f 64 65 |\relax}.|\catcode|
|00001120| 60 5c 40 3d 31 31 5c 72 | 65 6c 61 78 0a 5c 6e 65 |`\@=11\r|elax.\ne|
|00001130| 77 77 72 69 74 65 5c 40 | 75 6e 75 73 65 64 0a 5c |wwrite\@|unused.\|
|00001140| 64 65 66 5c 70 73 40 74 | 79 70 65 6f 75 74 23 31 |def\ps@t|ypeout#1|
|00001150| 7b 7b 5c 6c 65 74 5c 70 | 72 6f 74 65 63 74 5c 73 |{{\let\p|rotect\s|
|00001160| 74 72 69 6e 67 5c 69 6d | 6d 65 64 69 61 74 65 5c |tring\im|mediate\|
|00001170| 77 72 69 74 65 5c 40 75 | 6e 75 73 65 64 7b 23 31 |write\@u|nused{#1|
|00001180| 7d 7d 7d 0a 0a 5c 64 65 | 66 5c 44 76 69 70 73 44 |}}}..\de|f\DvipsD|
|00001190| 72 69 76 65 72 7b 0a 09 | 5c 70 73 40 74 79 70 65 |river{..|\ps@type|
|000011a0| 6f 75 74 7b 70 73 66 69 | 67 2f 74 65 78 20 5c 50 |out{psfi|g/tex \P|
|000011b0| 73 66 69 67 56 65 72 73 | 69 6f 6e 20 2d 64 76 69 |sfigVers|ion -dvi|
|000011c0| 70 73 7d 0a 5c 64 65 66 | 5c 50 73 66 69 67 53 70 |ps}.\def|\PsfigSp|
|000011d0| 65 63 69 61 6c 73 7b 5c | 44 76 69 70 73 53 70 65 |ecials{\|DvipsSpe|
|000011e0| 63 69 61 6c 73 7d 20 09 | 5c 64 65 66 5c 70 73 40 |cials} .|\def\ps@|
|000011f0| 64 69 72 7b 2f 7d 0a 5c | 64 65 66 5c 70 73 40 70 |dir{/}.\|def\ps@p|
|00001200| 72 65 64 69 72 7b 7d 20 | 7d 0a 5c 64 65 66 5c 4f |redir{} |}.\def\O|
|00001210| 7a 54 65 58 44 72 69 76 | 65 72 7b 0a 09 5c 70 73 |zTeXDriv|er{..\ps|
|00001220| 40 74 79 70 65 6f 75 74 | 7b 70 73 66 69 67 2f 74 |@typeout|{psfig/t|
|00001230| 65 78 20 5c 50 73 66 69 | 67 56 65 72 73 69 6f 6e |ex \Psfi|gVersion|
|00001240| 20 2d 6f 7a 74 65 78 7d | 0a 09 5c 64 65 66 5c 50 | -oztex}|..\def\P|
|00001250| 73 66 69 67 53 70 65 63 | 69 61 6c 73 7b 5c 4f 7a |sfigSpec|ials{\Oz|
|00001260| 54 65 58 53 70 65 63 69 | 61 6c 73 7d 0a 09 5c 64 |TeXSpeci|als}..\d|
|00001270| 65 66 5c 70 73 40 64 69 | 72 7b 3a 7d 0a 09 5c 64 |ef\ps@di|r{:}..\d|
|00001280| 65 66 5c 70 73 40 70 72 | 65 64 69 72 7b 3a 7d 0a |ef\ps@pr|edir{:}.|
|00001290| 09 5c 63 61 74 63 6f 64 | 65 60 5c 5e 5e 4a 3d 35 |.\catcod|e`\^^J=5|
|000012a0| 0a 7d 0a 0a 25 25 20 48 | 65 72 65 27 73 20 68 6f |.}..%% H|ere's ho|
|000012b0| 77 20 79 6f 75 20 64 65 | 66 69 6e 65 20 79 6f 75 |w you de|fine you|
|000012c0| 72 20 66 69 67 75 72 65 | 20 70 61 74 68 2e 20 20 |r figure| path. |
|000012d0| 53 68 6f 75 6c 64 20 62 | 65 20 73 65 74 20 75 70 |Should b|e set up|
|000012e0| 20 77 69 74 68 20 6e 75 | 6c 6c 0a 25 25 20 64 65 | with nu|ll.%% de|
|000012f0| 66 61 75 6c 74 20 61 6e | 64 20 61 20 75 73 65 72 |fault an|d a user|
|00001300| 20 75 73 65 61 62 6c 65 | 20 64 65 66 69 6e 69 74 | useable| definit|
|00001310| 69 6f 6e 2e 0a 0a 5c 64 | 65 66 5c 66 69 67 75 72 |ion...\d|ef\figur|
|00001320| 65 70 61 74 68 7b 2e 2f | 3a 7d 0a 5c 64 65 66 5c |epath{./|:}.\def\|
|00001330| 70 73 66 69 67 75 72 65 | 70 61 74 68 23 31 7b 5c |psfigure|path#1{\|
|00001340| 65 64 65 66 5c 66 69 67 | 75 72 65 70 61 74 68 7b |edef\fig|urepath{|
|00001350| 23 31 3a 7d 7d 0a 0a 25 | 25 25 20 69 6e 73 65 72 |#1:}}..%|%% inser|
|00001360| 74 65 64 20 66 6f 72 20 | 53 65 61 72 63 68 69 6e |ted for |Searchin|
|00001370| 67 20 55 6e 69 78 70 61 | 74 68 73 0a 25 25 25 20 |g Unixpa|ths.%%% |
|00001380| 28 74 68 65 20 70 61 74 | 68 20 6d 75 73 74 20 65 |(the pat|h must e|
|00001390| 6e 64 20 77 69 74 68 20 | 3a 29 0a 25 25 25 20 28 |nd with |:).%%% (|
|000013a0| 63 61 6c 6c 3a 20 5c 44 | 6f 50 61 74 68 73 5c 66 |call: \D|oPaths\f|
|000013b0| 69 67 75 72 65 70 61 74 | 68 20 29 0a 25 25 25 2d |igurepat|h ).%%%-|
|000013c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000013d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000013e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000013f0| 2d 2d 2d 2d 2d 0a 5c 64 | 65 66 5c 44 6f 50 61 74 |-----.\d|ef\DoPat|
|00001400| 68 73 23 31 7b 5c 65 78 | 70 61 6e 64 61 66 74 65 |hs#1{\ex|pandafte|
|00001410| 72 5c 45 61 63 68 50 61 | 74 68 23 31 5c 73 74 6f |r\EachPa|th#1\sto|
|00001420| 70 6c 69 73 74 7d 0a 25 | 0a 5c 64 65 66 5c 6c 65 |plist}.%|.\def\le|
|00001430| 65 72 7b 7d 0a 5c 64 65 | 66 5c 45 61 63 68 50 61 |er{}.\de|f\EachPa|
|00001440| 74 68 23 31 3a 23 32 5c | 73 74 6f 70 6c 69 73 74 |th#1:#2\|stoplist|
|00001450| 7b 25 20 23 31 20 70 61 | 72 74 20 6f 66 20 74 68 |{% #1 pa|rt of th|
|00001460| 65 20 6c 69 73 74 20 28 | 64 65 6c 69 6d 69 74 65 |e list (|delimite|
|00001470| 72 20 3a 29 0a 20 20 5c | 45 78 69 73 74 73 46 69 |r :). \|ExistsFi|
|00001480| 6c 65 7b 23 31 7d 7b 5c | 53 65 61 72 63 68 65 64 |le{#1}{\|Searched|
|00001490| 46 69 6c 65 7d 0a 20 20 | 5c 69 66 78 23 32 5c 6c |File}. |\ifx#2\l|
|000014a0| 65 65 72 0a 20 20 5c 65 | 6c 73 65 0a 20 20 20 20 |eer. \e|lse. |
|000014b0| 5c 65 78 70 61 6e 64 61 | 66 74 65 72 5c 45 61 63 |\expanda|fter\Eac|
|000014c0| 68 50 61 74 68 23 32 5c | 73 74 6f 70 6c 69 73 74 |hPath#2\|stoplist|
|000014d0| 0a 20 20 5c 66 69 7d 0a | 25 0a 25 20 65 78 69 73 |. \fi}.|%.% exis|
|000014e0| 74 73 20 74 68 65 20 66 | 69 6c 65 20 28 64 6f 65 |ts the f|ile (doe|
|000014f0| 73 20 6e 6f 74 20 77 6f | 72 6b 20 66 6f 72 20 64 |s not wo|rk for d|
|00001500| 69 72 65 63 74 6f 72 69 | 65 73 21 29 0a 25 0a 5c |irectori|es!).%.\|
|00001510| 64 65 66 5c 70 73 40 64 | 69 72 7b 2f 7d 0a 5c 64 |def\ps@d|ir{/}.\d|
|00001520| 65 66 5c 45 78 69 73 74 | 73 46 69 6c 65 23 31 23 |ef\Exist|sFile#1#|
|00001530| 32 7b 25 0a 20 20 20 5c | 6f 70 65 6e 69 6e 31 3d |2{%. \|openin1=|
|00001540| 5c 70 73 40 70 72 65 64 | 69 72 23 31 5c 70 73 40 |\ps@pred|ir#1\ps@|
|00001550| 64 69 72 23 32 0a 20 20 | 20 5c 69 66 65 6f 66 31 |dir#2. | \ifeof1|
|00001560| 0a 20 20 20 20 20 20 20 | 5c 63 6c 6f 73 65 69 6e |. |\closein|
|00001570| 31 0a 20 20 20 20 20 20 | 20 25 5c 70 73 40 74 79 |1. | %\ps@ty|
|00001580| 70 65 6f 75 74 7b 2e 2e | 2e 6e 6f 74 3a 20 5c 70 |peout{..|.not: \p|
|00001590| 73 40 70 72 65 64 69 72 | 23 31 5c 70 73 40 64 69 |s@predir|#1\ps@di|
|000015a0| 72 23 32 7d 0a 20 20 20 | 5c 65 6c 73 65 0a 20 20 |r#2}. |\else. |
|000015b0| 20 20 20 20 20 5c 63 6c | 6f 73 65 69 6e 31 0a 20 | \cl|osein1. |
|000015c0| 20 20 20 20 20 20 25 5c | 70 73 40 74 79 70 65 6f | %\|ps@typeo|
|000015d0| 75 74 7b 2e 2e 2e 69 6e | 3a 20 20 5c 70 73 40 70 |ut{...in|: \ps@p|
|000015e0| 72 65 64 69 72 23 31 5c | 70 73 40 64 69 72 23 32 |redir#1\|ps@dir#2|
|000015f0| 7d 0a 20 20 20 20 20 20 | 20 20 5c 69 66 78 5c 70 |}. | \ifx\p|
|00001600| 73 40 66 6f 75 6e 64 64 | 69 72 5c 6c 65 65 72 0a |s@foundd|ir\leer.|
|00001610| 20 20 20 20 20 20 20 20 | 20 20 25 5c 70 73 40 74 | | %\ps@t|
|00001620| 79 70 65 6f 75 74 7b 73 | 65 74 20 66 6f 75 6e 64 |ypeout{s|et found|
|00001630| 64 69 72 20 23 31 7d 0a | 20 20 20 20 20 20 20 20 |dir #1}.| |
|00001640| 20 20 20 5c 65 64 65 66 | 5c 70 73 40 66 6f 75 6e | \edef|\ps@foun|
|00001650| 64 64 69 72 7b 23 31 7d | 0a 20 20 20 20 20 20 20 |ddir{#1}|. |
|00001660| 20 5c 66 69 0a 20 20 20 | 5c 66 69 7d 0a 25 2d 2d | \fi. |\fi}.%--|
|00001670| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001680| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001690| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000016a0| 2d 2d 2d 2d 0a 25 0a 25 | 20 47 65 74 20 64 69 72 |----.%.%| Get dir|
|000016b0| 20 69 6e 20 70 61 74 68 | 20 6f 72 20 65 72 72 6f | in path| or erro|
|000016c0| 72 0a 25 0a 5c 64 65 66 | 5c 67 65 74 40 64 69 72 |r.%.\def|\get@dir|
|000016d0| 23 31 7b 25 0a 20 20 5c | 64 65 66 5c 70 73 40 66 |#1{%. \|def\ps@f|
|000016e0| 6f 75 6e 64 64 69 72 7b | 7d 0a 20 20 5c 64 65 66 |ounddir{|}. \def|
|000016f0| 5c 53 65 61 72 63 68 65 | 64 46 69 6c 65 7b 23 31 |\Searche|dFile{#1|
|00001700| 7d 0a 20 20 5c 44 6f 50 | 61 74 68 73 5c 66 69 67 |}. \DoP|aths\fig|
|00001710| 75 72 65 70 61 74 68 0a | 25 20 20 5c 66 69 0a 7d |urepath.|% \fi.}|
|00001720| 0a 25 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.%------|--------|
|00001730| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001740| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001750| 2d 2d 2d 2d 2d 2d 2d 2d | 0a 25 25 25 20 45 4e 44 |--------|.%%% END|
|00001760| 20 6f 66 20 53 65 61 72 | 63 68 69 6e 67 20 55 6e | of Sear|ching Un|
|00001770| 69 78 70 61 74 68 73 0a | 0a 0a 25 0a 25 20 40 70 |ixpaths.|..%.% @p|
|00001780| 73 64 6f 20 63 6f 6e 74 | 72 6f 6c 20 73 74 72 75 |sdo cont|rol stru|
|00001790| 63 74 75 72 65 20 2d 2d | 20 73 69 6d 69 6c 61 72 |cture --| similar|
|000017a0| 20 74 6f 20 4c 61 74 65 | 78 20 40 66 6f 72 2e 0a | to Late|x @for..|
|000017b0| 25 20 49 20 72 65 64 65 | 66 69 6e 65 64 20 74 68 |% I rede|fined th|
|000017c0| 65 73 65 20 77 69 74 68 | 20 64 69 66 66 65 72 65 |ese with| differe|
|000017d0| 6e 74 20 6e 61 6d 65 73 | 20 73 6f 20 74 68 61 74 |nt names| so that|
|000017e0| 20 70 73 66 69 67 20 63 | 61 6e 0a 25 20 62 65 20 | psfig c|an.% be |
|000017f0| 75 73 65 64 20 77 69 74 | 68 20 54 65 58 20 61 73 |used wit|h TeX as|
|00001800| 20 77 65 6c 6c 20 61 73 | 20 4c 61 54 65 58 2c 20 | well as| LaTeX, |
|00001810| 61 6e 64 20 73 6f 20 74 | 68 61 74 20 69 74 20 77 |and so t|hat it w|
|00001820| 69 6c 6c 20 6e 6f 74 20 | 0a 25 20 62 65 20 76 75 |ill not |.% be vu|
|00001830| 6e 65 72 61 62 6c 65 20 | 74 6f 20 66 75 74 75 72 |nerable |to futur|
|00001840| 65 20 63 68 61 6e 67 65 | 73 20 69 6e 20 4c 61 54 |e change|s in LaT|
|00001850| 65 58 27 73 20 69 6e 74 | 65 72 6e 61 6c 0a 25 20 |eX's int|ernal.% |
|00001860| 63 6f 6e 74 72 6f 6c 20 | 73 74 72 75 63 74 75 72 |control |structur|
|00001870| 65 2c 0a 25 0a 5c 64 65 | 66 5c 40 6e 6e 69 6c 7b |e,.%.\de|f\@nnil{|
|00001880| 5c 40 6e 69 6c 7d 0a 5c | 64 65 66 5c 40 65 6d 70 |\@nil}.\|def\@emp|
|00001890| 74 79 7b 7d 0a 5c 64 65 | 66 5c 40 70 73 64 6f 6e |ty{}.\de|f\@psdon|
|000018a0| 6f 6f 70 23 31 5c 40 40 | 23 32 23 33 7b 7d 0a 5c |oop#1\@@|#2#3{}.\|
|000018b0| 64 65 66 5c 40 70 73 64 | 6f 23 31 3a 3d 23 32 5c |def\@psd|o#1:=#2\|
|000018c0| 64 6f 23 33 7b 5c 65 64 | 65 66 5c 40 70 73 64 6f |do#3{\ed|ef\@psdo|
|000018d0| 74 6d 70 7b 23 32 7d 5c | 69 66 78 5c 40 70 73 64 |tmp{#2}\|ifx\@psd|
|000018e0| 6f 74 6d 70 5c 40 65 6d | 70 74 79 20 5c 65 6c 73 |otmp\@em|pty \els|
|000018f0| 65 0a 20 20 20 20 5c 65 | 78 70 61 6e 64 61 66 74 |e. \e|xpandaft|
|00001900| 65 72 5c 40 70 73 64 6f | 6c 6f 6f 70 23 32 2c 5c |er\@psdo|loop#2,\|
|00001910| 40 6e 69 6c 2c 5c 40 6e | 69 6c 5c 40 40 23 31 7b |@nil,\@n|il\@@#1{|
|00001920| 23 33 7d 5c 66 69 7d 0a | 5c 64 65 66 5c 40 70 73 |#3}\fi}.|\def\@ps|
|00001930| 64 6f 6c 6f 6f 70 23 31 | 2c 23 32 2c 23 33 5c 40 |doloop#1|,#2,#3\@|
|00001940| 40 23 34 23 35 7b 5c 64 | 65 66 23 34 7b 23 31 7d |@#4#5{\d|ef#4{#1}|
|00001950| 5c 69 66 78 20 23 34 5c | 40 6e 6e 69 6c 20 5c 65 |\ifx #4\|@nnil \e|
|00001960| 6c 73 65 0a 20 20 20 20 | 20 20 20 23 35 5c 64 65 |lse. | #5\de|
|00001970| 66 23 34 7b 23 32 7d 5c | 69 66 78 20 23 34 5c 40 |f#4{#2}\|ifx #4\@|
|00001980| 6e 6e 69 6c 20 5c 65 6c | 73 65 23 35 5c 40 69 70 |nnil \el|se#5\@ip|
|00001990| 73 64 6f 6c 6f 6f 70 20 | 23 33 5c 40 40 23 34 7b |sdoloop |#3\@@#4{|
|000019a0| 23 35 7d 5c 66 69 5c 66 | 69 7d 0a 5c 64 65 66 5c |#5}\fi\f|i}.\def\|
|000019b0| 40 69 70 73 64 6f 6c 6f | 6f 70 23 31 2c 23 32 5c |@ipsdolo|op#1,#2\|
|000019c0| 40 40 23 33 23 34 7b 5c | 64 65 66 23 33 7b 23 31 |@@#3#4{\|def#3{#1|
|000019d0| 7d 5c 69 66 78 20 23 33 | 5c 40 6e 6e 69 6c 20 0a |}\ifx #3|\@nnil .|
|000019e0| 20 20 20 20 20 20 20 5c | 6c 65 74 5c 40 6e 65 78 | \|let\@nex|
|000019f0| 74 77 68 69 6c 65 3d 5c | 40 70 73 64 6f 6e 6f 6f |twhile=\|@psdonoo|
|00001a00| 70 20 5c 65 6c 73 65 0a | 20 20 20 20 20 20 23 34 |p \else.| #4|
|00001a10| 5c 72 65 6c 61 78 5c 6c | 65 74 5c 40 6e 65 78 74 |\relax\l|et\@next|
|00001a20| 77 68 69 6c 65 3d 5c 40 | 69 70 73 64 6f 6c 6f 6f |while=\@|ipsdoloo|
|00001a30| 70 5c 66 69 5c 40 6e 65 | 78 74 77 68 69 6c 65 23 |p\fi\@ne|xtwhile#|
|00001a40| 32 5c 40 40 23 33 7b 23 | 34 7d 7d 0a 5c 64 65 66 |2\@@#3{#|4}}.\def|
|00001a50| 5c 40 74 70 73 64 6f 23 | 31 3a 3d 23 32 5c 64 6f |\@tpsdo#|1:=#2\do|
|00001a60| 23 33 7b 5c 78 64 65 66 | 5c 40 70 73 64 6f 74 6d |#3{\xdef|\@psdotm|
|00001a70| 70 7b 23 32 7d 5c 69 66 | 78 5c 40 70 73 64 6f 74 |p{#2}\if|x\@psdot|
|00001a80| 6d 70 5c 40 65 6d 70 74 | 79 20 5c 65 6c 73 65 0a |mp\@empt|y \else.|
|00001a90| 20 20 20 20 5c 40 74 70 | 73 64 6f 6c 6f 6f 70 23 | \@tp|sdoloop#|
|00001aa0| 32 5c 40 6e 69 6c 5c 40 | 6e 69 6c 5c 40 40 23 31 |2\@nil\@|nil\@@#1|
|00001ab0| 7b 23 33 7d 5c 66 69 7d | 0a 5c 64 65 66 5c 40 74 |{#3}\fi}|.\def\@t|
|00001ac0| 70 73 64 6f 6c 6f 6f 70 | 23 31 23 32 5c 40 40 23 |psdoloop|#1#2\@@#|
|00001ad0| 33 23 34 7b 5c 64 65 66 | 23 33 7b 23 31 7d 5c 69 |3#4{\def|#3{#1}\i|
|00001ae0| 66 78 20 23 33 5c 40 6e | 6e 69 6c 20 0a 20 20 20 |fx #3\@n|nil . |
|00001af0| 20 20 20 20 5c 6c 65 74 | 5c 40 6e 65 78 74 77 68 | \let|\@nextwh|
|00001b00| 69 6c 65 3d 5c 40 70 73 | 64 6f 6e 6f 6f 70 20 5c |ile=\@ps|donoop \|
|00001b10| 65 6c 73 65 0a 20 20 20 | 20 20 20 23 34 5c 72 65 |else. | #4\re|
|00001b20| 6c 61 78 5c 6c 65 74 5c | 40 6e 65 78 74 77 68 69 |lax\let\|@nextwhi|
|00001b30| 6c 65 3d 5c 40 74 70 73 | 64 6f 6c 6f 6f 70 5c 66 |le=\@tps|doloop\f|
|00001b40| 69 5c 40 6e 65 78 74 77 | 68 69 6c 65 23 32 5c 40 |i\@nextw|hile#2\@|
|00001b50| 40 23 33 7b 23 34 7d 7d | 0a 25 20 0a 25 20 5c 66 |@#3{#4}}|.% .% \f|
|00001b60| 62 6f 78 20 69 73 20 64 | 65 66 69 6e 65 64 20 69 |box is d|efined i|
|00001b70| 6e 20 6c 61 74 65 78 2e | 74 65 78 3b 20 73 6f 20 |n latex.|tex; so |
|00001b80| 69 66 20 5c 66 62 6f 78 | 20 69 73 20 75 6e 64 65 |if \fbox| is unde|
|00001b90| 66 69 6e 65 64 2c 20 61 | 73 73 75 6d 65 20 74 68 |fined, a|ssume th|
|00001ba0| 61 74 0a 25 20 77 65 20 | 61 72 65 20 6e 6f 74 20 |at.% we |are not |
|00001bb0| 69 6e 20 4c 61 54 65 58 | 2e 0a 25 20 50 65 72 68 |in LaTeX|..% Perh|
|00001bc0| 61 70 73 20 74 68 69 73 | 20 63 6f 75 6c 64 20 62 |aps this| could b|
|00001bd0| 65 20 64 6f 6e 65 20 62 | 65 74 74 65 72 3f 3f 3f |e done b|etter???|
|00001be0| 0a 5c 69 66 78 5c 75 6e | 64 65 66 69 6e 65 64 5c |.\ifx\un|defined\|
|00001bf0| 66 62 6f 78 0a 25 20 5c | 66 62 6f 78 20 63 6f 64 |fbox.% \|fbox cod|
|00001c00| 65 20 66 72 6f 6d 20 6d | 6f 64 69 66 69 65 64 20 |e from m|odified |
|00001c10| 73 6c 69 67 68 74 6c 79 | 20 66 72 6f 6d 20 4c 61 |slightly| from La|
|00001c20| 54 65 58 0a 5c 6e 65 77 | 64 69 6d 65 6e 5c 66 62 |TeX.\new|dimen\fb|
|00001c30| 6f 78 72 75 6c 65 0a 5c | 6e 65 77 64 69 6d 65 6e |oxrule.\|newdimen|
|00001c40| 5c 66 62 6f 78 73 65 70 | 0a 5c 6e 65 77 64 69 6d |\fboxsep|.\newdim|
|00001c50| 65 6e 5c 70 73 40 74 65 | 6d 70 64 69 6d 61 0a 5c |en\ps@te|mpdima.\|
|00001c60| 6e 65 77 62 6f 78 5c 70 | 73 40 74 65 6d 70 62 6f |newbox\p|s@tempbo|
|00001c70| 78 61 0a 5c 66 62 6f 78 | 73 65 70 20 3d 20 33 70 |xa.\fbox|sep = 3p|
|00001c80| 74 0a 5c 66 62 6f 78 72 | 75 6c 65 20 3d 20 2e 34 |t.\fboxr|ule = .4|
|00001c90| 70 74 0a 5c 6c 6f 6e 67 | 5c 64 65 66 5c 66 62 6f |pt.\long|\def\fbo|
|00001ca0| 78 23 31 7b 5c 6c 65 61 | 76 65 76 6d 6f 64 65 5c |x#1{\lea|vevmode\|
|00001cb0| 73 65 74 62 6f 78 5c 70 | 73 40 74 65 6d 70 62 6f |setbox\p|s@tempbo|
|00001cc0| 78 61 5c 68 62 6f 78 7b | 23 31 7d 5c 70 73 40 74 |xa\hbox{|#1}\ps@t|
|00001cd0| 65 6d 70 64 69 6d 61 5c | 66 62 6f 78 72 75 6c 65 |empdima\|fboxrule|
|00001ce0| 0a 20 20 20 20 5c 61 64 | 76 61 6e 63 65 5c 70 73 |. \ad|vance\ps|
|00001cf0| 40 74 65 6d 70 64 69 6d | 61 20 5c 66 62 6f 78 73 |@tempdim|a \fboxs|
|00001d00| 65 70 20 5c 61 64 76 61 | 6e 63 65 5c 70 73 40 74 |ep \adva|nce\ps@t|
|00001d10| 65 6d 70 64 69 6d 61 20 | 5c 64 70 5c 70 73 40 74 |empdima |\dp\ps@t|
|00001d20| 65 6d 70 62 6f 78 61 0a | 20 20 20 5c 68 62 6f 78 |empboxa.| \hbox|
|00001d30| 7b 5c 6c 6f 77 65 72 20 | 5c 70 73 40 74 65 6d 70 |{\lower |\ps@temp|
|00001d40| 64 69 6d 61 5c 68 62 6f | 78 0a 20 20 7b 5c 76 62 |dima\hbo|x. {\vb|
|00001d50| 6f 78 7b 5c 68 72 75 6c | 65 20 68 65 69 67 68 74 |ox{\hrul|e height|
|00001d60| 20 5c 66 62 6f 78 72 75 | 6c 65 0a 20 20 20 20 20 | \fboxru|le. |
|00001d70| 20 20 20 20 20 5c 68 62 | 6f 78 7b 5c 76 72 75 6c | \hb|ox{\vrul|
|00001d80| 65 20 77 69 64 74 68 20 | 5c 66 62 6f 78 72 75 6c |e width |\fboxrul|
|00001d90| 65 20 5c 68 73 6b 69 70 | 5c 66 62 6f 78 73 65 70 |e \hskip|\fboxsep|
|00001da0| 0a 20 20 20 20 20 20 20 | 20 20 20 5c 76 62 6f 78 |. | \vbox|
|00001db0| 7b 5c 76 73 6b 69 70 5c | 66 62 6f 78 73 65 70 20 |{\vskip\|fboxsep |
|00001dc0| 5c 62 6f 78 5c 70 73 40 | 74 65 6d 70 62 6f 78 61 |\box\ps@|tempboxa|
|00001dd0| 5c 76 73 6b 69 70 5c 66 | 62 6f 78 73 65 70 7d 5c |\vskip\f|boxsep}\|
|00001de0| 68 73 6b 69 70 20 0a 20 | 20 20 20 20 20 20 20 20 |hskip . | |
|00001df0| 20 20 20 20 20 20 20 20 | 5c 66 62 6f 78 73 65 70 | |\fboxsep|
|00001e00| 5c 76 72 75 6c 65 20 77 | 69 64 74 68 20 5c 66 62 |\vrule w|idth \fb|
|00001e10| 6f 78 72 75 6c 65 7d 0a | 20 20 20 20 20 20 20 20 |oxrule}.| |
|00001e20| 20 20 20 20 20 20 20 20 | 20 5c 68 72 75 6c 65 20 | | \hrule |
|00001e30| 68 65 69 67 68 74 20 5c | 66 62 6f 78 72 75 6c 65 |height \|fboxrule|
|00001e40| 7d 7d 7d 7d 0a 5c 66 69 | 0a 25 0a 25 25 25 25 25 |}}}}.\fi|.%.%%%%%|
|00001e50| 25 25 25 25 25 25 25 25 | 25 25 25 25 25 25 25 25 |%%%%%%%%|%%%%%%%%|
|00001e60| 25 25 25 25 25 25 25 25 | 25 25 25 25 25 25 25 25 |%%%%%%%%|%%%%%%%%|
|00001e70| 25 25 25 25 25 25 25 25 | 25 25 25 25 25 25 25 25 |%%%%%%%%|%%%%%%%%|
|00001e80| 25 25 25 25 25 25 25 25 | 25 25 25 25 25 25 0a 25 |%%%%%%%%|%%%%%%.%|
|00001e90| 20 66 69 6c 65 20 72 65 | 61 64 69 6e 67 20 73 74 | file re|ading st|
|00001ea0| 75 66 66 20 66 72 6f 6d | 20 65 70 73 66 2e 74 65 |uff from| epsf.te|
|00001eb0| 78 0a 25 20 20 20 45 50 | 53 46 2e 54 45 58 20 6d |x.% EP|SF.TEX m|
|00001ec0| 61 63 72 6f 20 66 69 6c | 65 3a 0a 25 20 20 20 57 |acro fil|e:.% W|
|00001ed0| 72 69 74 74 65 6e 20 62 | 79 20 54 6f 6d 61 73 20 |ritten b|y Tomas |
|00001ee0| 52 6f 6b 69 63 6b 69 20 | 6f 66 20 52 61 64 69 63 |Rokicki |of Radic|
|00001ef0| 61 6c 20 45 79 65 20 53 | 6f 66 74 77 61 72 65 2c |al Eye S|oftware,|
|00001f00| 20 32 39 20 4d 61 72 20 | 31 39 38 39 2e 0a 25 20 | 29 Mar |1989..% |
|00001f10| 20 20 52 65 76 69 73 65 | 64 20 62 79 20 44 6f 6e | Revise|d by Don|
|00001f20| 20 4b 6e 75 74 68 2c 20 | 33 20 4a 61 6e 20 31 39 | Knuth, |3 Jan 19|
|00001f30| 39 30 2e 0a 25 20 20 20 | 52 65 76 69 73 65 64 20 |90..% |Revised |
|00001f40| 62 79 20 54 6f 6d 61 73 | 20 52 6f 6b 69 63 6b 69 |by Tomas| Rokicki|
|00001f50| 20 74 6f 20 61 63 63 65 | 70 74 20 62 6f 75 6e 64 | to acce|pt bound|
|00001f60| 69 6e 67 20 62 6f 78 65 | 73 20 77 69 74 68 20 6e |ing boxe|s with n|
|00001f70| 6f 0a 25 20 20 20 20 20 | 20 73 70 61 63 65 20 61 |o.% | space a|
|00001f80| 66 74 65 72 20 74 68 65 | 20 63 6f 6c 6f 6e 2c 20 |fter the| colon, |
|00001f90| 31 38 20 4a 75 6c 20 31 | 39 39 30 2e 0a 25 20 20 |18 Jul 1|990..% |
|00001fa0| 20 50 6f 72 74 69 6f 6e | 73 20 6d 6f 64 69 66 69 | Portion|s modifi|
|00001fb0| 65 64 2f 72 65 6d 6f 76 | 65 64 20 66 6f 72 20 75 |ed/remov|ed for u|
|00001fc0| 73 65 20 69 6e 20 50 53 | 46 49 47 20 70 61 63 6b |se in PS|FIG pack|
|00001fd0| 61 67 65 20 62 79 0a 25 | 20 20 20 20 20 20 4a 2e |age by.%| J.|
|00001fe0| 20 44 61 6e 69 65 6c 20 | 53 6d 69 74 68 2c 20 39 | Daniel |Smith, 9|
|00001ff0| 20 4f 63 74 6f 62 65 72 | 20 31 39 39 30 2e 0a 25 | October| 1990..%|
|00002000| 0a 5c 6e 65 77 72 65 61 | 64 5c 70 73 40 73 74 72 |.\newrea|d\ps@str|
|00002010| 65 61 6d 0a 5c 6e 65 77 | 69 66 5c 69 66 6e 6f 74 |eam.\new|if\ifnot|
|00002020| 40 65 6f 66 20 20 20 20 | 20 20 20 25 20 63 6f 6e |@eof | % con|
|00002030| 74 69 6e 75 65 20 6c 6f | 6f 6b 69 6e 67 20 66 6f |tinue lo|oking fo|
|00002040| 72 20 74 68 65 20 62 6f | 75 6e 64 69 6e 67 20 62 |r the bo|unding b|
|00002050| 6f 78 3f 0a 5c 6e 65 77 | 69 66 5c 69 66 40 6e 6f |ox?.\new|if\if@no|
|00002060| 69 73 79 20 20 20 20 20 | 20 20 20 25 20 72 65 70 |isy | % rep|
|00002070| 6f 72 74 20 77 68 61 74 | 20 79 6f 75 27 72 65 20 |ort what| you're |
|00002080| 6d 61 6b 69 6e 67 3f 0a | 5c 6e 65 77 69 66 5c 69 |making?.|\newif\i|
|00002090| 66 40 61 74 65 6e 64 20 | 20 20 20 20 20 20 20 25 |f@atend | %|
|000020a0| 20 25 25 42 6f 75 6e 64 | 69 6e 67 42 6f 78 3a 20 | %%Bound|ingBox: |
|000020b0| 68 61 73 20 28 61 74 20 | 65 6e 64 29 20 73 70 65 |has (at |end) spe|
|000020c0| 63 69 66 69 63 61 74 69 | 6f 6e 0a 5c 6e 65 77 69 |cificati|on.\newi|
|000020d0| 66 5c 69 66 40 70 73 66 | 69 6c 65 20 20 20 20 20 |f\if@psf|ile |
|000020e0| 20 20 25 20 64 6f 65 73 | 20 74 68 69 73 20 6c 6f | % does| this lo|
|000020f0| 6f 6b 20 6c 69 6b 65 20 | 61 20 50 6f 73 74 53 63 |ok like |a PostSc|
|00002100| 72 69 70 74 20 66 69 6c | 65 3f 0a 25 0a 25 20 50 |ript fil|e?.%.% P|
|00002110| 6f 73 74 53 63 72 69 70 | 74 20 66 69 6c 65 73 20 |ostScrip|t files |
|00002120| 73 68 6f 75 6c 64 20 73 | 74 61 72 74 20 77 69 74 |should s|tart wit|
|00002130| 68 20 60 25 21 27 0a 25 | 0a 7b 5c 63 61 74 63 6f |h `%!'.%|.{\catco|
|00002140| 64 65 60 5c 25 3d 31 32 | 5c 67 6c 6f 62 61 6c 5c |de`\%=12|\global\|
|00002150| 67 64 65 66 5c 65 70 73 | 66 40 73 74 61 72 74 7b |gdef\eps|f@start{|
|00002160| 25 21 7d 7d 0a 5c 64 65 | 66 5c 65 70 73 66 40 50 |%!}}.\de|f\epsf@P|
|00002170| 53 7b 50 53 7d 0a 25 0a | 5c 64 65 66 5c 65 70 73 |S{PS}.%.|\def\eps|
|00002180| 66 40 67 65 74 62 62 23 | 31 7b 25 0a 25 0a 25 20 |f@getbb#|1{%.%.% |
|00002190| 20 20 54 68 65 20 66 69 | 72 73 74 20 74 68 69 6e | The fi|rst thin|
|000021a0| 67 20 77 65 20 6e 65 65 | 64 20 74 6f 20 64 6f 20 |g we nee|d to do |
|000021b0| 69 73 20 74 6f 20 6f 70 | 65 6e 20 74 68 65 0a 25 |is to op|en the.%|
|000021c0| 20 20 20 50 6f 73 74 53 | 63 72 69 70 74 20 66 69 | PostS|cript fi|
|000021d0| 6c 65 2c 20 69 66 20 70 | 6f 73 73 69 62 6c 65 2e |le, if p|ossible.|
|000021e0| 0a 25 0a 5c 6f 70 65 6e | 69 6e 5c 70 73 40 73 74 |.%.\open|in\ps@st|
|000021f0| 72 65 61 6d 3d 5c 70 73 | 40 70 72 65 64 69 72 23 |ream=\ps|@predir#|
|00002200| 31 0a 5c 69 66 65 6f 66 | 5c 70 73 40 73 74 72 65 |1.\ifeof|\ps@stre|
|00002210| 61 6d 5c 70 73 40 74 79 | 70 65 6f 75 74 7b 45 72 |am\ps@ty|peout{Er|
|00002220| 72 6f 72 2c 20 46 69 6c | 65 20 23 31 20 6e 6f 74 |ror, Fil|e #1 not|
|00002230| 20 66 6f 75 6e 64 7d 5c | 65 6c 73 65 0a 25 0a 25 | found}\|else.%.%|
|00002240| 20 20 20 4f 6b 61 79 2c | 20 77 65 20 67 6f 74 20 | Okay,| we got |
|00002250| 69 74 2e 20 4e 6f 77 20 | 77 65 27 6c 6c 20 73 63 |it. Now |we'll sc|
|00002260| 61 6e 20 6c 69 6e 65 73 | 20 75 6e 74 69 6c 20 77 |an lines| until w|
|00002270| 65 20 66 69 6e 64 20 6f | 6e 65 20 74 68 61 74 20 |e find o|ne that |
|00002280| 64 6f 65 73 6e 27 74 0a | 25 20 20 20 73 74 61 72 |doesn't.|% star|
|00002290| 74 20 77 69 74 68 20 25 | 2e 20 57 65 27 72 65 20 |t with %|. We're |
|000022a0| 6c 6f 6f 6b 69 6e 67 20 | 66 6f 72 20 74 68 65 20 |looking |for the |
|000022b0| 62 6f 75 6e 64 69 6e 67 | 20 62 6f 78 20 63 6f 6d |bounding| box com|
|000022c0| 6d 65 6e 74 2e 0a 25 0a | 20 20 20 7b 5c 6e 6f 74 |ment..%.| {\not|
|000022d0| 40 65 6f 66 74 72 75 65 | 20 5c 63 68 61 72 64 65 |@eoftrue| \charde|
|000022e0| 66 5c 6f 74 68 65 72 3d | 31 32 0a 20 20 20 20 5c |f\other=|12. \|
|000022f0| 64 65 66 5c 64 6f 23 23 | 31 7b 5c 63 61 74 63 6f |def\do##|1{\catco|
|00002300| 64 65 60 23 23 31 3d 5c | 6f 74 68 65 72 7d 5c 64 |de`##1=\|other}\d|
|00002310| 6f 73 70 65 63 69 61 6c | 73 20 5c 63 61 74 63 6f |ospecial|s \catco|
|00002320| 64 65 60 5c 20 3d 31 30 | 0a 20 20 20 20 5c 6c 6f |de`\ =10|. \lo|
|00002330| 6f 70 0a 20 20 20 20 20 | 20 20 5c 69 66 40 70 73 |op. | \if@ps|
|00002340| 66 69 6c 65 0a 09 20 20 | 5c 72 65 61 64 5c 70 73 |file.. |\read\ps|
|00002350| 40 73 74 72 65 61 6d 20 | 74 6f 20 5c 65 70 73 66 |@stream |to \epsf|
|00002360| 40 66 69 6c 65 6c 69 6e | 65 0a 20 20 20 20 20 20 |@filelin|e. |
|00002370| 20 5c 65 6c 73 65 7b 0a | 09 20 20 5c 6f 62 65 79 | \else{.|. \obey|
|00002380| 73 70 61 63 65 73 0a 20 | 20 20 20 20 20 20 20 20 |spaces. | |
|00002390| 20 5c 72 65 61 64 5c 70 | 73 40 73 74 72 65 61 6d | \read\p|s@stream|
|000023a0| 20 74 6f 20 5c 65 70 73 | 66 40 74 6d 70 5c 67 6c | to \eps|f@tmp\gl|
|000023b0| 6f 62 61 6c 5c 6c 65 74 | 5c 65 70 73 66 40 66 69 |obal\let|\epsf@fi|
|000023c0| 6c 65 6c 69 6e 65 5c 65 | 70 73 66 40 74 6d 70 7d |leline\e|psf@tmp}|
|000023d0| 0a 20 20 20 20 20 20 20 | 5c 66 69 0a 20 20 20 20 |. |\fi. |
|000023e0| 20 20 20 5c 69 66 65 6f | 66 5c 70 73 40 73 74 72 | \ifeo|f\ps@str|
|000023f0| 65 61 6d 5c 6e 6f 74 40 | 65 6f 66 66 61 6c 73 65 |eam\not@|eoffalse|
|00002400| 5c 65 6c 73 65 0a 25 0a | 25 20 20 20 43 68 65 63 |\else.%.|% Chec|
|00002410| 6b 20 74 68 65 20 66 69 | 72 73 74 20 6c 69 6e 65 |k the fi|rst line|
|00002420| 20 66 6f 72 20 60 25 21 | 27 2e 20 20 49 73 73 75 | for `%!|'. Issu|
|00002430| 65 20 61 20 77 61 72 6e | 69 6e 67 20 6d 65 73 73 |e a warn|ing mess|
|00002440| 61 67 65 20 69 66 20 69 | 74 73 20 6e 6f 74 0a 25 |age if i|ts not.%|
|00002450| 20 20 20 74 68 65 72 65 | 2c 20 73 69 6e 63 65 20 | there|, since |
|00002460| 74 68 65 20 66 69 6c 65 | 20 6d 69 67 68 74 20 6e |the file| might n|
|00002470| 6f 74 20 62 65 20 61 20 | 50 6f 73 74 53 63 72 69 |ot be a |PostScri|
|00002480| 70 74 20 66 69 6c 65 2e | 0a 25 0a 20 20 20 20 20 |pt file.|.%. |
|00002490| 20 20 5c 69 66 40 70 73 | 66 69 6c 65 5c 65 6c 73 | \if@ps|file\els|
|000024a0| 65 0a 20 20 20 20 20 20 | 20 5c 65 78 70 61 6e 64 |e. | \expand|
|000024b0| 61 66 74 65 72 5c 65 70 | 73 66 40 74 65 73 74 5c |after\ep|sf@test\|
|000024c0| 65 70 73 66 40 66 69 6c | 65 6c 69 6e 65 3a 2e 20 |epsf@fil|eline:. |
|000024d0| 5c 5c 25 0a 20 20 20 20 | 20 20 20 5c 66 69 0a 25 |\\%. | \fi.%|
|000024e0| 0a 25 20 20 20 57 65 20 | 63 68 65 63 6b 20 74 6f |.% We |check to|
|000024f0| 20 73 65 65 20 69 66 20 | 74 68 65 20 66 69 72 73 | see if |the firs|
|00002500| 74 20 63 68 61 72 61 63 | 74 65 72 20 69 73 20 61 |t charac|ter is a|
|00002510| 20 25 20 73 69 67 6e 3b | 0a 25 20 20 20 69 66 20 | % sign;|.% if |
|00002520| 73 6f 2c 20 77 65 20 6c | 6f 6f 6b 20 66 75 72 74 |so, we l|ook furt|
|00002530| 68 65 72 20 61 6e 64 20 | 73 74 6f 70 20 6f 6e 6c |her and |stop onl|
|00002540| 79 20 69 66 20 74 68 65 | 20 6c 69 6e 65 20 62 65 |y if the| line be|
|00002550| 67 69 6e 73 20 77 69 74 | 68 0a 25 20 20 20 60 25 |gins wit|h.% `%|
|00002560| 25 42 6f 75 6e 64 69 6e | 67 42 6f 78 3a 27 20 61 |%Boundin|gBox:' a|
|00002570| 6e 64 20 74 68 65 20 60 | 28 61 74 65 6e 64 29 27 |nd the `|(atend)'|
|00002580| 20 73 70 65 63 69 66 69 | 63 61 74 69 6f 6e 20 77 | specifi|cation w|
|00002590| 61 73 20 6e 6f 74 20 66 | 6f 75 6e 64 2e 0a 25 20 |as not f|ound..% |
|000025a0| 20 20 54 68 61 74 20 69 | 73 2c 20 74 68 65 20 6f | That i|s, the o|
|000025b0| 6e 6c 79 20 77 61 79 20 | 74 6f 20 73 74 6f 70 20 |nly way |to stop |
|000025c0| 69 73 20 77 68 65 6e 20 | 74 68 65 20 65 6e 64 20 |is when |the end |
|000025d0| 6f 66 20 66 69 6c 65 20 | 69 73 20 72 65 61 63 68 |of file |is reach|
|000025e0| 65 64 2c 0a 25 20 20 20 | 6f 72 20 61 20 60 25 25 |ed,.% |or a `%%|
|000025f0| 42 6f 75 6e 64 69 6e 67 | 42 6f 78 3a 20 6c 6c 78 |Bounding|Box: llx|
|00002600| 20 6c 6c 79 20 75 72 78 | 20 75 72 79 27 20 6c 69 | lly urx| ury' li|
|00002610| 6e 65 20 69 73 20 66 6f | 75 6e 64 2e 0a 25 0a 20 |ne is fo|und..%. |
|00002620| 20 20 20 20 20 20 20 20 | 20 5c 65 78 70 61 6e 64 | | \expand|
|00002630| 61 66 74 65 72 5c 65 70 | 73 66 40 61 75 78 5c 65 |after\ep|sf@aux\e|
|00002640| 70 73 66 40 66 69 6c 65 | 6c 69 6e 65 3a 2e 20 5c |psf@file|line:. \|
|00002650| 5c 25 0a 20 20 20 20 20 | 20 20 5c 66 69 0a 20 20 |\%. | \fi. |
|00002660| 20 5c 69 66 6e 6f 74 40 | 65 6f 66 5c 72 65 70 65 | \ifnot@|eof\repe|
|00002670| 61 74 0a 20 20 20 7d 5c | 63 6c 6f 73 65 69 6e 5c |at. }\|closein\|
|00002680| 70 73 40 73 74 72 65 61 | 6d 5c 66 69 7d 25 0a 25 |ps@strea|m\fi}%.%|
|00002690| 0a 25 20 54 68 69 73 20 | 74 65 73 74 73 20 69 66 |.% This |tests if|
|000026a0| 20 74 68 65 20 66 69 6c | 65 20 77 65 20 61 72 65 | the fil|e we are|
|000026b0| 20 72 65 61 64 69 6e 67 | 20 6c 6f 6f 6b 73 20 6c | reading| looks l|
|000026c0| 69 6b 65 20 61 20 50 6f | 73 74 53 63 72 69 70 74 |ike a Po|stScript|
|000026d0| 20 66 69 6c 65 2e 0a 25 | 0a 5c 6c 6f 6e 67 5c 64 | file..%|.\long\d|
|000026e0| 65 66 5c 65 70 73 66 40 | 74 65 73 74 23 31 23 32 |ef\epsf@|test#1#2|
|000026f0| 23 33 3a 23 34 5c 5c 7b | 5c 64 65 66 5c 65 70 73 |#3:#4\\{|\def\eps|
|00002700| 66 40 74 65 73 74 69 74 | 7b 23 31 23 32 7d 0a 09 |f@testit|{#1#2}..|
|00002710| 09 09 5c 69 66 78 5c 65 | 70 73 66 40 74 65 73 74 |..\ifx\e|psf@test|
|00002720| 69 74 5c 65 70 73 66 40 | 73 74 61 72 74 5c 65 6c |it\epsf@|start\el|
|00002730| 73 65 0a 5c 70 73 40 74 | 79 70 65 6f 75 74 7b 57 |se.\ps@t|ypeout{W|
|00002740| 61 72 6e 69 6e 67 21 20 | 46 69 6c 65 20 64 6f 65 |arning! |File doe|
|00002750| 73 20 6e 6f 74 20 73 74 | 61 72 74 20 77 69 74 68 |s not st|art with|
|00002760| 20 60 5c 65 70 73 66 40 | 73 74 61 72 74 27 2e 20 | `\epsf@|start'. |
|00002770| 20 49 74 20 6d 61 79 20 | 6e 6f 74 20 62 65 20 61 | It may |not be a|
|00002780| 20 50 6f 73 74 53 63 72 | 69 70 74 20 66 69 6c 65 | PostScr|ipt file|
|00002790| 2e 7d 0a 09 09 09 5c 66 | 69 0a 09 09 09 5c 40 70 |.}....\f|i....\@p|
|000027a0| 73 66 69 6c 65 74 72 75 | 65 7d 20 25 20 64 6f 6e |sfiletru|e} % don|
|000027b0| 27 74 20 74 65 73 74 20 | 61 66 74 65 72 20 31 73 |'t test |after 1s|
|000027c0| 74 20 6c 69 6e 65 0a 25 | 0a 25 20 20 20 57 65 20 |t line.%|.% We |
|000027d0| 73 74 69 6c 6c 20 6e 65 | 65 64 20 74 6f 20 64 65 |still ne|ed to de|
|000027e0| 66 69 6e 65 20 74 68 65 | 20 74 72 69 63 6b 79 20 |fine the| tricky |
|000027f0| 5c 65 70 73 66 40 61 75 | 78 20 6d 61 63 72 6f 2e |\epsf@au|x macro.|
|00002800| 20 54 68 69 73 20 72 65 | 71 75 69 72 65 73 0a 25 | This re|quires.%|
|00002810| 20 20 20 61 20 63 6f 75 | 70 6c 65 20 6f 66 20 6d | a cou|ple of m|
|00002820| 61 67 69 63 20 63 6f 6e | 73 74 61 6e 74 73 20 66 |agic con|stants f|
|00002830| 6f 72 20 63 6f 6d 70 61 | 72 69 73 6f 6e 20 70 75 |or compa|rison pu|
|00002840| 72 70 6f 73 65 73 2e 0a | 25 0a 7b 5c 63 61 74 63 |rposes..|%.{\catc|
|00002850| 6f 64 65 60 5c 25 3d 31 | 32 5c 67 6c 6f 62 61 6c |ode`\%=1|2\global|
|00002860| 5c 6c 65 74 5c 65 70 73 | 66 40 70 65 72 63 65 6e |\let\eps|f@percen|
|00002870| 74 3d 25 5c 67 6c 6f 62 | 61 6c 5c 64 65 66 5c 65 |t=%\glob|al\def\e|
|00002880| 70 73 66 40 62 62 6c 69 | 74 7b 25 42 6f 75 6e 64 |psf@bbli|t{%Bound|
|00002890| 69 6e 67 42 6f 78 7d 7d | 0a 25 0a 25 0a 25 20 20 |ingBox}}|.%.%.% |
|000028a0| 20 53 6f 20 77 65 27 72 | 65 20 72 65 61 64 79 20 | So we'r|e ready |
|000028b0| 74 6f 20 63 68 65 63 6b | 20 66 6f 72 20 60 25 42 |to check| for `%B|
|000028c0| 6f 75 6e 64 69 6e 67 42 | 6f 78 3a 27 20 61 6e 64 |oundingB|ox:' and|
|000028d0| 20 74 6f 20 67 72 61 62 | 20 74 68 65 0a 25 20 20 | to grab| the.% |
|000028e0| 20 76 61 6c 75 65 73 20 | 69 66 20 74 68 65 79 20 | values |if they |
|000028f0| 61 72 65 20 66 6f 75 6e | 64 2e 20 20 57 65 20 63 |are foun|d. We c|
|00002900| 6f 6e 74 69 6e 75 65 20 | 73 65 61 72 63 68 69 6e |ontinue |searchin|
|00002910| 67 20 69 66 20 60 28 61 | 74 20 65 6e 64 29 27 0a |g if `(a|t end)'.|
|00002920| 25 20 20 20 77 61 73 20 | 66 6f 75 6e 64 20 61 66 |% was |found af|
|00002930| 74 65 72 20 74 68 65 20 | 60 25 42 6f 75 6e 64 69 |ter the |`%Boundi|
|00002940| 6e 67 42 6f 78 3a 27 2e | 0a 25 0a 5c 6c 6f 6e 67 |ngBox:'.|.%.\long|
|00002950| 5c 64 65 66 5c 65 70 73 | 66 40 61 75 78 23 31 23 |\def\eps|f@aux#1#|
|00002960| 32 3a 23 33 5c 5c 7b 5c | 69 66 78 23 31 5c 65 70 |2:#3\\{\|ifx#1\ep|
|00002970| 73 66 40 70 65 72 63 65 | 6e 74 0a 20 20 20 5c 64 |sf@perce|nt. \d|
|00002980| 65 66 5c 65 70 73 66 40 | 74 65 73 74 69 74 7b 23 |ef\epsf@|testit{#|
|00002990| 32 7d 5c 69 66 78 5c 65 | 70 73 66 40 74 65 73 74 |2}\ifx\e|psf@test|
|000029a0| 69 74 5c 65 70 73 66 40 | 62 62 6c 69 74 0a 09 5c |it\epsf@|bblit..\|
|000029b0| 40 61 74 65 6e 64 66 61 | 6c 73 65 0a 20 20 20 20 |@atendfa|lse. |
|000029c0| 20 20 20 20 5c 65 70 73 | 66 40 61 74 65 6e 64 20 | \eps|f@atend |
|000029d0| 23 33 20 2e 20 5c 5c 25 | 0a 09 5c 69 66 40 61 74 |#3 . \\%|..\if@at|
|000029e0| 65 6e 64 09 0a 09 20 20 | 20 5c 69 66 40 76 65 72 |end... | \if@ver|
|000029f0| 62 6f 73 65 7b 0a 09 09 | 5c 70 73 40 74 79 70 65 |bose{...|\ps@type|
|00002a00| 6f 75 74 7b 70 73 66 69 | 67 3a 20 66 6f 75 6e 64 |out{psfi|g: found|
|00002a10| 20 60 28 61 74 65 6e 64 | 29 27 3b 20 63 6f 6e 74 | `(atend|)'; cont|
|00002a20| 69 6e 75 69 6e 67 20 73 | 65 61 72 63 68 7d 0a 09 |inuing s|earch}..|
|00002a30| 20 20 20 7d 5c 66 69 0a | 20 20 20 20 20 20 20 20 | }\fi.| |
|00002a40| 5c 65 6c 73 65 0a 20 20 | 20 20 20 20 20 20 5c 65 |\else. | \e|
|00002a50| 70 73 66 40 67 72 61 62 | 20 23 33 20 2e 20 2e 20 |psf@grab| #3 . . |
|00002a60| 2e 20 5c 5c 25 0a 20 20 | 20 20 20 20 20 20 5c 6e |. \\%. | \n|
|00002a70| 6f 74 40 65 6f 66 66 61 | 6c 73 65 0a 20 20 20 20 |ot@eoffa|lse. |
|00002a80| 20 20 20 20 5c 67 6c 6f | 62 61 6c 5c 6e 6f 40 62 | \glo|bal\no@b|
|00002a90| 62 66 61 6c 73 65 0a 20 | 20 20 20 20 20 20 20 5c |bfalse. | \|
|00002aa0| 66 69 0a 20 20 20 5c 66 | 69 5c 66 69 7d 25 0a 25 |fi. \f|i\fi}%.%|
|00002ab0| 0a 25 20 20 20 48 65 72 | 65 20 77 65 20 67 72 61 |.% Her|e we gra|
|00002ac0| 62 20 74 68 65 20 76 61 | 6c 75 65 73 20 61 6e 64 |b the va|lues and|
|00002ad0| 20 73 74 75 66 66 20 74 | 68 65 6d 20 69 6e 20 74 | stuff t|hem in t|
|00002ae0| 68 65 20 61 70 70 72 6f | 70 72 69 61 74 65 20 64 |he appro|priate d|
|00002af0| 65 66 69 6e 69 74 69 6f | 6e 73 2e 0a 25 0a 5c 64 |efinitio|ns..%.\d|
|00002b00| 65 66 5c 65 70 73 66 40 | 67 72 61 62 20 23 31 20 |ef\epsf@|grab #1 |
|00002b10| 23 32 20 23 33 20 23 34 | 20 23 35 5c 5c 7b 25 0a |#2 #3 #4| #5\\{%.|
|00002b20| 20 20 20 5c 67 6c 6f 62 | 61 6c 5c 64 65 66 5c 65 | \glob|al\def\e|
|00002b30| 70 73 66 40 6c 6c 78 7b | 23 31 7d 5c 69 66 78 5c |psf@llx{|#1}\ifx\|
|00002b40| 65 70 73 66 40 6c 6c 78 | 5c 65 6d 70 74 79 0a 20 |epsf@llx|\empty. |
|00002b50| 20 20 20 20 20 5c 65 70 | 73 66 40 67 72 61 62 20 | \ep|sf@grab |
|00002b60| 23 32 20 23 33 20 23 34 | 20 23 35 20 2e 5c 5c 5c |#2 #3 #4| #5 .\\\|
|00002b70| 65 6c 73 65 0a 20 20 20 | 5c 67 6c 6f 62 61 6c 5c |else. |\global\|
|00002b80| 64 65 66 5c 65 70 73 66 | 40 6c 6c 79 7b 23 32 7d |def\epsf|@lly{#2}|
|00002b90| 25 0a 20 20 20 5c 67 6c | 6f 62 61 6c 5c 64 65 66 |%. \gl|obal\def|
|00002ba0| 5c 65 70 73 66 40 75 72 | 78 7b 23 33 7d 5c 67 6c |\epsf@ur|x{#3}\gl|
|00002bb0| 6f 62 61 6c 5c 64 65 66 | 5c 65 70 73 66 40 75 72 |obal\def|\epsf@ur|
|00002bc0| 79 7b 23 34 7d 5c 66 69 | 7d 25 0a 25 0a 25 20 44 |y{#4}\fi|}%.%.% D|
|00002bd0| 65 74 65 72 6d 69 6e 65 | 20 69 66 20 74 68 65 20 |etermine| if the |
|00002be0| 73 74 75 66 66 20 66 6f | 6c 6c 6f 77 69 6e 67 20 |stuff fo|llowing |
|00002bf0| 74 68 65 20 25 25 42 6f | 75 6e 64 69 6e 67 42 6f |the %%Bo|undingBo|
|00002c00| 78 20 69 73 20 60 28 61 | 74 65 6e 64 29 27 0a 25 |x is `(a|tend)'.%|
|00002c10| 20 4a 2e 20 44 61 6e 69 | 65 6c 20 53 6d 69 74 68 | J. Dani|el Smith|
|00002c20| 2e 20 20 43 6f 70 69 65 | 64 20 66 72 6f 6d 20 5c |. Copie|d from \|
|00002c30| 65 70 73 66 40 67 72 61 | 62 20 61 62 6f 76 65 2e |epsf@gra|b above.|
|00002c40| 0a 25 0a 5c 64 65 66 5c | 65 70 73 66 40 61 74 65 |.%.\def\|epsf@ate|
|00002c50| 6e 64 6c 69 74 7b 28 61 | 74 65 6e 64 29 7d 20 0a |ndlit{(a|tend)} .|
|00002c60| 5c 64 65 66 5c 65 70 73 | 66 40 61 74 65 6e 64 20 |\def\eps|f@atend |
|00002c70| 23 31 20 23 32 20 23 33 | 5c 5c 7b 25 0a 20 20 20 |#1 #2 #3|\\{%. |
|00002c80| 5c 64 65 66 5c 65 70 73 | 66 40 74 6d 70 7b 23 31 |\def\eps|f@tmp{#1|
|00002c90| 7d 5c 69 66 78 5c 65 70 | 73 66 40 74 6d 70 5c 65 |}\ifx\ep|sf@tmp\e|
|00002ca0| 6d 70 74 79 0a 20 20 20 | 20 20 20 5c 65 70 73 66 |mpty. | \epsf|
|00002cb0| 40 61 74 65 6e 64 20 23 | 32 20 23 33 20 2e 5c 5c |@atend #|2 #3 .\\|
|00002cc0| 5c 65 6c 73 65 0a 20 20 | 20 5c 69 66 78 5c 65 70 |\else. | \ifx\ep|
|00002cd0| 73 66 40 74 6d 70 5c 65 | 70 73 66 40 61 74 65 6e |sf@tmp\e|psf@aten|
|00002ce0| 64 6c 69 74 5c 40 61 74 | 65 6e 64 74 72 75 65 5c |dlit\@at|endtrue\|
|00002cf0| 66 69 5c 66 69 7d 0a 0a | 0a 25 20 45 6e 64 20 6f |fi\fi}..|.% End o|
|00002d00| 66 20 66 69 6c 65 20 72 | 65 61 64 69 6e 67 20 73 |f file r|eading s|
|00002d10| 74 75 66 66 20 66 72 6f | 6d 20 65 70 73 66 2e 74 |tuff fro|m epsf.t|
|00002d20| 65 78 0a 25 25 25 25 25 | 25 25 25 25 25 25 25 25 |ex.%%%%%|%%%%%%%%|
|00002d30| 25 25 25 25 25 25 25 25 | 25 25 25 25 25 25 25 25 |%%%%%%%%|%%%%%%%%|
|00002d40| 25 25 25 25 25 25 25 25 | 25 25 25 25 25 25 25 25 |%%%%%%%%|%%%%%%%%|
|00002d50| 25 25 25 25 25 25 25 25 | 25 25 25 25 25 25 25 25 |%%%%%%%%|%%%%%%%%|
|00002d60| 25 25 25 25 25 25 0a 0a | 25 25 25 25 25 25 25 25 |%%%%%%..|%%%%%%%%|
|00002d70| 25 25 25 25 25 25 25 25 | 25 25 25 25 25 25 25 25 |%%%%%%%%|%%%%%%%%|
|00002d80| 25 25 25 25 25 25 25 25 | 25 25 25 25 25 25 25 25 |%%%%%%%%|%%%%%%%%|
|00002d90| 25 25 25 25 25 25 25 25 | 25 25 25 25 25 25 25 25 |%%%%%%%%|%%%%%%%%|
|00002da0| 25 25 25 25 25 25 25 25 | 25 25 25 0a 25 20 74 72 |%%%%%%%%|%%%.% tr|
|00002db0| 69 67 6f 6e 6f 6d 65 74 | 72 79 20 73 74 75 66 66 |igonomet|ry stuff|
|00002dc0| 20 66 72 6f 6d 20 22 74 | 72 69 67 2e 74 65 78 22 | from "t|rig.tex"|
|00002dd0| 0a 5c 63 68 61 72 64 65 | 66 5c 70 73 6c 65 74 74 |.\charde|f\pslett|
|00002de0| 65 72 20 3d 20 31 31 20 | 25 20 77 6f 6e 27 74 20 |er = 11 |% won't |
|00002df0| 63 6f 6e 66 6c 69 63 74 | 20 77 69 74 68 20 5c 62 |conflict| with \b|
|00002e00| 65 67 69 6e 7b 6c 65 74 | 74 65 72 7d 20 6e 6f 77 |egin{let|ter} now|
|00002e10| 2e 2e 2e 0a 5c 63 68 61 | 72 64 65 66 5c 6f 74 68 |....\cha|rdef\oth|
|00002e20| 65 72 20 3d 20 31 32 0a | 0a 5c 6e 65 77 69 66 20 |er = 12.|.\newif |
|00002e30| 5c 69 66 64 65 62 75 67 | 20 25 25 25 20 74 75 72 |\ifdebug| %%% tur|
|00002e40| 6e 20 6d 65 20 6f 6e 20 | 74 6f 20 73 65 65 20 54 |n me on |to see T|
|00002e50| 65 58 20 68 61 72 64 20 | 61 74 20 77 6f 72 6b 20 |eX hard |at work |
|00002e60| 2e 2e 2e 0a 5c 6e 65 77 | 69 66 5c 69 66 63 40 6d |....\new|if\ifc@m|
|00002e70| 70 75 74 65 20 25 25 25 | 20 64 6f 6e 27 74 20 6e |pute %%%| don't n|
|00002e80| 65 65 64 20 74 6f 20 63 | 6f 6d 70 75 74 65 20 73 |eed to c|ompute s|
|00002e90| 6f 6d 65 20 76 61 6c 75 | 65 73 0a 5c 63 40 6d 70 |ome valu|es.\c@mp|
|00002ea0| 75 74 65 74 72 75 65 20 | 25 20 62 75 74 20 61 73 |utetrue |% but as|
|00002eb0| 73 75 6d 65 20 74 68 61 | 74 20 77 65 20 64 6f 0a |sume tha|t we do.|
|00002ec0| 0a 5c 6c 65 74 5c 74 68 | 65 6e 20 3d 20 5c 72 65 |.\let\th|en = \re|
|00002ed0| 6c 61 78 0a 5c 64 65 66 | 5c 72 40 64 69 61 6e 7b |lax.\def|\r@dian{|
|00002ee0| 70 74 20 7d 0a 5c 6c 65 | 74 5c 72 40 64 69 61 6e |pt }.\le|t\r@dian|
|00002ef0| 73 20 3d 20 5c 72 40 64 | 69 61 6e 0a 5c 6c 65 74 |s = \r@d|ian.\let|
|00002f00| 5c 64 69 6d 65 6e 73 69 | 6f 6e 6c 65 73 73 40 6e |\dimensi|onless@n|
|00002f10| 69 74 20 3d 20 5c 72 40 | 64 69 61 6e 0a 5c 6c 65 |it = \r@|dian.\le|
|00002f20| 74 5c 64 69 6d 65 6e 73 | 69 6f 6e 6c 65 73 73 40 |t\dimens|ionless@|
|00002f30| 6e 69 74 73 20 3d 20 5c | 64 69 6d 65 6e 73 69 6f |nits = \|dimensio|
|00002f40| 6e 6c 65 73 73 40 6e 69 | 74 0a 5c 64 65 66 5c 69 |nless@ni|t.\def\i|
|00002f50| 6e 74 65 72 6e 61 6c 40 | 6e 69 74 7b 73 70 20 7d |nternal@|nit{sp }|
|00002f60| 0a 5c 6c 65 74 5c 69 6e | 74 65 72 6e 61 6c 40 6e |.\let\in|ternal@n|
|00002f70| 69 74 73 20 3d 20 5c 69 | 6e 74 65 72 6e 61 6c 40 |its = \i|nternal@|
|00002f80| 6e 69 74 0a 5c 6e 65 77 | 69 66 5c 69 66 73 74 69 |nit.\new|if\ifsti|
|00002f90| 6c 6c 63 40 6e 76 65 72 | 67 69 6e 67 0a 5c 64 65 |llc@nver|ging.\de|
|00002fa0| 66 20 5c 4d 65 73 73 40 | 67 65 20 23 31 7b 5c 69 |f \Mess@|ge #1{\i|
|00002fb0| 66 64 65 62 75 67 20 5c | 74 68 65 6e 20 5c 6d 65 |fdebug \|then \me|
|00002fc0| 73 73 61 67 65 20 7b 23 | 31 7d 20 5c 66 69 7d 0a |ssage {#|1} \fi}.|
|00002fd0| 0a 7b 20 25 25 25 20 54 | 68 69 6e 67 73 20 74 68 |.{ %%% T|hings th|
|00002fe0| 61 74 20 6e 65 65 64 20 | 61 62 6e 6f 72 6d 61 6c |at need |abnormal|
|00002ff0| 20 63 61 74 63 6f 64 65 | 73 20 25 25 25 0a 09 5c | catcode|s %%%..\|
|00003000| 63 61 74 63 6f 64 65 20 | 60 5c 40 20 3d 20 5c 70 |catcode |`\@ = \p|
|00003010| 73 6c 65 74 74 65 72 0a | 09 5c 67 64 65 66 20 5c |sletter.|.\gdef \|
|00003020| 6e 6f 64 69 6d 65 6e 20 | 7b 5c 65 78 70 61 6e 64 |nodimen |{\expand|
|00003030| 61 66 74 65 72 20 5c 6e | 40 64 69 6d 65 6e 20 5c |after \n|@dimen \|
|00003040| 74 68 65 20 5c 64 69 6d | 65 6e 7d 0a 09 5c 67 64 |the \dim|en}..\gd|
|00003050| 65 66 20 5c 74 65 72 6d | 20 23 31 20 23 32 20 23 |ef \term| #1 #2 #|
|00003060| 33 25 0a 09 20 20 20 20 | 20 20 20 7b 5c 65 64 65 |3%.. | {\ede|
|00003070| 66 20 5c 74 40 20 7b 5c | 74 68 65 20 23 31 7d 25 |f \t@ {\|the #1}%|
|00003080| 25 25 20 66 72 65 65 7a | 65 20 70 61 72 61 6d 65 |%% freez|e parame|
|00003090| 74 65 72 20 31 20 28 63 | 6f 75 6e 74 2c 20 62 79 |ter 1 (c|ount, by|
|000030a0| 20 76 61 6c 75 65 29 0a | 09 09 5c 65 64 65 66 20 | value).|..\edef |
|000030b0| 5c 74 40 40 20 7b 5c 65 | 78 70 61 6e 64 61 66 74 |\t@@ {\e|xpandaft|
|000030c0| 65 72 20 5c 6e 40 64 69 | 6d 65 6e 20 5c 74 68 65 |er \n@di|men \the|
|000030d0| 20 23 32 5c 72 40 64 69 | 61 6e 7d 25 0a 09 09 09 | #2\r@di|an}%....|
|000030e0| 09 20 20 20 25 25 25 20 | 66 72 65 65 7a 65 20 70 |. %%% |freeze p|
|000030f0| 61 72 61 6d 65 74 65 72 | 20 32 20 28 64 69 6d 65 |arameter| 2 (dime|
|00003100| 6e 2c 20 62 79 20 76 61 | 6c 75 65 29 0a 09 09 5c |n, by va|lue)...\|
|00003110| 74 40 72 6d 20 7b 5c 74 | 40 7d 20 7b 5c 74 40 40 |t@rm {\t|@} {\t@@|
|00003120| 7d 20 7b 23 33 7d 25 0a | 09 20 20 20 20 20 20 20 |} {#3}%.|. |
|00003130| 7d 0a 09 5c 67 64 65 66 | 20 5c 74 40 72 6d 20 23 |}..\gdef| \t@rm #|
|00003140| 31 20 23 32 20 23 33 25 | 0a 09 20 20 20 20 20 20 |1 #2 #3%|.. |
|00003150| 20 7b 7b 25 0a 09 09 5c | 63 6f 75 6e 74 20 30 20 | {{%...\|count 0 |
|00003160| 3d 20 30 0a 09 09 5c 64 | 69 6d 65 6e 20 30 20 3d |= 0...\d|imen 0 =|
|00003170| 20 31 20 5c 64 69 6d 65 | 6e 73 69 6f 6e 6c 65 73 | 1 \dime|nsionles|
|00003180| 73 40 6e 69 74 0a 09 09 | 5c 64 69 6d 65 6e 20 32 |s@nit...|\dimen 2|
|00003190| 20 3d 20 23 32 5c 72 65 | 6c 61 78 0a 09 09 5c 4d | = #2\re|lax...\M|
|000031a0| 65 73 73 40 67 65 20 7b | 43 61 6c 63 75 6c 61 74 |ess@ge {|Calculat|
|000031b0| 69 6e 67 20 74 65 72 6d | 20 23 31 20 6f 66 20 5c |ing term| #1 of \|
|000031c0| 6e 6f 64 69 6d 65 6e 20 | 32 7d 25 0a 09 09 5c 6c |nodimen |2}%...\l|
|000031d0| 6f 6f 70 0a 09 09 5c 69 | 66 6e 75 6d 09 5c 63 6f |oop...\i|fnum.\co|
|000031e0| 75 6e 74 20 30 20 3c 20 | 23 31 0a 09 09 5c 74 68 |unt 0 < |#1...\th|
|000031f0| 65 6e 09 5c 61 64 76 61 | 6e 63 65 20 5c 63 6f 75 |en.\adva|nce \cou|
|00003200| 6e 74 20 30 20 62 79 20 | 31 0a 09 09 09 5c 4d 65 |nt 0 by |1....\Me|
|00003210| 73 73 40 67 65 20 7b 49 | 74 65 72 61 74 69 6f 6e |ss@ge {I|teration|
|00003220| 20 5c 74 68 65 20 5c 63 | 6f 75 6e 74 20 30 20 5c | \the \c|ount 0 \|
|00003230| 73 70 61 63 65 7d 25 0a | 09 09 09 5c 4d 75 6c 74 |space}%.|...\Mult|
|00003240| 69 70 6c 79 20 5c 64 69 | 6d 65 6e 20 30 20 62 79 |iply \di|men 0 by|
|00003250| 20 7b 5c 64 69 6d 65 6e | 20 32 7d 25 0a 09 09 09 | {\dimen| 2}%....|
|00003260| 5c 4d 65 73 73 40 67 65 | 20 7b 41 66 74 65 72 20 |\Mess@ge| {After |
|00003270| 6d 75 6c 74 69 70 6c 69 | 63 61 74 69 6f 6e 2c 20 |multipli|cation, |
|00003280| 74 65 72 6d 20 3d 20 5c | 6e 6f 64 69 6d 65 6e 20 |term = \|nodimen |
|00003290| 30 7d 25 0a 09 09 09 5c | 44 69 76 69 64 65 20 5c |0}%....\|Divide \|
|000032a0| 64 69 6d 65 6e 20 30 20 | 62 79 20 7b 5c 63 6f 75 |dimen 0 |by {\cou|
|000032b0| 6e 74 20 30 7d 25 0a 09 | 09 09 5c 4d 65 73 73 40 |nt 0}%..|..\Mess@|
|000032c0| 67 65 20 7b 41 66 74 65 | 72 20 64 69 76 69 73 69 |ge {Afte|r divisi|
|000032d0| 6f 6e 2c 20 74 65 72 6d | 20 3d 20 5c 6e 6f 64 69 |on, term| = \nodi|
|000032e0| 6d 65 6e 20 30 7d 25 0a | 09 09 5c 72 65 70 65 61 |men 0}%.|..\repea|
|000032f0| 74 0a 09 09 5c 4d 65 73 | 73 40 67 65 20 7b 46 69 |t...\Mes|s@ge {Fi|
|00003300| 6e 61 6c 20 76 61 6c 75 | 65 20 66 6f 72 20 74 65 |nal valu|e for te|
|00003310| 72 6d 20 23 31 20 6f 66 | 20 0a 09 09 09 09 5c 6e |rm #1 of| .....\n|
|00003320| 6f 64 69 6d 65 6e 20 32 | 20 5c 73 70 61 63 65 20 |odimen 2| \space |
|00003330| 69 73 20 5c 6e 6f 64 69 | 6d 65 6e 20 30 7d 25 0a |is \nodi|men 0}%.|
|00003340| 09 09 5c 78 64 65 66 20 | 5c 54 65 72 6d 20 7b 23 |..\xdef |\Term {#|
|00003350| 33 20 3d 20 5c 6e 6f 64 | 69 6d 65 6e 20 30 20 5c |3 = \nod|imen 0 \|
|00003360| 72 40 64 69 61 6e 73 7d | 25 0a 09 09 5c 61 66 74 |r@dians}|%...\aft|
|00003370| 65 72 67 72 6f 75 70 20 | 5c 54 65 72 6d 0a 09 20 |ergroup |\Term.. |
|00003380| 20 20 20 20 20 20 7d 7d | 0a 09 5c 63 61 74 63 6f | }}|..\catco|
|00003390| 64 65 20 60 5c 70 20 3d | 20 5c 6f 74 68 65 72 0a |de `\p =| \other.|
|000033a0| 09 5c 63 61 74 63 6f 64 | 65 20 60 5c 74 20 3d 20 |.\catcod|e `\t = |
|000033b0| 5c 6f 74 68 65 72 0a 09 | 5c 67 64 65 66 20 5c 6e |\other..|\gdef \n|
|000033c0| 40 64 69 6d 65 6e 20 23 | 31 70 74 7b 23 31 7d 20 |@dimen #|1pt{#1} |
|000033d0| 25 25 25 20 74 68 72 6f | 77 20 61 77 61 79 20 74 |%%% thro|w away t|
|000033e0| 68 65 20 60 60 70 74 27 | 27 0a 7d 0a 0a 5c 64 65 |he ``pt'|'.}..\de|
|000033f0| 66 20 5c 44 69 76 69 64 | 65 20 23 31 62 79 20 23 |f \Divid|e #1by #|
|00003400| 32 7b 5c 64 69 76 69 64 | 65 20 23 31 20 62 79 20 |2{\divid|e #1 by |
|00003410| 23 32 7d 20 25 25 25 20 | 6a 75 73 74 20 61 20 73 |#2} %%% |just a s|
|00003420| 79 6e 6f 6e 79 6d 0a 0a | 5c 64 65 66 20 5c 4d 75 |ynonym..|\def \Mu|
|00003430| 6c 74 69 70 6c 79 20 23 | 31 62 79 20 23 32 25 25 |ltiply #|1by #2%%|
|00003440| 25 20 61 6c 6c 6f 77 73 | 20 64 69 76 69 73 69 6f |% allows| divisio|
|00003450| 6e 20 6f 66 20 61 20 64 | 69 6d 65 6e 20 62 79 20 |n of a d|imen by |
|00003460| 61 20 64 69 6d 65 6e 0a | 20 20 20 20 20 20 20 7b |a dimen.| {|
|00003470| 7b 25 25 25 20 73 68 6f | 75 6c 64 20 72 65 61 6c |{%%% sho|uld real|
|00003480| 6c 79 20 66 72 65 65 7a | 65 20 70 61 72 61 6d 65 |ly freez|e parame|
|00003490| 74 65 72 20 32 20 28 64 | 69 6d 65 6e 2c 20 70 61 |ter 2 (d|imen, pa|
|000034a0| 73 73 65 64 20 62 79 20 | 76 61 6c 75 65 29 0a 09 |ssed by |value)..|
|000034b0| 5c 63 6f 75 6e 74 20 30 | 20 3d 20 23 31 5c 72 65 |\count 0| = #1\re|
|000034c0| 6c 61 78 0a 09 5c 63 6f | 75 6e 74 20 32 20 3d 20 |lax..\co|unt 2 = |
|000034d0| 23 32 5c 72 65 6c 61 78 | 0a 09 5c 63 6f 75 6e 74 |#2\relax|..\count|
|000034e0| 20 34 20 3d 20 36 35 35 | 33 36 0a 09 5c 4d 65 73 | 4 = 655|36..\Mes|
|000034f0| 73 40 67 65 20 7b 42 65 | 66 6f 72 65 20 73 63 61 |s@ge {Be|fore sca|
|00003500| 6c 69 6e 67 2c 20 63 6f | 75 6e 74 20 30 20 3d 20 |ling, co|unt 0 = |
|00003510| 5c 74 68 65 20 5c 63 6f | 75 6e 74 20 30 20 5c 73 |\the \co|unt 0 \s|
|00003520| 70 61 63 65 20 61 6e 64 | 0a 09 09 09 63 6f 75 6e |pace and|....coun|
|00003530| 74 20 32 20 3d 20 5c 74 | 68 65 20 5c 63 6f 75 6e |t 2 = \t|he \coun|
|00003540| 74 20 32 7d 25 0a 09 5c | 69 66 6e 75 6d 09 5c 63 |t 2}%..\|ifnum.\c|
|00003550| 6f 75 6e 74 20 30 20 3e | 20 33 32 37 36 37 20 25 |ount 0 >| 32767 %|
|00003560| 25 25 20 64 6f 20 6f 75 | 72 20 62 65 73 74 20 74 |%% do ou|r best t|
|00003570| 6f 20 61 76 6f 69 64 20 | 6f 76 65 72 66 6c 6f 77 |o avoid |overflow|
|00003580| 0a 09 5c 74 68 65 6e 09 | 5c 64 69 76 69 64 65 20 |..\then.|\divide |
|00003590| 5c 63 6f 75 6e 74 20 30 | 20 62 79 20 34 0a 09 09 |\count 0| by 4...|
|000035a0| 5c 64 69 76 69 64 65 20 | 5c 63 6f 75 6e 74 20 34 |\divide |\count 4|
|000035b0| 20 62 79 20 34 0a 09 5c | 65 6c 73 65 09 5c 69 66 | by 4..\|else.\if|
|000035c0| 6e 75 6d 09 5c 63 6f 75 | 6e 74 20 30 20 3c 20 2d |num.\cou|nt 0 < -|
|000035d0| 33 32 37 36 37 0a 09 09 | 5c 74 68 65 6e 09 5c 64 |32767...|\then.\d|
|000035e0| 69 76 69 64 65 20 5c 63 | 6f 75 6e 74 20 30 20 62 |ivide \c|ount 0 b|
|000035f0| 79 20 34 0a 09 09 09 5c | 64 69 76 69 64 65 20 5c |y 4....\|divide \|
|00003600| 63 6f 75 6e 74 20 34 20 | 62 79 20 34 0a 09 09 5c |count 4 |by 4...\|
|00003610| 65 6c 73 65 0a 09 09 5c | 66 69 0a 09 5c 66 69 0a |else...\|fi..\fi.|
|00003620| 09 5c 69 66 6e 75 6d 09 | 5c 63 6f 75 6e 74 20 32 |.\ifnum.|\count 2|
|00003630| 20 3e 20 33 32 37 36 37 | 20 25 25 25 20 77 68 69 | > 32767| %%% whi|
|00003640| 6c 65 20 72 65 74 61 69 | 6e 69 6e 67 20 72 65 61 |le retai|ning rea|
|00003650| 73 6f 6e 61 62 6c 65 20 | 61 63 63 75 72 61 63 79 |sonable |accuracy|
|00003660| 0a 09 5c 74 68 65 6e 09 | 5c 64 69 76 69 64 65 20 |..\then.|\divide |
|00003670| 5c 63 6f 75 6e 74 20 32 | 20 62 79 20 34 0a 09 09 |\count 2| by 4...|
|00003680| 5c 64 69 76 69 64 65 20 | 5c 63 6f 75 6e 74 20 34 |\divide |\count 4|
|00003690| 20 62 79 20 34 0a 09 5c | 65 6c 73 65 09 5c 69 66 | by 4..\|else.\if|
|000036a0| 6e 75 6d 09 5c 63 6f 75 | 6e 74 20 32 20 3c 20 2d |num.\cou|nt 2 < -|
|000036b0| 33 32 37 36 37 0a 09 09 | 5c 74 68 65 6e 09 5c 64 |32767...|\then.\d|
|000036c0| 69 76 69 64 65 20 5c 63 | 6f 75 6e 74 20 32 20 62 |ivide \c|ount 2 b|
|000036d0| 79 20 34 0a 09 09 09 5c | 64 69 76 69 64 65 20 5c |y 4....\|divide \|
|000036e0| 63 6f 75 6e 74 20 34 20 | 62 79 20 34 0a 09 09 5c |count 4 |by 4...\|
|000036f0| 65 6c 73 65 0a 09 09 5c | 66 69 0a 09 5c 66 69 0a |else...\|fi..\fi.|
|00003700| 09 5c 6d 75 6c 74 69 70 | 6c 79 20 5c 63 6f 75 6e |.\multip|ly \coun|
|00003710| 74 20 30 20 62 79 20 5c | 63 6f 75 6e 74 20 32 0a |t 0 by \|count 2.|
|00003720| 09 5c 64 69 76 69 64 65 | 20 5c 63 6f 75 6e 74 20 |.\divide| \count |
|00003730| 30 20 62 79 20 5c 63 6f | 75 6e 74 20 34 0a 09 5c |0 by \co|unt 4..\|
|00003740| 78 64 65 66 20 5c 70 72 | 6f 64 75 63 74 20 7b 23 |xdef \pr|oduct {#|
|00003750| 31 20 3d 20 5c 74 68 65 | 20 5c 63 6f 75 6e 74 20 |1 = \the| \count |
|00003760| 30 20 5c 69 6e 74 65 72 | 6e 61 6c 40 6e 69 74 73 |0 \inter|nal@nits|
|00003770| 7d 25 0a 09 5c 61 66 74 | 65 72 67 72 6f 75 70 20 |}%..\aft|ergroup |
|00003780| 5c 70 72 6f 64 75 63 74 | 0a 20 20 20 20 20 20 20 |\product|. |
|00003790| 7d 7d 0a 0a 5c 64 65 66 | 5c 72 40 64 75 63 65 7b |}}..\def|\r@duce{|
|000037a0| 5c 69 66 64 69 6d 5c 64 | 69 6d 65 6e 30 20 3e 20 |\ifdim\d|imen0 > |
|000037b0| 39 30 5c 72 40 64 69 61 | 6e 20 5c 74 68 65 6e 20 |90\r@dia|n \then |
|000037c0| 20 20 25 20 73 69 6e 28 | 78 2b 39 30 29 20 3d 20 | % sin(|x+90) = |
|000037d0| 73 69 6e 28 31 38 30 2d | 78 29 0a 09 09 5c 6d 75 |sin(180-|x)...\mu|
|000037e0| 6c 74 69 70 6c 79 5c 64 | 69 6d 65 6e 30 20 62 79 |ltiply\d|imen0 by|
|000037f0| 20 2d 31 0a 09 09 5c 61 | 64 76 61 6e 63 65 5c 64 | -1...\a|dvance\d|
|00003800| 69 6d 65 6e 30 20 62 79 | 20 31 38 30 5c 72 40 64 |imen0 by| 180\r@d|
|00003810| 69 61 6e 0a 09 09 5c 72 | 40 64 75 63 65 0a 09 20 |ian...\r|@duce.. |
|00003820| 20 20 20 5c 65 6c 73 65 | 20 5c 69 66 64 69 6d 5c | \else| \ifdim\|
|00003830| 64 69 6d 65 6e 30 20 3c | 20 2d 39 30 5c 72 40 64 |dimen0 <| -90\r@d|
|00003840| 69 61 6e 20 5c 74 68 65 | 6e 20 20 25 20 73 69 6e |ian \the|n % sin|
|00003850| 28 2d 78 29 20 3d 20 73 | 69 6e 28 33 36 30 2b 78 |(-x) = s|in(360+x|
|00003860| 29 0a 09 09 5c 61 64 76 | 61 6e 63 65 5c 64 69 6d |)...\adv|ance\dim|
|00003870| 65 6e 30 20 62 79 20 33 | 36 30 5c 72 40 64 69 61 |en0 by 3|60\r@dia|
|00003880| 6e 0a 09 09 5c 72 40 64 | 75 63 65 0a 09 09 5c 66 |n...\r@d|uce...\f|
|00003890| 69 0a 09 20 20 20 20 5c | 66 69 7d 0a 0a 5c 64 65 |i.. \|fi}..\de|
|000038a0| 66 5c 53 69 6e 65 23 31 | 25 0a 20 20 20 20 20 20 |f\Sine#1|%. |
|000038b0| 20 7b 7b 25 0a 09 5c 64 | 69 6d 65 6e 20 30 20 3d | {{%..\d|imen 0 =|
|000038c0| 20 23 31 20 5c 72 40 64 | 69 61 6e 0a 09 5c 72 40 | #1 \r@d|ian..\r@|
|000038d0| 64 75 63 65 0a 09 5c 69 | 66 64 69 6d 5c 64 69 6d |duce..\i|fdim\dim|
|000038e0| 65 6e 30 20 3d 20 2d 39 | 30 5c 72 40 64 69 61 6e |en0 = -9|0\r@dian|
|000038f0| 20 5c 74 68 65 6e 0a 09 | 20 20 20 5c 64 69 6d 65 | \then..| \dime|
|00003900| 6e 34 20 3d 20 2d 31 5c | 72 40 64 69 61 6e 0a 09 |n4 = -1\|r@dian..|
|00003910| 20 20 20 5c 63 40 6d 70 | 75 74 65 66 61 6c 73 65 | \c@mp|utefalse|
|00003920| 0a 09 5c 66 69 0a 09 5c | 69 66 64 69 6d 5c 64 69 |..\fi..\|ifdim\di|
|00003930| 6d 65 6e 30 20 3d 20 39 | 30 5c 72 40 64 69 61 6e |men0 = 9|0\r@dian|
|00003940| 20 5c 74 68 65 6e 0a 09 | 20 20 20 5c 64 69 6d 65 | \then..| \dime|
|00003950| 6e 34 20 3d 20 31 5c 72 | 40 64 69 61 6e 0a 09 20 |n4 = 1\r|@dian.. |
|00003960| 20 20 5c 63 40 6d 70 75 | 74 65 66 61 6c 73 65 0a | \c@mpu|tefalse.|
|00003970| 09 5c 66 69 0a 09 5c 69 | 66 64 69 6d 5c 64 69 6d |.\fi..\i|fdim\dim|
|00003980| 65 6e 30 20 3d 20 30 5c | 72 40 64 69 61 6e 20 5c |en0 = 0\|r@dian \|
|00003990| 74 68 65 6e 0a 09 20 20 | 20 5c 64 69 6d 65 6e 34 |then.. | \dimen4|
|000039a0| 20 3d 20 30 5c 72 40 64 | 69 61 6e 0a 09 20 20 20 | = 0\r@d|ian.. |
|000039b0| 5c 63 40 6d 70 75 74 65 | 66 61 6c 73 65 0a 09 5c |\c@mpute|false..\|
|000039c0| 66 69 0a 25 0a 09 5c 69 | 66 63 40 6d 70 75 74 65 |fi.%..\i|fc@mpute|
|000039d0| 20 5c 74 68 65 6e 0a 20 | 20 20 20 20 20 20 20 09 | \then. | .|
|000039e0| 25 20 63 6f 6e 76 65 72 | 74 20 64 65 67 72 65 65 |% conver|t degree|
|000039f0| 73 20 74 6f 20 72 61 64 | 69 61 6e 73 0a 09 09 5c |s to rad|ians...\|
|00003a00| 64 69 76 69 64 65 5c 64 | 69 6d 65 6e 30 20 62 79 |divide\d|imen0 by|
|00003a10| 20 31 38 30 0a 09 09 5c | 64 69 6d 65 6e 30 3d 33 | 180...\|dimen0=3|
|00003a20| 2e 31 34 31 35 39 32 36 | 35 34 5c 64 69 6d 65 6e |.1415926|54\dimen|
|00003a30| 30 0a 25 0a 09 09 5c 64 | 69 6d 65 6e 20 32 20 3d |0.%...\d|imen 2 =|
|00003a40| 20 33 2e 31 34 31 35 39 | 32 36 35 33 35 38 39 37 | 3.14159|26535897|
|00003a50| 39 36 33 5c 72 40 64 69 | 61 6e 20 25 25 25 20 61 |963\r@di|an %%% a|
|00003a60| 20 77 65 6c 6c 2d 6b 6e | 6f 77 6e 20 63 6f 6e 73 | well-kn|own cons|
|00003a70| 74 61 6e 74 0a 09 09 5c | 64 69 76 69 64 65 5c 64 |tant...\|divide\d|
|00003a80| 69 6d 65 6e 20 32 20 62 | 79 20 32 20 25 25 25 20 |imen 2 b|y 2 %%% |
|00003a90| 77 65 20 6f 6e 6c 79 20 | 64 65 61 6c 20 77 69 74 |we only |deal wit|
|00003aa0| 68 20 2d 70 69 2f 32 20 | 3a 20 70 69 2f 32 0a 09 |h -pi/2 |: pi/2..|
|00003ab0| 09 5c 4d 65 73 73 40 67 | 65 20 7b 53 69 6e 3a 20 |.\Mess@g|e {Sin: |
|00003ac0| 63 61 6c 63 75 6c 61 74 | 69 6e 67 20 53 69 6e 20 |calculat|ing Sin |
|00003ad0| 6f 66 20 5c 6e 6f 64 69 | 6d 65 6e 20 30 7d 25 0a |of \nodi|men 0}%.|
|00003ae0| 09 09 5c 63 6f 75 6e 74 | 20 30 20 3d 20 31 20 25 |..\count| 0 = 1 %|
|00003af0| 25 25 20 73 65 65 20 70 | 6f 77 65 72 2d 73 65 72 |%% see p|ower-ser|
|00003b00| 69 65 73 20 65 78 70 61 | 6e 73 69 6f 6e 20 66 6f |ies expa|nsion fo|
|00003b10| 72 20 73 69 6e 65 0a 09 | 09 5c 64 69 6d 65 6e 20 |r sine..|.\dimen |
|00003b20| 32 20 3d 20 31 20 5c 72 | 40 64 69 61 6e 20 25 25 |2 = 1 \r|@dian %%|
|00003b30| 25 20 64 69 74 74 6f 0a | 09 09 5c 64 69 6d 65 6e |% ditto.|..\dimen|
|00003b40| 20 34 20 3d 20 30 20 5c | 72 40 64 69 61 6e 20 25 | 4 = 0 \|r@dian %|
|00003b50| 25 25 20 64 69 74 74 6f | 0a 09 09 5c 6c 6f 6f 70 |%% ditto|...\loop|
|00003b60| 0a 09 09 09 5c 69 66 6e | 75 6d 09 5c 64 69 6d 65 |....\ifn|um.\dime|
|00003b70| 6e 20 32 20 3d 20 30 20 | 25 25 25 20 74 68 65 6e |n 2 = 0 |%%% then|
|00003b80| 20 77 65 27 76 65 20 64 | 6f 6e 65 0a 09 09 09 5c | we've d|one....\|
|00003b90| 74 68 65 6e 09 5c 73 74 | 69 6c 6c 63 40 6e 76 65 |then.\st|illc@nve|
|00003ba0| 72 67 69 6e 67 66 61 6c | 73 65 20 0a 09 09 09 5c |rgingfal|se ....\|
|00003bb0| 65 6c 73 65 09 5c 73 74 | 69 6c 6c 63 40 6e 76 65 |else.\st|illc@nve|
|00003bc0| 72 67 69 6e 67 74 72 75 | 65 0a 09 09 09 5c 66 69 |rgingtru|e....\fi|
|00003bd0| 0a 09 09 09 5c 69 66 73 | 74 69 6c 6c 63 40 6e 76 |....\ifs|tillc@nv|
|00003be0| 65 72 67 69 6e 67 20 25 | 25 25 20 74 68 65 6e 20 |erging %|%% then |
|00003bf0| 63 61 6c 63 75 6c 61 74 | 65 20 6e 65 78 74 20 74 |calculat|e next t|
|00003c00| 65 72 6d 0a 09 09 09 5c | 74 68 65 6e 09 5c 74 65 |erm....\|then.\te|
|00003c10| 72 6d 20 7b 5c 63 6f 75 | 6e 74 20 30 7d 20 7b 5c |rm {\cou|nt 0} {\|
|00003c20| 64 69 6d 65 6e 20 30 7d | 20 7b 5c 64 69 6d 65 6e |dimen 0}| {\dimen|
|00003c30| 20 32 7d 25 0a 09 09 09 | 09 5c 61 64 76 61 6e 63 | 2}%....|.\advanc|
|00003c40| 65 20 5c 63 6f 75 6e 74 | 20 30 20 62 79 20 32 0a |e \count| 0 by 2.|
|00003c50| 09 09 09 09 5c 63 6f 75 | 6e 74 20 32 20 3d 20 5c |....\cou|nt 2 = \|
|00003c60| 63 6f 75 6e 74 20 30 0a | 09 09 09 09 5c 64 69 76 |count 0.|....\div|
|00003c70| 69 64 65 20 5c 63 6f 75 | 6e 74 20 32 20 62 79 20 |ide \cou|nt 2 by |
|00003c80| 32 0a 09 09 09 09 5c 69 | 66 6f 64 64 09 5c 63 6f |2.....\i|fodd.\co|
|00003c90| 75 6e 74 20 32 20 25 25 | 25 20 73 69 67 6e 73 20 |unt 2 %%|% signs |
|00003ca0| 61 6c 74 65 72 6e 61 74 | 65 0a 09 09 09 09 5c 74 |alternat|e.....\t|
|00003cb0| 68 65 6e 09 5c 61 64 76 | 61 6e 63 65 20 5c 64 69 |hen.\adv|ance \di|
|00003cc0| 6d 65 6e 20 34 20 62 79 | 20 5c 64 69 6d 65 6e 20 |men 4 by| \dimen |
|00003cd0| 32 0a 09 09 09 09 5c 65 | 6c 73 65 09 5c 61 64 76 |2.....\e|lse.\adv|
|00003ce0| 61 6e 63 65 20 5c 64 69 | 6d 65 6e 20 34 20 62 79 |ance \di|men 4 by|
|00003cf0| 20 2d 5c 64 69 6d 65 6e | 20 32 0a 09 09 09 09 5c | -\dimen| 2.....\|
|00003d00| 66 69 0a 09 09 5c 72 65 | 70 65 61 74 0a 09 5c 66 |fi...\re|peat..\f|
|00003d10| 69 09 09 0a 09 09 09 5c | 78 64 65 66 20 5c 73 69 |i......\|xdef \si|
|00003d20| 6e 65 20 7b 5c 6e 6f 64 | 69 6d 65 6e 20 34 7d 25 |ne {\nod|imen 4}%|
|00003d30| 0a 20 20 20 20 20 20 20 | 7d 7d 0a 0a 25 20 4e 6f |. |}}..% No|
|00003d40| 77 20 74 68 65 20 43 6f | 73 69 6e 65 20 63 61 6e |w the Co|sine can|
|00003d50| 20 62 65 20 63 61 6c 63 | 75 6c 61 74 65 64 20 65 | be calc|ulated e|
|00003d60| 61 73 69 6c 79 20 62 79 | 20 63 61 6c 6c 69 6e 67 |asily by| calling|
|00003d70| 20 5c 53 69 6e 65 0a 5c | 64 65 66 5c 43 6f 73 69 | \Sine.\|def\Cosi|
|00003d80| 6e 65 23 31 7b 5c 69 66 | 78 5c 73 69 6e 65 5c 55 |ne#1{\if|x\sine\U|
|00003d90| 6e 44 65 66 69 6e 65 64 | 5c 65 64 65 66 5c 53 61 |nDefined|\edef\Sa|
|00003da0| 76 65 73 69 6e 65 7b 5c | 72 65 6c 61 78 7d 5c 65 |vesine{\|relax}\e|
|00003db0| 6c 73 65 0a 09 09 20 20 | 20 20 20 20 20 20 20 20 |lse... | |
|00003dc0| 20 20 20 5c 65 64 65 66 | 5c 53 61 76 65 73 69 6e | \edef|\Savesin|
|00003dd0| 65 7b 5c 73 69 6e 65 7d | 5c 66 69 0a 09 7b 5c 64 |e{\sine}|\fi..{\d|
|00003de0| 69 6d 65 6e 30 3d 23 31 | 5c 72 40 64 69 61 6e 5c |imen0=#1|\r@dian\|
|00003df0| 61 64 76 61 6e 63 65 5c | 64 69 6d 65 6e 30 20 62 |advance\|dimen0 b|
|00003e00| 79 20 39 30 5c 72 40 64 | 69 61 6e 0a 09 20 5c 53 |y 90\r@d|ian.. \S|
|00003e10| 69 6e 65 7b 5c 6e 6f 64 | 69 6d 65 6e 20 30 7d 0a |ine{\nod|imen 0}.|
|00003e20| 09 20 5c 78 64 65 66 5c | 63 6f 73 69 6e 65 7b 5c |. \xdef\|cosine{\|
|00003e30| 73 69 6e 65 7d 0a 09 20 | 5c 78 64 65 66 5c 73 69 |sine}.. |\xdef\si|
|00003e40| 6e 65 7b 5c 53 61 76 65 | 73 69 6e 65 7d 7d 7d 09 |ne{\Save|sine}}}.|
|00003e50| 20 20 20 20 20 20 0a 25 | 20 65 6e 64 20 6f 66 20 | .%| end of |
|00003e60| 74 72 69 67 20 73 74 75 | 66 66 0a 25 25 25 25 25 |trig stu|ff.%%%%%|
|00003e70| 25 25 25 25 25 25 25 25 | 25 25 25 25 25 25 25 25 |%%%%%%%%|%%%%%%%%|
|00003e80| 25 25 25 25 25 25 25 25 | 25 25 25 25 25 25 25 25 |%%%%%%%%|%%%%%%%%|
|00003e90| 25 25 25 25 25 25 25 25 | 25 25 25 25 25 25 25 25 |%%%%%%%%|%%%%%%%%|
|00003ea0| 25 25 25 25 25 25 25 25 | 25 25 25 25 25 25 25 0a |%%%%%%%%|%%%%%%%.|
|00003eb0| 0a 5c 64 65 66 5c 70 73 | 64 72 61 66 74 7b 0a 09 |.\def\ps|draft{..|
|00003ec0| 5c 64 65 66 5c 40 70 73 | 64 72 61 66 74 7b 30 7d |\def\@ps|draft{0}|
|00003ed0| 0a 09 25 5c 70 73 40 74 | 79 70 65 6f 75 74 7b 64 |..%\ps@t|ypeout{d|
|00003ee0| 72 61 66 74 20 6c 65 76 | 65 6c 20 6e 6f 77 20 69 |raft lev|el now i|
|00003ef0| 73 20 5c 40 70 73 64 72 | 61 66 74 20 5c 73 70 61 |s \@psdr|aft \spa|
|00003f00| 63 65 20 2e 20 7d 0a 7d | 0a 5c 64 65 66 5c 70 73 |ce . }.}|.\def\ps|
|00003f10| 66 75 6c 6c 7b 0a 09 5c | 64 65 66 5c 40 70 73 64 |full{..\|def\@psd|
|00003f20| 72 61 66 74 7b 31 30 30 | 7d 0a 09 25 5c 70 73 40 |raft{100|}..%\ps@|
|00003f30| 74 79 70 65 6f 75 74 7b | 64 72 61 66 74 20 6c 65 |typeout{|draft le|
|00003f40| 76 65 6c 20 6e 6f 77 20 | 69 73 20 5c 40 70 73 64 |vel now |is \@psd|
|00003f50| 72 61 66 74 20 5c 73 70 | 61 63 65 20 2e 20 7d 0a |raft \sp|ace . }.|
|00003f60| 7d 0a 0a 5c 70 73 66 75 | 6c 6c 0a 0a 5c 6e 65 77 |}..\psfu|ll..\new|
|00003f70| 69 66 5c 69 66 40 73 63 | 61 6c 65 66 69 72 73 74 |if\if@sc|alefirst|
|00003f80| 0a 5c 64 65 66 5c 70 73 | 73 63 61 6c 65 66 69 72 |.\def\ps|scalefir|
|00003f90| 73 74 7b 5c 40 73 63 61 | 6c 65 66 69 72 73 74 74 |st{\@sca|lefirstt|
|00003fa0| 72 75 65 7d 0a 5c 64 65 | 66 5c 70 73 72 6f 74 61 |rue}.\de|f\psrota|
|00003fb0| 74 65 66 69 72 73 74 7b | 5c 40 73 63 61 6c 65 66 |tefirst{|\@scalef|
|00003fc0| 69 72 73 74 66 61 6c 73 | 65 7d 0a 5c 70 73 72 6f |irstfals|e}.\psro|
|00003fd0| 74 61 74 65 66 69 72 73 | 74 0a 0a 5c 6e 65 77 69 |tatefirs|t..\newi|
|00003fe0| 66 5c 69 66 40 64 72 61 | 66 74 62 6f 78 0a 5c 64 |f\if@dra|ftbox.\d|
|00003ff0| 65 66 5c 70 73 6e 6f 64 | 72 61 66 74 62 6f 78 7b |ef\psnod|raftbox{|
|00004000| 0a 09 5c 40 64 72 61 66 | 74 62 6f 78 66 61 6c 73 |..\@draf|tboxfals|
|00004010| 65 0a 7d 0a 5c 64 65 66 | 5c 70 73 64 72 61 66 74 |e.}.\def|\psdraft|
|00004020| 62 6f 78 7b 0a 09 5c 40 | 64 72 61 66 74 62 6f 78 |box{..\@|draftbox|
|00004030| 74 72 75 65 0a 7d 0a 5c | 40 64 72 61 66 74 62 6f |true.}.\|@draftbo|
|00004040| 78 74 72 75 65 0a 0a 5c | 6e 65 77 69 66 5c 69 66 |xtrue..\|newif\if|
|00004050| 40 70 72 6f 6c 6f 67 66 | 69 6c 65 0a 5c 6e 65 77 |@prologf|ile.\new|
|00004060| 69 66 5c 69 66 40 70 6f | 73 74 6c 6f 67 66 69 6c |if\if@po|stlogfil|
|00004070| 65 0a 5c 64 65 66 5c 70 | 73 73 69 6c 65 6e 74 7b |e.\def\p|ssilent{|
|00004080| 0a 09 5c 40 6e 6f 69 73 | 79 66 61 6c 73 65 0a 7d |..\@nois|yfalse.}|
|00004090| 0a 5c 64 65 66 5c 70 73 | 6e 6f 69 73 79 7b 0a 09 |.\def\ps|noisy{..|
|000040a0| 5c 40 6e 6f 69 73 79 74 | 72 75 65 0a 7d 0a 5c 70 |\@noisyt|rue.}.\p|
|000040b0| 73 6e 6f 69 73 79 0a 25 | 25 25 20 54 68 65 73 65 |snoisy.%|%% These|
|000040c0| 20 61 72 65 20 66 6f 72 | 20 74 68 65 20 6f 70 74 | are for| the opt|
|000040d0| 69 6f 6e 20 6c 69 73 74 | 2e 0a 25 25 25 20 41 20 |ion list|..%%% A |
|000040e0| 73 70 65 63 69 66 69 63 | 61 74 69 6f 6e 20 6f 66 |specific|ation of|
|000040f0| 20 74 68 65 20 66 6f 72 | 6d 20 61 20 3d 20 62 20 | the for|m a = b |
|00004100| 6d 61 70 73 20 74 6f 20 | 63 61 6c 6c 69 6e 67 20 |maps to |calling |
|00004110| 5c 40 70 40 40 73 61 7b | 62 7d 0a 5c 6e 65 77 69 |\@p@@sa{|b}.\newi|
|00004120| 66 5c 69 66 40 62 62 6c | 6c 78 0a 5c 6e 65 77 69 |f\if@bbl|lx.\newi|
|00004130| 66 5c 69 66 40 62 62 6c | 6c 79 0a 5c 6e 65 77 69 |f\if@bbl|ly.\newi|
|00004140| 66 5c 69 66 40 62 62 75 | 72 78 0a 5c 6e 65 77 69 |f\if@bbu|rx.\newi|
|00004150| 66 5c 69 66 40 62 62 75 | 72 79 0a 5c 6e 65 77 69 |f\if@bbu|ry.\newi|
|00004160| 66 5c 69 66 40 68 65 69 | 67 68 74 0a 5c 6e 65 77 |f\if@hei|ght.\new|
|00004170| 69 66 5c 69 66 40 77 69 | 64 74 68 0a 5c 6e 65 77 |if\if@wi|dth.\new|
|00004180| 69 66 5c 69 66 40 72 68 | 65 69 67 68 74 0a 5c 6e |if\if@rh|eight.\n|
|00004190| 65 77 69 66 5c 69 66 40 | 72 77 69 64 74 68 0a 5c |ewif\if@|rwidth.\|
|000041a0| 6e 65 77 69 66 5c 69 66 | 40 61 6e 67 6c 65 0a 5c |newif\if|@angle.\|
|000041b0| 6e 65 77 69 66 5c 69 66 | 40 63 6c 69 70 0a 5c 6e |newif\if|@clip.\n|
|000041c0| 65 77 69 66 5c 69 66 40 | 76 65 72 62 6f 73 65 0a |ewif\if@|verbose.|
|000041d0| 5c 64 65 66 5c 40 70 40 | 40 73 63 6c 69 70 23 31 |\def\@p@|@sclip#1|
|000041e0| 7b 5c 40 63 6c 69 70 74 | 72 75 65 7d 0a 25 0a 25 |{\@clipt|rue}.%.%|
|000041f0| 0a 5c 6e 65 77 69 66 5c | 69 66 40 64 65 63 6d 70 |.\newif\|if@decmp|
|00004200| 72 0a 25 0a 5c 64 65 66 | 5c 40 70 40 40 73 66 69 |r.%.\def|\@p@@sfi|
|00004210| 67 75 72 65 23 31 7b 5c | 64 65 66 5c 40 70 40 73 |gure#1{\|def\@p@s|
|00004220| 66 69 6c 65 7b 6e 75 6c | 6c 7d 5c 64 65 66 5c 40 |file{nul|l}\def\@|
|00004230| 70 40 73 62 62 66 69 6c | 65 7b 6e 75 6c 6c 7d 5c |p@sbbfil|e{null}\|
|00004240| 40 64 65 63 6d 70 72 66 | 61 6c 73 65 0a 20 20 20 |@decmprf|alse. |
|00004250| 25 20 6c 6f 6f 6b 20 64 | 69 72 65 63 74 6c 79 20 |% look d|irectly |
|00004260| 66 6f 72 20 66 69 6c 65 | 20 28 65 2e 67 2e 20 61 |for file| (e.g. a|
|00004270| 62 73 6f 6c 75 74 65 20 | 70 61 74 68 29 0a 20 20 |bsolute |path). |
|00004280| 20 5c 6f 70 65 6e 69 6e | 31 3d 5c 70 73 40 70 72 | \openin|1=\ps@pr|
|00004290| 65 64 69 72 23 31 0a 20 | 20 20 5c 69 66 65 6f 66 |edir#1. | \ifeof|
|000042a0| 31 0a 09 5c 63 6c 6f 73 | 65 69 6e 31 0a 09 25 20 |1..\clos|ein1..% |
|000042b0| 66 61 69 6c 65 64 2c 20 | 73 65 61 72 63 68 20 64 |failed, |search d|
|000042c0| 69 72 65 63 74 6f 72 69 | 65 73 20 66 6f 72 20 66 |irectori|es for f|
|000042d0| 69 6c 65 0a 09 5c 67 65 | 74 40 64 69 72 7b 23 31 |ile..\ge|t@dir{#1|
|000042e0| 7d 0a 09 5c 69 66 78 5c | 70 73 40 66 6f 75 6e 64 |}..\ifx\|ps@found|
|000042f0| 64 69 72 5c 6c 65 65 72 | 0a 09 09 25 20 66 61 69 |dir\leer|...% fai|
|00004300| 6c 65 64 2c 20 73 65 61 | 72 63 68 20 64 69 72 65 |led, sea|rch dire|
|00004310| 63 74 6c 79 20 66 6f 72 | 20 66 69 6c 65 2e 62 62 |ctly for| file.bb|
|00004320| 0a 09 09 5c 6f 70 65 6e | 69 6e 31 3d 5c 70 73 40 |...\open|in1=\ps@|
|00004330| 70 72 65 64 69 72 23 31 | 2e 62 62 0a 09 09 5c 69 |predir#1|.bb...\i|
|00004340| 66 65 6f 66 31 0a 09 09 | 09 5c 63 6c 6f 73 65 69 |feof1...|.\closei|
|00004350| 6e 31 0a 09 09 09 25 20 | 66 61 69 6c 65 64 2c 20 |n1....% |failed, |
|00004360| 73 65 61 72 63 68 20 64 | 69 72 65 63 74 6f 72 69 |search d|irectori|
|00004370| 65 73 20 66 6f 72 20 66 | 69 6c 65 2e 62 62 0a 09 |es for f|ile.bb..|
|00004380| 09 09 5c 67 65 74 40 64 | 69 72 7b 23 31 2e 62 62 |..\get@d|ir{#1.bb|
|00004390| 7d 0a 09 09 09 5c 69 66 | 78 5c 70 73 40 66 6f 75 |}....\if|x\ps@fou|
|000043a0| 6e 64 64 69 72 5c 6c 65 | 65 72 0a 09 09 09 09 25 |nddir\le|er.....%|
|000043b0| 20 66 61 69 6c 65 64 2c | 20 6c 6f 73 65 2e 0a 09 | failed,| lose...|
|000043c0| 09 09 09 5c 70 73 40 74 | 79 70 65 6f 75 74 7b 43 |...\ps@t|ypeout{C|
|000043d0| 61 6e 27 74 20 66 69 6e | 64 20 23 31 20 69 6e 20 |an't fin|d #1 in |
|000043e0| 5c 66 69 67 75 72 65 70 | 61 74 68 7d 0a 09 09 09 |\figurep|ath}....|
|000043f0| 5c 65 6c 73 65 0a 09 09 | 09 09 25 20 66 6f 75 6e |\else...|..% foun|
|00004400| 64 20 66 69 6c 65 2e 62 | 62 20 69 6e 20 73 65 61 |d file.b|b in sea|
|00004410| 72 63 68 20 64 69 72 0a | 09 09 09 09 5c 40 64 65 |rch dir.|....\@de|
|00004420| 63 6d 70 72 74 72 75 65 | 0a 09 09 09 09 5c 64 65 |cmprtrue|.....\de|
|00004430| 66 5c 40 70 40 73 66 69 | 6c 65 7b 5c 70 73 40 66 |f\@p@sfi|le{\ps@f|
|00004440| 6f 75 6e 64 64 69 72 5c | 70 73 40 64 69 72 23 31 |ounddir\|ps@dir#1|
|00004450| 7d 0a 09 09 09 09 5c 64 | 65 66 5c 40 70 40 73 62 |}.....\d|ef\@p@sb|
|00004460| 62 66 69 6c 65 7b 5c 70 | 73 40 66 6f 75 6e 64 64 |bfile{\p|s@foundd|
|00004470| 69 72 5c 70 73 40 64 69 | 72 23 31 2e 62 62 7d 0a |ir\ps@di|r#1.bb}.|
|00004480| 09 09 09 5c 66 69 0a 09 | 09 5c 65 6c 73 65 0a 09 |...\fi..|.\else..|
|00004490| 09 09 5c 63 6c 6f 73 65 | 69 6e 31 0a 09 09 09 25 |..\close|in1....%|
|000044a0| 66 6f 75 6e 64 20 66 69 | 6c 65 2e 62 62 20 64 69 |found fi|le.bb di|
|000044b0| 72 65 63 74 6c 79 0a 09 | 09 09 5c 40 64 65 63 6d |rectly..|..\@decm|
|000044c0| 70 72 74 72 75 65 0a 09 | 09 09 5c 64 65 66 5c 40 |prtrue..|..\def\@|
|000044d0| 70 40 73 66 69 6c 65 7b | 23 31 7d 0a 09 09 09 5c |p@sfile{|#1}....\|
|000044e0| 64 65 66 5c 40 70 40 73 | 62 62 66 69 6c 65 7b 23 |def\@p@s|bbfile{#|
|000044f0| 31 2e 62 62 7d 0a 09 09 | 5c 66 69 0a 09 5c 65 6c |1.bb}...|\fi..\el|
|00004500| 73 65 0a 09 09 25 20 66 | 6f 75 6e 64 20 66 69 6c |se...% f|ound fil|
|00004510| 65 20 69 6e 20 73 65 61 | 72 63 68 20 64 69 72 0a |e in sea|rch dir.|
|00004520| 09 09 5c 64 65 66 5c 40 | 70 40 73 66 69 6c 65 7b |..\def\@|p@sfile{|
|00004530| 5c 70 73 40 66 6f 75 6e | 64 64 69 72 5c 70 73 40 |\ps@foun|ddir\ps@|
|00004540| 64 69 72 23 31 7d 0a 09 | 09 5c 64 65 66 5c 40 70 |dir#1}..|.\def\@p|
|00004550| 40 73 62 62 66 69 6c 65 | 7b 5c 70 73 40 66 6f 75 |@sbbfile|{\ps@fou|
|00004560| 6e 64 64 69 72 5c 70 73 | 40 64 69 72 23 31 7d 0a |nddir\ps|@dir#1}.|
|00004570| 09 5c 66 69 0a 20 20 20 | 5c 65 6c 73 65 0a 09 25 |.\fi. |\else..%|
|00004580| 20 66 6f 75 6e 64 20 66 | 69 6c 65 20 64 69 72 65 | found f|ile dire|
|00004590| 63 74 6c 79 0a 09 5c 63 | 6c 6f 73 65 69 6e 31 0a |ctly..\c|losein1.|
|000045a0| 09 5c 64 65 66 5c 40 70 | 40 73 66 69 6c 65 7b 23 |.\def\@p|@sfile{#|
|000045b0| 31 7d 0a 09 5c 64 65 66 | 5c 40 70 40 73 62 62 66 |1}..\def|\@p@sbbf|
|000045c0| 69 6c 65 7b 23 31 7d 0a | 20 20 20 5c 66 69 0a 7d |ile{#1}.| \fi.}|
|000045d0| 0a 25 0a 25 0a 25 0a 5c | 64 65 66 5c 40 70 40 40 |.%.%.%.\|def\@p@@|
|000045e0| 73 66 69 6c 65 23 31 7b | 5c 40 70 40 40 73 66 69 |sfile#1{|\@p@@sfi|
|000045f0| 67 75 72 65 7b 23 31 7d | 7d 0a 25 0a 5c 64 65 66 |gure{#1}|}.%.\def|
|00004600| 5c 40 70 40 40 73 62 62 | 6c 6c 78 23 31 7b 0a 09 |\@p@@sbb|llx#1{..|
|00004610| 09 25 5c 70 73 40 74 79 | 70 65 6f 75 74 7b 62 62 |.%\ps@ty|peout{bb|
|00004620| 6c 6c 78 20 69 73 20 23 | 31 7d 0a 09 09 5c 40 62 |llx is #|1}...\@b|
|00004630| 62 6c 6c 78 74 72 75 65 | 0a 09 09 5c 64 69 6d 65 |bllxtrue|...\dime|
|00004640| 6e 31 30 30 3d 23 31 0a | 09 09 5c 65 64 65 66 5c |n100=#1.|..\edef\|
|00004650| 40 70 40 73 62 62 6c 6c | 78 7b 5c 6e 75 6d 62 65 |@p@sbbll|x{\numbe|
|00004660| 72 5c 64 69 6d 65 6e 31 | 30 30 7d 0a 7d 0a 5c 64 |r\dimen1|00}.}.\d|
|00004670| 65 66 5c 40 70 40 40 73 | 62 62 6c 6c 79 23 31 7b |ef\@p@@s|bblly#1{|
|00004680| 0a 09 09 25 5c 70 73 40 | 74 79 70 65 6f 75 74 7b |...%\ps@|typeout{|
|00004690| 62 62 6c 6c 79 20 69 73 | 20 23 31 7d 0a 09 09 5c |bblly is| #1}...\|
|000046a0| 40 62 62 6c 6c 79 74 72 | 75 65 0a 09 09 5c 64 69 |@bbllytr|ue...\di|
|000046b0| 6d 65 6e 31 30 30 3d 23 | 31 0a 09 09 5c 65 64 65 |men100=#|1...\ede|
|000046c0| 66 5c 40 70 40 73 62 62 | 6c 6c 79 7b 5c 6e 75 6d |f\@p@sbb|lly{\num|
|000046d0| 62 65 72 5c 64 69 6d 65 | 6e 31 30 30 7d 0a 7d 0a |ber\dime|n100}.}.|
|000046e0| 5c 64 65 66 5c 40 70 40 | 40 73 62 62 75 72 78 23 |\def\@p@|@sbburx#|
|000046f0| 31 7b 0a 09 09 25 5c 70 | 73 40 74 79 70 65 6f 75 |1{...%\p|s@typeou|
|00004700| 74 7b 62 62 75 72 78 20 | 69 73 20 23 31 7d 0a 09 |t{bburx |is #1}..|
|00004710| 09 5c 40 62 62 75 72 78 | 74 72 75 65 0a 09 09 5c |.\@bburx|true...\|
|00004720| 64 69 6d 65 6e 31 30 30 | 3d 23 31 0a 09 09 5c 65 |dimen100|=#1...\e|
|00004730| 64 65 66 5c 40 70 40 73 | 62 62 75 72 78 7b 5c 6e |def\@p@s|bburx{\n|
|00004740| 75 6d 62 65 72 5c 64 69 | 6d 65 6e 31 30 30 7d 0a |umber\di|men100}.|
|00004750| 7d 0a 5c 64 65 66 5c 40 | 70 40 40 73 62 62 75 72 |}.\def\@|p@@sbbur|
|00004760| 79 23 31 7b 0a 09 09 25 | 5c 70 73 40 74 79 70 65 |y#1{...%|\ps@type|
|00004770| 6f 75 74 7b 62 62 75 72 | 79 20 69 73 20 23 31 7d |out{bbur|y is #1}|
|00004780| 0a 09 09 5c 40 62 62 75 | 72 79 74 72 75 65 0a 09 |...\@bbu|rytrue..|
|00004790| 09 5c 64 69 6d 65 6e 31 | 30 30 3d 23 31 0a 09 09 |.\dimen1|00=#1...|
|000047a0| 5c 65 64 65 66 5c 40 70 | 40 73 62 62 75 72 79 7b |\edef\@p|@sbbury{|
|000047b0| 5c 6e 75 6d 62 65 72 5c | 64 69 6d 65 6e 31 30 30 |\number\|dimen100|
|000047c0| 7d 0a 7d 0a 5c 64 65 66 | 5c 40 70 40 40 73 68 65 |}.}.\def|\@p@@she|
|000047d0| 69 67 68 74 23 31 7b 0a | 09 09 5c 40 68 65 69 67 |ight#1{.|..\@heig|
|000047e0| 68 74 74 72 75 65 0a 09 | 09 5c 64 69 6d 65 6e 31 |httrue..|.\dimen1|
|000047f0| 30 30 3d 23 31 0a 20 20 | 20 09 09 5c 65 64 65 66 |00=#1. | ..\edef|
|00004800| 5c 40 70 40 73 68 65 69 | 67 68 74 7b 5c 6e 75 6d |\@p@shei|ght{\num|
|00004810| 62 65 72 5c 64 69 6d 65 | 6e 31 30 30 7d 0a 09 09 |ber\dime|n100}...|
|00004820| 25 5c 70 73 40 74 79 70 | 65 6f 75 74 7b 48 65 69 |%\ps@typ|eout{Hei|
|00004830| 67 68 74 20 69 73 20 5c | 40 70 40 73 68 65 69 67 |ght is \|@p@sheig|
|00004840| 68 74 7d 0a 7d 0a 5c 64 | 65 66 5c 40 70 40 40 73 |ht}.}.\d|ef\@p@@s|
|00004850| 77 69 64 74 68 23 31 7b | 0a 09 09 25 5c 70 73 40 |width#1{|...%\ps@|
|00004860| 74 79 70 65 6f 75 74 7b | 57 69 64 74 68 20 69 73 |typeout{|Width is|
|00004870| 20 23 31 7d 0a 09 09 5c | 40 77 69 64 74 68 74 72 | #1}...\|@widthtr|
|00004880| 75 65 0a 09 09 5c 64 69 | 6d 65 6e 31 30 30 3d 23 |ue...\di|men100=#|
|00004890| 31 0a 09 09 5c 65 64 65 | 66 5c 40 70 40 73 77 69 |1...\ede|f\@p@swi|
|000048a0| 64 74 68 7b 5c 6e 75 6d | 62 65 72 5c 64 69 6d 65 |dth{\num|ber\dime|
|000048b0| 6e 31 30 30 7d 0a 7d 0a | 5c 64 65 66 5c 40 70 40 |n100}.}.|\def\@p@|
|000048c0| 40 73 72 68 65 69 67 68 | 74 23 31 7b 0a 09 09 25 |@srheigh|t#1{...%|
|000048d0| 5c 70 73 40 74 79 70 65 | 6f 75 74 7b 52 65 73 65 |\ps@type|out{Rese|
|000048e0| 72 76 65 64 20 68 65 69 | 67 68 74 20 69 73 20 23 |rved hei|ght is #|
|000048f0| 31 7d 0a 09 09 5c 40 72 | 68 65 69 67 68 74 74 72 |1}...\@r|heighttr|
|00004900| 75 65 0a 09 09 5c 64 69 | 6d 65 6e 31 30 30 3d 23 |ue...\di|men100=#|
|00004910| 31 0a 09 09 5c 65 64 65 | 66 5c 40 70 40 73 72 68 |1...\ede|f\@p@srh|
|00004920| 65 69 67 68 74 7b 5c 6e | 75 6d 62 65 72 5c 64 69 |eight{\n|umber\di|
|00004930| 6d 65 6e 31 30 30 7d 0a | 7d 0a 5c 64 65 66 5c 40 |men100}.|}.\def\@|
|00004940| 70 40 40 73 72 77 69 64 | 74 68 23 31 7b 0a 09 09 |p@@srwid|th#1{...|
|00004950| 25 5c 70 73 40 74 79 70 | 65 6f 75 74 7b 52 65 73 |%\ps@typ|eout{Res|
|00004960| 65 72 76 65 64 20 77 69 | 64 74 68 20 69 73 20 23 |erved wi|dth is #|
|00004970| 31 7d 0a 09 09 5c 40 72 | 77 69 64 74 68 74 72 75 |1}...\@r|widthtru|
|00004980| 65 0a 09 09 5c 64 69 6d | 65 6e 31 30 30 3d 23 31 |e...\dim|en100=#1|
|00004990| 0a 09 09 5c 65 64 65 66 | 5c 40 70 40 73 72 77 69 |...\edef|\@p@srwi|
|000049a0| 64 74 68 7b 5c 6e 75 6d | 62 65 72 5c 64 69 6d 65 |dth{\num|ber\dime|
|000049b0| 6e 31 30 30 7d 0a 7d 0a | 5c 64 65 66 5c 40 70 40 |n100}.}.|\def\@p@|
|000049c0| 40 73 61 6e 67 6c 65 23 | 31 7b 0a 09 09 25 5c 70 |@sangle#|1{...%\p|
|000049d0| 73 40 74 79 70 65 6f 75 | 74 7b 52 6f 74 61 74 69 |s@typeou|t{Rotati|
|000049e0| 6f 6e 20 69 73 20 23 31 | 7d 0a 09 09 5c 40 61 6e |on is #1|}...\@an|
|000049f0| 67 6c 65 74 72 75 65 0a | 25 09 09 5c 64 69 6d 65 |gletrue.|%..\dime|
|00004a00| 6e 31 30 30 3d 23 31 0a | 09 09 5c 65 64 65 66 5c |n100=#1.|..\edef\|
|00004a10| 40 70 40 73 61 6e 67 6c | 65 7b 23 31 7d 20 25 5c |@p@sangl|e{#1} %\|
|00004a20| 6e 75 6d 62 65 72 5c 64 | 69 6d 65 6e 31 30 30 7d |number\d|imen100}|
|00004a30| 0a 7d 0a 5c 64 65 66 5c | 40 70 40 40 73 73 69 6c |.}.\def\|@p@@ssil|
|00004a40| 65 6e 74 23 31 7b 20 0a | 09 09 5c 40 76 65 72 62 |ent#1{ .|..\@verb|
|00004a50| 6f 73 65 66 61 6c 73 65 | 0a 7d 0a 5c 64 65 66 5c |osefalse|.}.\def\|
|00004a60| 40 70 40 40 73 70 72 6f | 6c 6f 67 23 31 7b 5c 40 |@p@@spro|log#1{\@|
|00004a70| 70 72 6f 6c 6f 67 66 69 | 6c 65 74 72 75 65 5c 64 |prologfi|letrue\d|
|00004a80| 65 66 5c 40 70 72 6f 6c | 6f 67 66 69 6c 65 76 61 |ef\@prol|ogfileva|
|00004a90| 6c 7b 23 31 7d 7d 0a 5c | 64 65 66 5c 40 70 40 40 |l{#1}}.\|def\@p@@|
|00004aa0| 73 70 6f 73 74 6c 6f 67 | 23 31 7b 5c 40 70 6f 73 |spostlog|#1{\@pos|
|00004ab0| 74 6c 6f 67 66 69 6c 65 | 74 72 75 65 5c 64 65 66 |tlogfile|true\def|
|00004ac0| 5c 40 70 6f 73 74 6c 6f | 67 66 69 6c 65 76 61 6c |\@postlo|gfileval|
|00004ad0| 7b 23 31 7d 7d 0a 5c 64 | 65 66 5c 40 63 73 40 6e |{#1}}.\d|ef\@cs@n|
|00004ae0| 61 6d 65 23 31 7b 5c 63 | 73 6e 61 6d 65 20 23 31 |ame#1{\c|sname #1|
|00004af0| 5c 65 6e 64 63 73 6e 61 | 6d 65 7d 0a 5c 64 65 66 |\endcsna|me}.\def|
|00004b00| 5c 40 73 65 74 70 61 72 | 6d 73 23 31 3d 23 32 2c |\@setpar|ms#1=#2,|
|00004b10| 7b 5c 40 63 73 40 6e 61 | 6d 65 7b 40 70 40 40 73 |{\@cs@na|me{@p@@s|
|00004b20| 23 31 7d 7b 23 32 7d 7d | 0a 25 0a 25 20 69 6e 69 |#1}{#2}}|.%.% ini|
|00004b30| 74 69 61 6c 69 7a 65 20 | 74 68 65 20 64 65 66 61 |tialize |the defa|
|00004b40| 75 6c 74 73 20 28 73 69 | 7a 65 20 74 68 65 20 73 |ults (si|ze the s|
|00004b50| 69 7a 65 20 6f 66 20 74 | 68 65 20 66 69 67 75 72 |ize of t|he figur|
|00004b60| 65 29 0a 25 0a 5c 64 65 | 66 5c 70 73 40 69 6e 69 |e).%.\de|f\ps@ini|
|00004b70| 74 40 70 61 72 6d 73 7b | 0a 09 09 5c 40 62 62 6c |t@parms{|...\@bbl|
|00004b80| 6c 78 66 61 6c 73 65 20 | 5c 40 62 62 6c 6c 79 66 |lxfalse |\@bbllyf|
|00004b90| 61 6c 73 65 0a 09 09 5c | 40 62 62 75 72 78 66 61 |alse...\|@bburxfa|
|00004ba0| 6c 73 65 20 5c 40 62 62 | 75 72 79 66 61 6c 73 65 |lse \@bb|uryfalse|
|00004bb0| 0a 09 09 5c 40 68 65 69 | 67 68 74 66 61 6c 73 65 |...\@hei|ghtfalse|
|00004bc0| 20 5c 40 77 69 64 74 68 | 66 61 6c 73 65 0a 09 09 | \@width|false...|
|00004bd0| 5c 40 72 68 65 69 67 68 | 74 66 61 6c 73 65 20 5c |\@rheigh|tfalse \|
|00004be0| 40 72 77 69 64 74 68 66 | 61 6c 73 65 0a 09 09 5c |@rwidthf|alse...\|
|00004bf0| 64 65 66 5c 40 70 40 73 | 62 62 6c 6c 78 7b 7d 5c |def\@p@s|bbllx{}\|
|00004c00| 64 65 66 5c 40 70 40 73 | 62 62 6c 6c 79 7b 7d 0a |def\@p@s|bblly{}.|
|00004c10| 09 09 5c 64 65 66 5c 40 | 70 40 73 62 62 75 72 78 |..\def\@|p@sbburx|
|00004c20| 7b 7d 5c 64 65 66 5c 40 | 70 40 73 62 62 75 72 79 |{}\def\@|p@sbbury|
|00004c30| 7b 7d 0a 09 09 5c 64 65 | 66 5c 40 70 40 73 68 65 |{}...\de|f\@p@she|
|00004c40| 69 67 68 74 7b 7d 5c 64 | 65 66 5c 40 70 40 73 77 |ight{}\d|ef\@p@sw|
|00004c50| 69 64 74 68 7b 7d 0a 09 | 09 5c 64 65 66 5c 40 70 |idth{}..|.\def\@p|
|00004c60| 40 73 72 68 65 69 67 68 | 74 7b 7d 5c 64 65 66 5c |@srheigh|t{}\def\|
|00004c70| 40 70 40 73 72 77 69 64 | 74 68 7b 7d 0a 09 09 5c |@p@srwid|th{}...\|
|00004c80| 64 65 66 5c 40 70 40 73 | 61 6e 67 6c 65 7b 30 7d |def\@p@s|angle{0}|
|00004c90| 0a 09 09 5c 64 65 66 5c | 40 70 40 73 66 69 6c 65 |...\def\|@p@sfile|
|00004ca0| 7b 7d 20 5c 64 65 66 5c | 40 70 40 73 62 62 66 69 |{} \def\|@p@sbbfi|
|00004cb0| 6c 65 7b 7d 0a 09 09 5c | 64 65 66 5c 40 70 40 73 |le{}...\|def\@p@s|
|00004cc0| 63 6f 73 74 7b 31 30 7d | 0a 09 09 5c 64 65 66 5c |cost{10}|...\def\|
|00004cd0| 40 73 63 7b 7d 0a 09 09 | 5c 40 70 72 6f 6c 6f 67 |@sc{}...|\@prolog|
|00004ce0| 66 69 6c 65 66 61 6c 73 | 65 0a 09 09 5c 40 70 6f |filefals|e...\@po|
|00004cf0| 73 74 6c 6f 67 66 69 6c | 65 66 61 6c 73 65 0a 09 |stlogfil|efalse..|
|00004d00| 09 5c 40 63 6c 69 70 66 | 61 6c 73 65 0a 09 09 5c |.\@clipf|alse...\|
|00004d10| 69 66 40 6e 6f 69 73 79 | 0a 09 09 09 5c 40 76 65 |if@noisy|....\@ve|
|00004d20| 72 62 6f 73 65 74 72 75 | 65 0a 09 09 5c 65 6c 73 |rbosetru|e...\els|
|00004d30| 65 0a 09 09 09 5c 40 76 | 65 72 62 6f 73 65 66 61 |e....\@v|erbosefa|
|00004d40| 6c 73 65 0a 09 09 5c 66 | 69 0a 7d 0a 25 0a 25 20 |lse...\f|i.}.%.% |
|00004d50| 47 6f 20 74 68 72 6f 75 | 67 68 20 74 68 65 20 6f |Go throu|gh the o|
|00004d60| 70 74 69 6f 6e 73 20 73 | 65 74 74 69 6e 67 20 74 |ptions s|etting t|
|00004d70| 68 69 6e 67 73 20 75 70 | 2e 0a 25 0a 5c 64 65 66 |hings up|..%.\def|
|00004d80| 5c 70 61 72 73 65 40 70 | 73 40 70 61 72 6d 73 23 |\parse@p|s@parms#|
|00004d90| 31 7b 0a 09 20 09 5c 40 | 70 73 64 6f 5c 40 70 73 |1{.. .\@|psdo\@ps|
|00004da0| 66 69 67 61 3a 3d 23 31 | 5c 64 6f 0a 09 09 20 20 |figa:=#1|\do... |
|00004db0| 20 7b 5c 65 78 70 61 6e | 64 61 66 74 65 72 5c 40 | {\expan|dafter\@|
|00004dc0| 73 65 74 70 61 72 6d 73 | 5c 40 70 73 66 69 67 61 |setparms|\@psfiga|
|00004dd0| 2c 7d 7d 0a 25 0a 25 20 | 43 6f 6d 70 75 74 65 20 |,}}.%.% |Compute |
|00004de0| 62 62 20 68 65 69 67 68 | 74 20 61 6e 64 20 77 69 |bb heigh|t and wi|
|00004df0| 64 74 68 0a 25 0a 5c 6e | 65 77 69 66 5c 69 66 6e |dth.%.\n|ewif\ifn|
|00004e00| 6f 40 62 62 0a 5c 64 65 | 66 5c 62 62 40 6d 69 73 |o@bb.\de|f\bb@mis|
|00004e10| 73 69 6e 67 7b 0a 09 5c | 69 66 40 76 65 72 62 6f |sing{..\|if@verbo|
|00004e20| 73 65 7b 0a 09 09 5c 70 | 73 40 74 79 70 65 6f 75 |se{...\p|s@typeou|
|00004e30| 74 7b 70 73 66 69 67 3a | 20 73 65 61 72 63 68 69 |t{psfig:| searchi|
|00004e40| 6e 67 20 5c 40 70 40 73 | 62 62 66 69 6c 65 20 5c |ng \@p@s|bbfile \|
|00004e50| 73 70 61 63 65 20 20 66 | 6f 72 20 62 6f 75 6e 64 |space f|or bound|
|00004e60| 69 6e 67 20 62 6f 78 7d | 0a 09 7d 5c 66 69 0a 09 |ing box}|..}\fi..|
|00004e70| 5c 6e 6f 40 62 62 74 72 | 75 65 0a 09 5c 65 70 73 |\no@bbtr|ue..\eps|
|00004e80| 66 40 67 65 74 62 62 7b | 5c 40 70 40 73 62 62 66 |f@getbb{|\@p@sbbf|
|00004e90| 69 6c 65 7d 0a 20 20 20 | 20 20 20 20 20 5c 69 66 |ile}. | \if|
|00004ea0| 6e 6f 40 62 62 20 5c 65 | 6c 73 65 20 5c 62 62 40 |no@bb \e|lse \bb@|
|00004eb0| 63 75 6c 6c 5c 65 70 73 | 66 40 6c 6c 78 5c 65 70 |cull\eps|f@llx\ep|
|00004ec0| 73 66 40 6c 6c 79 5c 65 | 70 73 66 40 75 72 78 5c |sf@lly\e|psf@urx\|
|00004ed0| 65 70 73 66 40 75 72 79 | 5c 66 69 0a 7d 09 0a 5c |epsf@ury|\fi.}..\|
|00004ee0| 64 65 66 5c 62 62 40 63 | 75 6c 6c 23 31 23 32 23 |def\bb@c|ull#1#2#|
|00004ef0| 33 23 34 7b 0a 09 5c 64 | 69 6d 65 6e 31 30 30 3d |3#4{..\d|imen100=|
|00004f00| 23 31 20 62 70 5c 65 64 | 65 66 5c 40 70 40 73 62 |#1 bp\ed|ef\@p@sb|
|00004f10| 62 6c 6c 78 7b 5c 6e 75 | 6d 62 65 72 5c 64 69 6d |bllx{\nu|mber\dim|
|00004f20| 65 6e 31 30 30 7d 0a 09 | 5c 64 69 6d 65 6e 31 30 |en100}..|\dimen10|
|00004f30| 30 3d 23 32 20 62 70 5c | 65 64 65 66 5c 40 70 40 |0=#2 bp\|edef\@p@|
|00004f40| 73 62 62 6c 6c 79 7b 5c | 6e 75 6d 62 65 72 5c 64 |sbblly{\|number\d|
|00004f50| 69 6d 65 6e 31 30 30 7d | 0a 09 5c 64 69 6d 65 6e |imen100}|..\dimen|
|00004f60| 31 30 30 3d 23 33 20 62 | 70 5c 65 64 65 66 5c 40 |100=#3 b|p\edef\@|
|00004f70| 70 40 73 62 62 75 72 78 | 7b 5c 6e 75 6d 62 65 72 |p@sbburx|{\number|
|00004f80| 5c 64 69 6d 65 6e 31 30 | 30 7d 0a 09 5c 64 69 6d |\dimen10|0}..\dim|
|00004f90| 65 6e 31 30 30 3d 23 34 | 20 62 70 5c 65 64 65 66 |en100=#4| bp\edef|
|00004fa0| 5c 40 70 40 73 62 62 75 | 72 79 7b 5c 6e 75 6d 62 |\@p@sbbu|ry{\numb|
|00004fb0| 65 72 5c 64 69 6d 65 6e | 31 30 30 7d 0a 09 5c 6e |er\dimen|100}..\n|
|00004fc0| 6f 40 62 62 66 61 6c 73 | 65 0a 7d 0a 25 20 72 6f |o@bbfals|e.}.% ro|
|00004fd0| 74 61 74 65 20 70 6f 69 | 6e 74 20 28 23 31 2c 23 |tate poi|nt (#1,#|
|00004fe0| 32 29 20 61 62 6f 75 74 | 20 28 30 2c 30 29 2e 0a |2) about| (0,0)..|
|00004ff0| 25 20 54 68 65 20 73 69 | 6e 65 20 61 6e 64 20 63 |% The si|ne and c|
|00005000| 6f 73 69 6e 65 20 6f 66 | 20 74 68 65 20 61 6e 67 |osine of| the ang|
|00005010| 6c 65 20 61 72 65 20 61 | 6c 72 65 61 64 79 20 73 |le are a|lready s|
|00005020| 74 6f 72 65 64 20 69 6e | 20 5c 73 69 6e 65 20 61 |tored in| \sine a|
|00005030| 6e 64 0a 25 20 5c 63 6f | 73 69 6e 65 2e 20 20 54 |nd.% \co|sine. T|
|00005040| 68 65 20 72 65 73 75 6c | 74 20 69 73 20 70 6c 61 |he resul|t is pla|
|00005050| 63 65 64 20 69 6e 20 28 | 5c 70 40 69 6e 74 76 61 |ced in (|\p@intva|
|00005060| 6c 75 65 78 2c 20 5c 70 | 40 69 6e 74 76 61 6c 75 |luex, \p|@intvalu|
|00005070| 65 79 29 2e 0a 5c 6e 65 | 77 64 69 6d 65 6e 5c 70 |ey)..\ne|wdimen\p|
|00005080| 40 69 6e 74 76 61 6c 75 | 65 78 0a 5c 6e 65 77 64 |@intvalu|ex.\newd|
|00005090| 69 6d 65 6e 5c 70 40 69 | 6e 74 76 61 6c 75 65 79 |imen\p@i|ntvaluey|
|000050a0| 0a 5c 64 65 66 5c 72 6f | 74 61 74 65 40 23 31 23 |.\def\ro|tate@#1#|
|000050b0| 32 7b 7b 5c 64 69 6d 65 | 6e 30 3d 23 31 20 73 70 |2{{\dime|n0=#1 sp|
|000050c0| 5c 64 69 6d 65 6e 31 3d | 23 32 20 73 70 0a 25 20 |\dimen1=|#2 sp.% |
|000050d0| 20 20 20 20 20 20 20 20 | 20 20 20 09 63 61 6c 63 | | .calc|
|000050e0| 75 6c 61 74 65 20 78 27 | 20 3d 20 78 20 5c 63 6f |ulate x'| = x \co|
|000050f0| 73 5c 74 68 65 74 61 20 | 2d 20 79 20 5c 73 69 6e |s\theta |- y \sin|
|00005100| 5c 74 68 65 74 61 0a 09 | 09 20 20 5c 67 6c 6f 62 |\theta..|. \glob|
|00005110| 61 6c 5c 70 40 69 6e 74 | 76 61 6c 75 65 78 3d 5c |al\p@int|valuex=\|
|00005120| 63 6f 73 69 6e 65 5c 64 | 69 6d 65 6e 30 0a 09 09 |cosine\d|imen0...|
|00005130| 20 20 5c 64 69 6d 65 6e | 33 3d 5c 73 69 6e 65 5c | \dimen|3=\sine\|
|00005140| 64 69 6d 65 6e 31 0a 09 | 09 20 20 5c 67 6c 6f 62 |dimen1..|. \glob|
|00005150| 61 6c 5c 61 64 76 61 6e | 63 65 5c 70 40 69 6e 74 |al\advan|ce\p@int|
|00005160| 76 61 6c 75 65 78 20 62 | 79 20 2d 5c 64 69 6d 65 |valuex b|y -\dime|
|00005170| 6e 33 0a 25 20 09 09 63 | 61 6c 63 75 6c 61 74 65 |n3.% ..c|alculate|
|00005180| 20 79 27 20 3d 20 78 20 | 5c 73 69 6e 5c 74 68 65 | y' = x |\sin\the|
|00005190| 74 61 20 2b 20 79 20 5c | 63 6f 73 5c 74 68 65 74 |ta + y \|cos\thet|
|000051a0| 61 0a 09 09 20 20 5c 67 | 6c 6f 62 61 6c 5c 70 40 |a... \g|lobal\p@|
|000051b0| 69 6e 74 76 61 6c 75 65 | 79 3d 5c 73 69 6e 65 5c |intvalue|y=\sine\|
|000051c0| 64 69 6d 65 6e 30 0a 09 | 09 20 20 5c 64 69 6d 65 |dimen0..|. \dime|
|000051d0| 6e 33 3d 5c 63 6f 73 69 | 6e 65 5c 64 69 6d 65 6e |n3=\cosi|ne\dimen|
|000051e0| 31 0a 09 09 20 20 5c 67 | 6c 6f 62 61 6c 5c 61 64 |1... \g|lobal\ad|
|000051f0| 76 61 6e 63 65 5c 70 40 | 69 6e 74 76 61 6c 75 65 |vance\p@|intvalue|
|00005200| 79 20 62 79 20 5c 64 69 | 6d 65 6e 33 0a 09 09 20 |y by \di|men3... |
|00005210| 20 7d 7d 0a 5c 64 65 66 | 5c 63 6f 6d 70 75 74 65 | }}.\def|\compute|
|00005220| 40 62 62 7b 0a 09 09 5c | 6e 6f 40 62 62 66 61 6c |@bb{...\|no@bbfal|
|00005230| 73 65 0a 09 09 5c 69 66 | 40 62 62 6c 6c 78 20 5c |se...\if|@bbllx \|
|00005240| 65 6c 73 65 20 5c 6e 6f | 40 62 62 74 72 75 65 20 |else \no|@bbtrue |
|00005250| 5c 66 69 0a 09 09 5c 69 | 66 40 62 62 6c 6c 79 20 |\fi...\i|f@bblly |
|00005260| 5c 65 6c 73 65 20 5c 6e | 6f 40 62 62 74 72 75 65 |\else \n|o@bbtrue|
|00005270| 20 5c 66 69 0a 09 09 5c | 69 66 40 62 62 75 72 78 | \fi...\|if@bburx|
|00005280| 20 5c 65 6c 73 65 20 5c | 6e 6f 40 62 62 74 72 75 | \else \|no@bbtru|
|00005290| 65 20 5c 66 69 0a 09 09 | 5c 69 66 40 62 62 75 72 |e \fi...|\if@bbur|
|000052a0| 79 20 5c 65 6c 73 65 20 | 5c 6e 6f 40 62 62 74 72 |y \else |\no@bbtr|
|000052b0| 75 65 20 5c 66 69 0a 09 | 09 5c 69 66 6e 6f 40 62 |ue \fi..|.\ifno@b|
|000052c0| 62 20 5c 62 62 40 6d 69 | 73 73 69 6e 67 20 5c 66 |b \bb@mi|ssing \f|
|000052d0| 69 0a 09 09 5c 69 66 6e | 6f 40 62 62 20 5c 70 73 |i...\ifn|o@bb \ps|
|000052e0| 40 74 79 70 65 6f 75 74 | 7b 46 41 54 41 4c 20 45 |@typeout|{FATAL E|
|000052f0| 52 52 4f 52 3a 20 6e 6f | 20 62 62 20 73 75 70 70 |RROR: no| bb supp|
|00005300| 6c 69 65 64 20 6f 72 20 | 66 6f 75 6e 64 7d 0a 09 |lied or |found}..|
|00005310| 09 09 5c 6e 6f 2d 62 62 | 2d 65 72 72 6f 72 0a 09 |..\no-bb|-error..|
|00005320| 09 5c 66 69 0a 09 09 25 | 0a 25 5c 70 73 40 74 79 |.\fi...%|.%\ps@ty|
|00005330| 70 65 6f 75 74 7b 42 42 | 3a 20 5c 40 70 40 73 62 |peout{BB|: \@p@sb|
|00005340| 62 6c 6c 78 2c 20 5c 40 | 70 40 73 62 62 6c 6c 79 |bllx, \@|p@sbblly|
|00005350| 2c 20 5c 40 70 40 73 62 | 62 75 72 78 2c 20 5c 40 |, \@p@sb|burx, \@|
|00005360| 70 40 73 62 62 75 72 79 | 7d 20 0a 25 0a 25 20 73 |p@sbbury|} .%.% s|
|00005370| 74 6f 72 65 20 68 65 69 | 67 68 74 2f 77 69 64 74 |tore hei|ght/widt|
|00005380| 68 20 6f 66 20 6f 72 69 | 67 69 6e 61 6c 20 28 75 |h of ori|ginal (u|
|00005390| 6e 72 6f 74 61 74 65 64 | 29 20 62 6f 75 6e 64 69 |nrotated|) boundi|
|000053a0| 6e 67 20 62 6f 78 0a 09 | 09 5c 63 6f 75 6e 74 32 |ng box..|.\count2|
|000053b0| 30 33 3d 5c 40 70 40 73 | 62 62 75 72 78 0a 09 09 |03=\@p@s|bburx...|
|000053c0| 5c 63 6f 75 6e 74 32 30 | 34 3d 5c 40 70 40 73 62 |\count20|4=\@p@sb|
|000053d0| 62 75 72 79 0a 09 09 5c | 61 64 76 61 6e 63 65 5c |bury...\|advance\|
|000053e0| 63 6f 75 6e 74 32 30 33 | 20 62 79 20 2d 5c 40 70 |count203| by -\@p|
|000053f0| 40 73 62 62 6c 6c 78 0a | 09 09 5c 61 64 76 61 6e |@sbbllx.|..\advan|
|00005400| 63 65 5c 63 6f 75 6e 74 | 32 30 34 20 62 79 20 2d |ce\count|204 by -|
|00005410| 5c 40 70 40 73 62 62 6c | 6c 79 0a 09 09 5c 65 64 |\@p@sbbl|ly...\ed|
|00005420| 65 66 5c 70 73 40 62 62 | 77 7b 5c 6e 75 6d 62 65 |ef\ps@bb|w{\numbe|
|00005430| 72 5c 63 6f 75 6e 74 32 | 30 33 7d 0a 09 09 5c 65 |r\count2|03}...\e|
|00005440| 64 65 66 5c 70 73 40 62 | 62 68 7b 5c 6e 75 6d 62 |def\ps@b|bh{\numb|
|00005450| 65 72 5c 63 6f 75 6e 74 | 32 30 34 7d 0a 09 09 25 |er\count|204}...%|
|00005460| 5c 70 73 40 74 79 70 65 | 6f 75 74 7b 20 70 73 62 |\ps@type|out{ psb|
|00005470| 62 68 20 3d 20 5c 70 73 | 40 62 62 68 2c 20 70 73 |bh = \ps|@bbh, ps|
|00005480| 62 62 77 20 3d 20 5c 70 | 73 40 62 62 77 20 7d 0a |bbw = \p|s@bbw }.|
|00005490| 09 09 5c 69 66 40 61 6e | 67 6c 65 20 0a 09 09 09 |..\if@an|gle ....|
|000054a0| 5c 53 69 6e 65 7b 5c 40 | 70 40 73 61 6e 67 6c 65 |\Sine{\@|p@sangle|
|000054b0| 7d 5c 43 6f 73 69 6e 65 | 7b 5c 40 70 40 73 61 6e |}\Cosine|{\@p@san|
|000054c0| 67 6c 65 7d 0a 09 20 20 | 20 20 20 20 20 20 09 7b |gle}.. | .{|
|000054d0| 5c 64 69 6d 65 6e 31 30 | 30 3d 5c 6d 61 78 64 69 |\dimen10|0=\maxdi|
|000054e0| 6d 65 6e 5c 78 64 65 66 | 5c 72 40 70 40 73 62 62 |men\xdef|\r@p@sbb|
|000054f0| 6c 6c 78 7b 5c 6e 75 6d | 62 65 72 5c 64 69 6d 65 |llx{\num|ber\dime|
|00005500| 6e 31 30 30 7d 0a 09 09 | 09 09 09 20 20 20 20 5c |n100}...|... \|
|00005510| 78 64 65 66 5c 72 40 70 | 40 73 62 62 6c 6c 79 7b |xdef\r@p|@sbblly{|
|00005520| 5c 6e 75 6d 62 65 72 5c | 64 69 6d 65 6e 31 30 30 |\number\|dimen100|
|00005530| 7d 0a 09 09 09 20 20 20 | 20 20 20 20 20 20 20 20 |}.... | |
|00005540| 20 20 20 20 20 20 20 20 | 20 5c 78 64 65 66 5c 72 | | \xdef\r|
|00005550| 40 70 40 73 62 62 75 72 | 78 7b 2d 5c 6e 75 6d 62 |@p@sbbur|x{-\numb|
|00005560| 65 72 5c 64 69 6d 65 6e | 31 30 30 7d 0a 09 09 09 |er\dimen|100}....|
|00005570| 09 09 20 20 20 20 5c 78 | 64 65 66 5c 72 40 70 40 |.. \x|def\r@p@|
|00005580| 73 62 62 75 72 79 7b 2d | 5c 6e 75 6d 62 65 72 5c |sbbury{-|\number\|
|00005590| 64 69 6d 65 6e 31 30 30 | 7d 7d 0a 25 0a 25 20 4e |dimen100|}}.%.% N|
|000055a0| 65 65 64 20 74 6f 20 72 | 6f 74 61 74 65 20 61 6c |eed to r|otate al|
|000055b0| 6c 20 66 6f 75 72 20 70 | 6f 69 6e 74 73 20 61 6e |l four p|oints an|
|000055c0| 64 20 74 61 6b 65 20 74 | 68 65 20 58 2d 59 20 65 |d take t|he X-Y e|
|000055d0| 78 74 72 65 6d 65 73 20 | 6f 66 20 74 68 65 20 6e |xtremes |of the n|
|000055e0| 65 77 0a 25 20 70 6f 69 | 6e 74 73 20 61 73 20 74 |ew.% poi|nts as t|
|000055f0| 68 65 20 6e 65 77 20 62 | 6f 75 6e 64 69 6e 67 20 |he new b|ounding |
|00005600| 62 6f 78 2e 0a 20 20 20 | 20 20 20 20 20 20 20 20 |box.. | |
|00005610| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 5c 64 65 | | \de|
|00005620| 66 5c 6d 69 6e 6d 61 78 | 74 65 73 74 7b 0a 09 09 |f\minmax|test{...|
|00005630| 09 20 20 20 5c 69 66 6e | 75 6d 5c 6e 75 6d 62 65 |. \ifn|um\numbe|
|00005640| 72 5c 70 40 69 6e 74 76 | 61 6c 75 65 78 3c 5c 72 |r\p@intv|aluex<\r|
|00005650| 40 70 40 73 62 62 6c 6c | 78 0a 09 09 09 20 20 20 |@p@sbbll|x.... |
|00005660| 20 20 20 5c 78 64 65 66 | 5c 72 40 70 40 73 62 62 | \xdef|\r@p@sbb|
|00005670| 6c 6c 78 7b 5c 6e 75 6d | 62 65 72 5c 70 40 69 6e |llx{\num|ber\p@in|
|00005680| 74 76 61 6c 75 65 78 7d | 5c 66 69 0a 09 09 09 20 |tvaluex}|\fi.... |
|00005690| 20 20 5c 69 66 6e 75 6d | 5c 6e 75 6d 62 65 72 5c | \ifnum|\number\|
|000056a0| 70 40 69 6e 74 76 61 6c | 75 65 78 3e 5c 72 40 70 |p@intval|uex>\r@p|
|000056b0| 40 73 62 62 75 72 78 0a | 09 09 09 20 20 20 20 20 |@sbburx.|... |
|000056c0| 20 5c 78 64 65 66 5c 72 | 40 70 40 73 62 62 75 72 | \xdef\r|@p@sbbur|
|000056d0| 78 7b 5c 6e 75 6d 62 65 | 72 5c 70 40 69 6e 74 76 |x{\numbe|r\p@intv|
|000056e0| 61 6c 75 65 78 7d 5c 66 | 69 0a 09 09 09 20 20 20 |aluex}\f|i.... |
|000056f0| 5c 69 66 6e 75 6d 5c 6e | 75 6d 62 65 72 5c 70 40 |\ifnum\n|umber\p@|
|00005700| 69 6e 74 76 61 6c 75 65 | 79 3c 5c 72 40 70 40 73 |intvalue|y<\r@p@s|
|00005710| 62 62 6c 6c 79 0a 09 09 | 09 20 20 20 20 20 20 5c |bblly...|. \|
|00005720| 78 64 65 66 5c 72 40 70 | 40 73 62 62 6c 6c 79 7b |xdef\r@p|@sbblly{|
|00005730| 5c 6e 75 6d 62 65 72 5c | 70 40 69 6e 74 76 61 6c |\number\|p@intval|
|00005740| 75 65 79 7d 5c 66 69 0a | 09 09 09 20 20 20 5c 69 |uey}\fi.|... \i|
|00005750| 66 6e 75 6d 5c 6e 75 6d | 62 65 72 5c 70 40 69 6e |fnum\num|ber\p@in|
|00005760| 74 76 61 6c 75 65 79 3e | 5c 72 40 70 40 73 62 62 |tvaluey>|\r@p@sbb|
|00005770| 75 72 79 0a 09 09 09 20 | 20 20 20 20 20 5c 78 64 |ury.... | \xd|
|00005780| 65 66 5c 72 40 70 40 73 | 62 62 75 72 79 7b 5c 6e |ef\r@p@s|bbury{\n|
|00005790| 75 6d 62 65 72 5c 70 40 | 69 6e 74 76 61 6c 75 65 |umber\p@|intvalue|
|000057a0| 79 7d 5c 66 69 0a 09 09 | 09 20 20 20 7d 0a 25 09 |y}\fi...|. }.%.|
|000057b0| 09 09 6c 6f 77 65 72 20 | 6c 65 66 74 0a 09 09 09 |..lower |left....|
|000057c0| 5c 72 6f 74 61 74 65 40 | 7b 5c 40 70 40 73 62 62 |\rotate@|{\@p@sbb|
|000057d0| 6c 6c 78 7d 7b 5c 40 70 | 40 73 62 62 6c 6c 79 7d |llx}{\@p|@sbblly}|
|000057e0| 0a 09 09 09 5c 6d 69 6e | 6d 61 78 74 65 73 74 0a |....\min|maxtest.|
|000057f0| 25 09 09 09 75 70 70 65 | 72 20 6c 65 66 74 0a 09 |%...uppe|r left..|
|00005800| 09 09 5c 72 6f 74 61 74 | 65 40 7b 5c 40 70 40 73 |..\rotat|e@{\@p@s|
|00005810| 62 62 6c 6c 78 7d 7b 5c | 40 70 40 73 62 62 75 72 |bbllx}{\|@p@sbbur|
|00005820| 79 7d 0a 09 09 09 5c 6d | 69 6e 6d 61 78 74 65 73 |y}....\m|inmaxtes|
|00005830| 74 0a 25 09 09 09 6c 6f | 77 65 72 20 72 69 67 68 |t.%...lo|wer righ|
|00005840| 74 0a 09 09 09 5c 72 6f | 74 61 74 65 40 7b 5c 40 |t....\ro|tate@{\@|
|00005850| 70 40 73 62 62 75 72 78 | 7d 7b 5c 40 70 40 73 62 |p@sbburx|}{\@p@sb|
|00005860| 62 6c 6c 79 7d 0a 09 09 | 09 5c 6d 69 6e 6d 61 78 |blly}...|.\minmax|
|00005870| 74 65 73 74 0a 25 09 09 | 09 75 70 70 65 72 20 72 |test.%..|.upper r|
|00005880| 69 67 68 74 0a 09 09 09 | 5c 72 6f 74 61 74 65 40 |ight....|\rotate@|
|00005890| 7b 5c 40 70 40 73 62 62 | 75 72 78 7d 7b 5c 40 70 |{\@p@sbb|urx}{\@p|
|000058a0| 40 73 62 62 75 72 79 7d | 0a 09 09 09 5c 6d 69 6e |@sbbury}|....\min|
|000058b0| 6d 61 78 74 65 73 74 0a | 09 09 09 5c 65 64 65 66 |maxtest.|...\edef|
|000058c0| 5c 40 70 40 73 62 62 6c | 6c 78 7b 5c 72 40 70 40 |\@p@sbbl|lx{\r@p@|
|000058d0| 73 62 62 6c 6c 78 7d 5c | 65 64 65 66 5c 40 70 40 |sbbllx}\|edef\@p@|
|000058e0| 73 62 62 6c 6c 79 7b 5c | 72 40 70 40 73 62 62 6c |sbblly{\|r@p@sbbl|
|000058f0| 6c 79 7d 0a 09 09 09 5c | 65 64 65 66 5c 40 70 40 |ly}....\|edef\@p@|
|00005900| 73 62 62 75 72 78 7b 5c | 72 40 70 40 73 62 62 75 |sbburx{\|r@p@sbbu|
|00005910| 72 78 7d 5c 65 64 65 66 | 5c 40 70 40 73 62 62 75 |rx}\edef|\@p@sbbu|
|00005920| 72 79 7b 5c 72 40 70 40 | 73 62 62 75 72 79 7d 0a |ry{\r@p@|sbbury}.|
|00005930| 25 5c 70 73 40 74 79 70 | 65 6f 75 74 7b 72 6f 74 |%\ps@typ|eout{rot|
|00005940| 61 74 65 64 20 42 42 3a | 20 5c 72 40 70 40 73 62 |ated BB:| \r@p@sb|
|00005950| 62 6c 6c 78 2c 20 5c 72 | 40 70 40 73 62 62 6c 6c |bllx, \r|@p@sbbll|
|00005960| 79 2c 20 5c 72 40 70 40 | 73 62 62 75 72 78 2c 20 |y, \r@p@|sbburx, |
|00005970| 5c 72 40 70 40 73 62 62 | 75 72 79 7d 0a 09 09 5c |\r@p@sbb|ury}...\|
|00005980| 66 69 0a 09 09 5c 63 6f | 75 6e 74 32 30 33 3d 5c |fi...\co|unt203=\|
|00005990| 40 70 40 73 62 62 75 72 | 78 0a 09 09 5c 63 6f 75 |@p@sbbur|x...\cou|
|000059a0| 6e 74 32 30 34 3d 5c 40 | 70 40 73 62 62 75 72 79 |nt204=\@|p@sbbury|
|000059b0| 0a 09 09 5c 61 64 76 61 | 6e 63 65 5c 63 6f 75 6e |...\adva|nce\coun|
|000059c0| 74 32 30 33 20 62 79 20 | 2d 5c 40 70 40 73 62 62 |t203 by |-\@p@sbb|
|000059d0| 6c 6c 78 0a 09 09 5c 61 | 64 76 61 6e 63 65 5c 63 |llx...\a|dvance\c|
|000059e0| 6f 75 6e 74 32 30 34 20 | 62 79 20 2d 5c 40 70 40 |ount204 |by -\@p@|
|000059f0| 73 62 62 6c 6c 79 0a 09 | 09 5c 65 64 65 66 5c 40 |sbblly..|.\edef\@|
|00005a00| 62 62 77 7b 5c 6e 75 6d | 62 65 72 5c 63 6f 75 6e |bbw{\num|ber\coun|
|00005a10| 74 32 30 33 7d 0a 09 09 | 5c 65 64 65 66 5c 40 62 |t203}...|\edef\@b|
|00005a20| 62 68 7b 5c 6e 75 6d 62 | 65 72 5c 63 6f 75 6e 74 |bh{\numb|er\count|
|00005a30| 32 30 34 7d 0a 09 09 25 | 5c 70 73 40 74 79 70 65 |204}...%|\ps@type|
|00005a40| 6f 75 74 7b 20 62 62 68 | 20 3d 20 5c 40 62 62 68 |out{ bbh| = \@bbh|
|00005a50| 2c 20 62 62 77 20 3d 20 | 5c 40 62 62 77 20 7d 0a |, bbw = |\@bbw }.|
|00005a60| 7d 0a 25 0a 25 20 5c 69 | 6e 40 68 75 6e 64 72 65 |}.%.% \i|n@hundre|
|00005a70| 64 73 20 70 65 72 66 6f | 72 6d 73 20 23 31 20 2a |ds perfo|rms #1 *|
|00005a80| 20 28 23 32 20 2f 20 23 | 33 29 20 63 6f 72 72 65 | (#2 / #|3) corre|
|00005a90| 63 74 20 74 6f 20 74 68 | 65 20 68 75 6e 64 72 65 |ct to th|e hundre|
|00005aa0| 64 73 2c 0a 25 09 74 68 | 65 6e 20 6c 65 61 76 65 |ds,.%.th|en leave|
|00005ab0| 73 20 74 68 65 20 72 65 | 73 75 6c 74 20 69 6e 20 |s the re|sult in |
|00005ac0| 40 72 65 73 75 6c 74 0a | 25 0a 5c 64 65 66 5c 69 |@result.|%.\def\i|
|00005ad0| 6e 40 68 75 6e 64 72 65 | 64 73 23 31 23 32 23 33 |n@hundre|ds#1#2#3|
|00005ae0| 7b 5c 63 6f 75 6e 74 32 | 34 30 3d 23 32 20 5c 63 |{\count2|40=#2 \c|
|00005af0| 6f 75 6e 74 32 34 31 3d | 23 33 0a 09 09 20 20 20 |ount241=|#3... |
|00005b00| 20 20 5c 63 6f 75 6e 74 | 31 30 30 3d 5c 63 6f 75 | \count|100=\cou|
|00005b10| 6e 74 32 34 30 09 25 20 | 31 30 30 20 69 73 20 66 |nt240.% |100 is f|
|00005b20| 69 72 73 74 20 64 69 67 | 69 74 20 23 32 2f 23 33 |irst dig|it #2/#3|
|00005b30| 0a 09 09 20 20 20 20 20 | 5c 64 69 76 69 64 65 5c |... |\divide\|
|00005b40| 63 6f 75 6e 74 31 30 30 | 20 62 79 20 5c 63 6f 75 |count100| by \cou|
|00005b50| 6e 74 32 34 31 0a 09 09 | 20 20 20 20 20 5c 63 6f |nt241...| \co|
|00005b60| 75 6e 74 31 30 31 3d 5c | 63 6f 75 6e 74 31 30 30 |unt101=\|count100|
|00005b70| 0a 09 09 20 20 20 20 20 | 5c 6d 75 6c 74 69 70 6c |... |\multipl|
|00005b80| 79 5c 63 6f 75 6e 74 31 | 30 31 20 62 79 20 5c 63 |y\count1|01 by \c|
|00005b90| 6f 75 6e 74 32 34 31 0a | 09 09 20 20 20 20 20 5c |ount241.|.. \|
|00005ba0| 61 64 76 61 6e 63 65 5c | 63 6f 75 6e 74 32 34 30 |advance\|count240|
|00005bb0| 20 62 79 20 2d 5c 63 6f | 75 6e 74 31 30 31 0a 09 | by -\co|unt101..|
|00005bc0| 09 20 20 20 20 20 5c 6d | 75 6c 74 69 70 6c 79 5c |. \m|ultiply\|
|00005bd0| 63 6f 75 6e 74 32 34 30 | 20 62 79 20 31 30 0a 09 |count240| by 10..|
|00005be0| 09 20 20 20 20 20 5c 63 | 6f 75 6e 74 31 30 31 3d |. \c|ount101=|
|00005bf0| 5c 63 6f 75 6e 74 32 34 | 30 09 25 31 30 31 20 69 |\count24|0.%101 i|
|00005c00| 73 20 73 65 63 6f 6e 64 | 20 64 69 67 69 74 20 6f |s second| digit o|
|00005c10| 66 20 23 32 2f 23 33 0a | 09 09 20 20 20 20 20 5c |f #2/#3.|.. \|
|00005c20| 64 69 76 69 64 65 5c 63 | 6f 75 6e 74 31 30 31 20 |divide\c|ount101 |
|00005c30| 62 79 20 5c 63 6f 75 6e | 74 32 34 31 0a 09 09 20 |by \coun|t241... |
|00005c40| 20 20 20 20 5c 63 6f 75 | 6e 74 31 30 32 3d 5c 63 | \cou|nt102=\c|
|00005c50| 6f 75 6e 74 31 30 31 0a | 09 09 20 20 20 20 20 5c |ount101.|.. \|
|00005c60| 6d 75 6c 74 69 70 6c 79 | 5c 63 6f 75 6e 74 31 30 |multiply|\count10|
|00005c70| 32 20 62 79 20 5c 63 6f | 75 6e 74 32 34 31 0a 09 |2 by \co|unt241..|
|00005c80| 09 20 20 20 20 20 5c 61 | 64 76 61 6e 63 65 5c 63 |. \a|dvance\c|
|00005c90| 6f 75 6e 74 32 34 30 20 | 62 79 20 2d 5c 63 6f 75 |ount240 |by -\cou|
|00005ca0| 6e 74 31 30 32 0a 09 09 | 20 20 20 20 20 5c 6d 75 |nt102...| \mu|
|00005cb0| 6c 74 69 70 6c 79 5c 63 | 6f 75 6e 74 32 34 30 20 |ltiply\c|ount240 |
|00005cc0| 62 79 20 31 30 0a 09 09 | 20 20 20 20 20 5c 63 6f |by 10...| \co|
|00005cd0| 75 6e 74 31 30 32 3d 5c | 63 6f 75 6e 74 32 34 30 |unt102=\|count240|
|00005ce0| 09 25 20 31 30 32 20 69 | 73 20 74 68 65 20 74 68 |.% 102 i|s the th|
|00005cf0| 69 72 64 20 64 69 67 69 | 74 0a 09 09 20 20 20 20 |ird digi|t... |
|00005d00| 20 5c 64 69 76 69 64 65 | 5c 63 6f 75 6e 74 31 30 | \divide|\count10|
|00005d10| 32 20 62 79 20 5c 63 6f | 75 6e 74 32 34 31 0a 09 |2 by \co|unt241..|
|00005d20| 09 20 20 20 20 20 5c 63 | 6f 75 6e 74 32 30 30 3d |. \c|ount200=|
|00005d30| 23 31 5c 63 6f 75 6e 74 | 32 30 35 3d 30 0a 09 09 |#1\count|205=0...|
|00005d40| 20 20 20 20 20 5c 63 6f | 75 6e 74 32 30 31 3d 5c | \co|unt201=\|
|00005d50| 63 6f 75 6e 74 32 30 30 | 0a 09 09 09 5c 6d 75 6c |count200|....\mul|
|00005d60| 74 69 70 6c 79 5c 63 6f | 75 6e 74 32 30 31 20 62 |tiply\co|unt201 b|
|00005d70| 79 20 5c 63 6f 75 6e 74 | 31 30 30 0a 09 09 20 09 |y \count|100... .|
|00005d80| 5c 61 64 76 61 6e 63 65 | 5c 63 6f 75 6e 74 32 30 |\advance|\count20|
|00005d90| 35 20 62 79 20 5c 63 6f | 75 6e 74 32 30 31 0a 09 |5 by \co|unt201..|
|00005da0| 09 20 20 20 20 20 5c 63 | 6f 75 6e 74 32 30 31 3d |. \c|ount201=|
|00005db0| 5c 63 6f 75 6e 74 32 30 | 30 0a 09 09 09 5c 64 69 |\count20|0....\di|
|00005dc0| 76 69 64 65 5c 63 6f 75 | 6e 74 32 30 31 20 62 79 |vide\cou|nt201 by|
|00005dd0| 20 31 30 0a 09 09 09 5c | 6d 75 6c 74 69 70 6c 79 | 10....\|multiply|
|00005de0| 5c 63 6f 75 6e 74 32 30 | 31 20 62 79 20 5c 63 6f |\count20|1 by \co|
|00005df0| 75 6e 74 31 30 31 0a 09 | 09 09 5c 61 64 76 61 6e |unt101..|..\advan|
|00005e00| 63 65 5c 63 6f 75 6e 74 | 32 30 35 20 62 79 20 5c |ce\count|205 by \|
|00005e10| 63 6f 75 6e 74 32 30 31 | 0a 09 09 09 25 0a 09 09 |count201|....%...|
|00005e20| 20 20 20 20 20 5c 63 6f | 75 6e 74 32 30 31 3d 5c | \co|unt201=\|
|00005e30| 63 6f 75 6e 74 32 30 30 | 0a 09 09 09 5c 64 69 76 |count200|....\div|
|00005e40| 69 64 65 5c 63 6f 75 6e | 74 32 30 31 20 62 79 20 |ide\coun|t201 by |
|00005e50| 31 30 30 0a 09 09 09 5c | 6d 75 6c 74 69 70 6c 79 |100....\|multiply|
|00005e60| 5c 63 6f 75 6e 74 32 30 | 31 20 62 79 20 5c 63 6f |\count20|1 by \co|
|00005e70| 75 6e 74 31 30 32 0a 09 | 09 09 5c 61 64 76 61 6e |unt102..|..\advan|
|00005e80| 63 65 5c 63 6f 75 6e 74 | 32 30 35 20 62 79 20 5c |ce\count|205 by \|
|00005e90| 63 6f 75 6e 74 32 30 31 | 0a 09 09 09 25 0a 09 09 |count201|....%...|
|00005ea0| 20 20 20 20 20 5c 65 64 | 65 66 5c 40 72 65 73 75 | \ed|ef\@resu|
|00005eb0| 6c 74 7b 5c 6e 75 6d 62 | 65 72 5c 63 6f 75 6e 74 |lt{\numb|er\count|
|00005ec0| 32 30 35 7d 0a 7d 0a 5c | 64 65 66 5c 63 6f 6d 70 |205}.}.\|def\comp|
|00005ed0| 75 74 65 40 77 66 72 6f | 6d 68 7b 0a 09 09 25 20 |ute@wfro|mh{...% |
|00005ee0| 63 6f 6d 70 75 74 69 6e | 67 20 3a 20 77 69 64 74 |computin|g : widt|
|00005ef0| 68 20 3d 20 68 65 69 67 | 68 74 20 2a 20 28 62 62 |h = heig|ht * (bb|
|00005f00| 77 20 2f 20 62 62 68 29 | 0a 09 09 5c 69 6e 40 68 |w / bbh)|...\in@h|
|00005f10| 75 6e 64 72 65 64 73 7b | 5c 40 70 40 73 68 65 69 |undreds{|\@p@shei|
|00005f20| 67 68 74 7d 7b 5c 40 62 | 62 77 7d 7b 5c 40 62 62 |ght}{\@b|bw}{\@bb|
|00005f30| 68 7d 0a 09 09 25 5c 70 | 73 40 74 79 70 65 6f 75 |h}...%\p|s@typeou|
|00005f40| 74 7b 20 5c 40 70 40 73 | 68 65 69 67 68 74 20 2a |t{ \@p@s|height *|
|00005f50| 20 5c 40 62 62 77 20 2f | 20 5c 40 62 62 68 2c 20 | \@bbw /| \@bbh, |
|00005f60| 3d 20 5c 40 72 65 73 75 | 6c 74 20 7d 0a 09 09 5c |= \@resu|lt }...\|
|00005f70| 65 64 65 66 5c 40 70 40 | 73 77 69 64 74 68 7b 5c |edef\@p@|swidth{\|
|00005f80| 40 72 65 73 75 6c 74 7d | 0a 09 09 25 5c 70 73 40 |@result}|...%\ps@|
|00005f90| 74 79 70 65 6f 75 74 7b | 77 20 66 72 6f 6d 20 68 |typeout{|w from h|
|00005fa0| 3a 20 77 69 64 74 68 20 | 69 73 20 5c 40 70 40 73 |: width |is \@p@s|
|00005fb0| 77 69 64 74 68 7d 0a 7d | 0a 5c 64 65 66 5c 63 6f |width}.}|.\def\co|
|00005fc0| 6d 70 75 74 65 40 68 66 | 72 6f 6d 77 7b 0a 09 09 |mpute@hf|romw{...|
|00005fd0| 25 20 63 6f 6d 70 75 74 | 69 6e 67 20 3a 20 68 65 |% comput|ing : he|
|00005fe0| 69 67 68 74 20 3d 20 77 | 69 64 74 68 20 2a 20 28 |ight = w|idth * (|
|00005ff0| 62 62 68 20 2f 20 62 62 | 77 29 0a 09 20 20 20 20 |bbh / bb|w).. |
|00006000| 20 20 20 20 5c 69 6e 40 | 68 75 6e 64 72 65 64 73 | \in@|hundreds|
|00006010| 7b 5c 40 70 40 73 77 69 | 64 74 68 7d 7b 5c 40 62 |{\@p@swi|dth}{\@b|
|00006020| 62 68 7d 7b 5c 40 62 62 | 77 7d 0a 09 09 25 5c 70 |bh}{\@bb|w}...%\p|
|00006030| 73 40 74 79 70 65 6f 75 | 74 7b 20 5c 40 70 40 73 |s@typeou|t{ \@p@s|
|00006040| 77 69 64 74 68 20 2a 20 | 5c 40 62 62 68 20 2f 20 |width * |\@bbh / |
|00006050| 5c 40 62 62 77 20 3d 20 | 5c 40 72 65 73 75 6c 74 |\@bbw = |\@result|
|00006060| 20 7d 0a 09 09 5c 65 64 | 65 66 5c 40 70 40 73 68 | }...\ed|ef\@p@sh|
|00006070| 65 69 67 68 74 7b 5c 40 | 72 65 73 75 6c 74 7d 0a |eight{\@|result}.|
|00006080| 09 09 25 5c 70 73 40 74 | 79 70 65 6f 75 74 7b 68 |..%\ps@t|ypeout{h|
|00006090| 20 66 72 6f 6d 20 77 20 | 3a 20 68 65 69 67 68 74 | from w |: height|
|000060a0| 20 69 73 20 5c 40 70 40 | 73 68 65 69 67 68 74 7d | is \@p@|sheight}|
|000060b0| 0a 7d 0a 5c 64 65 66 5c | 63 6f 6d 70 75 74 65 40 |.}.\def\|compute@|
|000060c0| 68 61 6e 64 77 7b 0a 09 | 09 5c 69 66 40 68 65 69 |handw{..|.\if@hei|
|000060d0| 67 68 74 20 0a 09 09 09 | 5c 69 66 40 77 69 64 74 |ght ....|\if@widt|
|000060e0| 68 0a 09 09 09 5c 65 6c | 73 65 0a 09 09 09 09 5c |h....\el|se.....\|
|000060f0| 63 6f 6d 70 75 74 65 40 | 77 66 72 6f 6d 68 0a 09 |compute@|wfromh..|
|00006100| 09 09 5c 66 69 0a 09 09 | 5c 65 6c 73 65 20 0a 09 |..\fi...|\else ..|
|00006110| 09 09 5c 69 66 40 77 69 | 64 74 68 0a 09 09 09 09 |..\if@wi|dth.....|
|00006120| 5c 63 6f 6d 70 75 74 65 | 40 68 66 72 6f 6d 77 0a |\compute|@hfromw.|
|00006130| 09 09 09 5c 65 6c 73 65 | 0a 09 09 09 09 5c 65 64 |...\else|.....\ed|
|00006140| 65 66 5c 40 70 40 73 68 | 65 69 67 68 74 7b 5c 40 |ef\@p@sh|eight{\@|
|00006150| 62 62 68 7d 0a 09 09 09 | 09 5c 65 64 65 66 5c 40 |bbh}....|.\edef\@|
|00006160| 70 40 73 77 69 64 74 68 | 7b 5c 40 62 62 77 7d 0a |p@swidth|{\@bbw}.|
|00006170| 09 09 09 5c 66 69 0a 09 | 09 5c 66 69 0a 7d 0a 5c |...\fi..|.\fi.}.\|
|00006180| 64 65 66 5c 63 6f 6d 70 | 75 74 65 40 72 65 73 76 |def\comp|ute@resv|
|00006190| 7b 0a 09 09 5c 69 66 40 | 72 68 65 69 67 68 74 20 |{...\if@|rheight |
|000061a0| 5c 65 6c 73 65 20 5c 65 | 64 65 66 5c 40 70 40 73 |\else \e|def\@p@s|
|000061b0| 72 68 65 69 67 68 74 7b | 5c 40 70 40 73 68 65 69 |rheight{|\@p@shei|
|000061c0| 67 68 74 7d 20 5c 66 69 | 0a 09 09 5c 69 66 40 72 |ght} \fi|...\if@r|
|000061d0| 77 69 64 74 68 20 5c 65 | 6c 73 65 20 5c 65 64 65 |width \e|lse \ede|
|000061e0| 66 5c 40 70 40 73 72 77 | 69 64 74 68 7b 5c 40 70 |f\@p@srw|idth{\@p|
|000061f0| 40 73 77 69 64 74 68 7d | 20 5c 66 69 0a 09 09 25 |@swidth}| \fi...%|
|00006200| 5c 70 73 40 74 79 70 65 | 6f 75 74 7b 72 68 65 69 |\ps@type|out{rhei|
|00006210| 67 68 74 20 3d 20 5c 40 | 70 40 73 72 68 65 69 67 |ght = \@|p@srheig|
|00006220| 68 74 2c 20 72 77 69 64 | 74 68 20 3d 20 5c 40 70 |ht, rwid|th = \@p|
|00006230| 40 73 72 77 69 64 74 68 | 7d 0a 7d 0a 25 09 09 0a |@srwidth|}.}.%...|
|00006240| 25 20 43 6f 6d 70 75 74 | 65 20 61 6e 79 20 6d 69 |% Comput|e any mi|
|00006250| 73 73 69 6e 67 20 76 61 | 6c 75 65 73 0a 5c 64 65 |ssing va|lues.\de|
|00006260| 66 5c 63 6f 6d 70 75 74 | 65 40 73 69 7a 65 73 7b |f\comput|e@sizes{|
|00006270| 0a 09 5c 63 6f 6d 70 75 | 74 65 40 62 62 0a 09 5c |..\compu|te@bb..\|
|00006280| 69 66 40 73 63 61 6c 65 | 66 69 72 73 74 5c 69 66 |if@scale|first\if|
|00006290| 40 61 6e 67 6c 65 0a 25 | 20 61 74 20 74 68 69 73 |@angle.%| at this|
|000062a0| 20 70 6f 69 6e 74 20 74 | 68 65 20 62 6f 75 6e 64 | point t|he bound|
|000062b0| 69 6e 67 20 62 6f 78 20 | 68 61 73 20 62 65 65 6e |ing box |has been|
|000062c0| 20 61 64 6a 73 75 74 65 | 64 20 63 6f 72 72 65 63 | adjsute|d correc|
|000062d0| 74 6c 79 20 66 6f 72 0a | 25 20 72 6f 74 61 74 69 |tly for.|% rotati|
|000062e0| 6f 6e 2e 20 20 50 53 46 | 49 47 20 64 6f 65 73 20 |on. PSF|IG does |
|000062f0| 61 6c 6c 20 6f 66 20 69 | 74 73 20 73 63 61 6c 69 |all of i|ts scali|
|00006300| 6e 67 20 75 73 69 6e 67 | 20 5c 40 62 62 68 20 61 |ng using| \@bbh a|
|00006310| 6e 64 20 5c 40 62 62 77 | 2e 20 20 49 66 0a 25 20 |nd \@bbw|. If.% |
|00006320| 61 20 77 69 64 74 68 3d | 20 6f 72 20 68 65 69 67 |a width=| or heig|
|00006330| 68 74 3d 20 77 61 73 20 | 73 70 65 63 69 66 69 65 |ht= was |specifie|
|00006340| 64 20 61 6c 6f 6e 67 20 | 77 69 74 68 20 5c 70 73 |d along |with \ps|
|00006350| 73 63 61 6c 65 66 69 72 | 73 74 2c 20 74 68 65 6e |scalefir|st, then|
|00006360| 20 74 68 65 0a 25 20 77 | 69 64 74 68 3d 2f 68 65 | the.% w|idth=/he|
|00006370| 69 67 68 74 3d 20 76 61 | 6c 75 65 20 6e 65 65 64 |ight= va|lue need|
|00006380| 73 20 74 6f 20 62 65 20 | 61 64 6a 75 73 74 65 64 |s to be |adjusted|
|00006390| 20 74 6f 20 6d 61 74 63 | 68 20 74 68 65 20 6e 65 | to matc|h the ne|
|000063a0| 77 20 28 72 6f 74 61 74 | 65 64 29 0a 25 20 62 6f |w (rotat|ed).% bo|
|000063b0| 75 6e 64 69 6e 67 20 62 | 6f 78 20 73 69 7a 65 20 |unding b|ox size |
|000063c0| 28 73 70 65 63 69 66 65 | 64 20 69 6e 20 5c 40 62 |(specife|d in \@b|
|000063d0| 62 77 20 61 6e 64 20 5c | 40 62 62 68 29 2e 0a 25 |bw and \|@bbh)..%|
|000063e0| 20 20 20 20 5c 70 73 40 | 62 62 77 20 20 20 20 20 | \ps@|bbw |
|000063f0| 20 20 77 69 64 74 68 3d | 0a 25 20 20 20 20 2d 2d | width=|.% --|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.
