summaryrefslogtreecommitdiff
path: root/systems/tex-extensions/clasen/examples/example1/example1.ps
blob: fa0cc14dd5468556118304bfbd694163e51cfcf4 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
%!PS-Adobe-2.0
%%Creator: dvips 5.76a Copyright 1997 Radical Eye Software (www.radicaleye.com)
%%Title: example1.dvi
%%Pages: 1
%%PageOrder: Ascend
%%BoundingBox: 0 0 596 842
%%EndComments
%DVIPSCommandLine: dvips -a -D600 -mode ljfive example1.dvi -o
%+ example1.ps
%DVIPSParameters: dpi=600, compressed
%DVIPSSource:  TeX output 1998.07.23:1914
%%BeginProcSet: texc.pro
%!
/TeXDict 300 dict def TeXDict begin /N{def}def /B{bind def}N /S{exch}N
/X{S N}B /TR{translate}N /isls false N /vsize 11 72 mul N /hsize 8.5 72
mul N /landplus90{false}def /@rigin{isls{[0 landplus90{1 -1}{-1 1}
ifelse 0 0 0]concat}if 72 Resolution div 72 VResolution div neg scale
isls{landplus90{VResolution 72 div vsize mul 0 exch}{Resolution -72 div
hsize mul 0}ifelse TR}if Resolution VResolution vsize -72 div 1 add mul
TR[matrix currentmatrix{dup dup round sub abs 0.00001 lt{round}if}
forall round exch round exch]setmatrix}N /@landscape{/isls true N}B
/@manualfeed{statusdict /manualfeed true put}B /@copies{/#copies X}B
/FMat[1 0 0 -1 0 0]N /FBB[0 0 0 0]N /nn 0 N /IE 0 N /ctr 0 N /df-tail{
/nn 8 dict N nn begin /FontType 3 N /FontMatrix fntrx N /FontBBox FBB N
string /base X array /BitMaps X /BuildChar{CharBuilder}N /Encoding IE N
end dup{/foo setfont}2 array copy cvx N load 0 nn put /ctr 0 N[}B /df{
/sf 1 N /fntrx FMat N df-tail}B /dfs{div /sf X /fntrx[sf 0 0 sf neg 0 0]
N df-tail}B /E{pop nn dup definefont setfont}B /ch-width{ch-data dup
length 5 sub get}B /ch-height{ch-data dup length 4 sub get}B /ch-xoff{
128 ch-data dup length 3 sub get sub}B /ch-yoff{ch-data dup length 2 sub
get 127 sub}B /ch-dx{ch-data dup length 1 sub get}B /ch-image{ch-data
dup type /stringtype ne{ctr get /ctr ctr 1 add N}if}B /id 0 N /rw 0 N
/rc 0 N /gp 0 N /cp 0 N /G 0 N /sf 0 N /CharBuilder{save 3 1 roll S dup
/base get 2 index get S /BitMaps get S get /ch-data X pop /ctr 0 N ch-dx
0 ch-xoff ch-yoff ch-height sub ch-xoff ch-width add ch-yoff
setcachedevice ch-width ch-height true[1 0 0 -1 -.1 ch-xoff sub ch-yoff
.1 sub]/id ch-image N /rw ch-width 7 add 8 idiv string N /rc 0 N /gp 0 N
/cp 0 N{rc 0 ne{rc 1 sub /rc X rw}{G}ifelse}imagemask restore}B /G{{id
gp get /gp gp 1 add N dup 18 mod S 18 idiv pl S get exec}loop}B /adv{cp
add /cp X}B /chg{rw cp id gp 4 index getinterval putinterval dup gp add
/gp X adv}B /nd{/cp 0 N rw exit}B /lsh{rw cp 2 copy get dup 0 eq{pop 1}{
dup 255 eq{pop 254}{dup dup add 255 and S 1 and or}ifelse}ifelse put 1
adv}B /rsh{rw cp 2 copy get dup 0 eq{pop 128}{dup 255 eq{pop 127}{dup 2
idiv S 128 and or}ifelse}ifelse put 1 adv}B /clr{rw cp 2 index string
putinterval adv}B /set{rw cp fillstr 0 4 index getinterval putinterval
adv}B /fillstr 18 string 0 1 17{2 copy 255 put pop}for N /pl[{adv 1 chg}
{adv 1 chg nd}{1 add chg}{1 add chg nd}{adv lsh}{adv lsh nd}{adv rsh}{
adv rsh nd}{1 add adv}{/rc X nd}{1 add set}{1 add clr}{adv 2 chg}{adv 2
chg nd}{pop nd}]dup{bind pop}forall N /D{/cc X dup type /stringtype ne{]
}if nn /base get cc ctr put nn /BitMaps get S ctr S sf 1 ne{dup dup
length 1 sub dup 2 index S get sf div put}if put /ctr ctr 1 add N}B /I{
cc 1 add D}B /bop{userdict /bop-hook known{bop-hook}if /SI save N @rigin
0 0 moveto /V matrix currentmatrix dup 1 get dup mul exch 0 get dup mul
add .99 lt{/QV}{/RV}ifelse load def pop pop}N /eop{SI restore userdict
/eop-hook known{eop-hook}if showpage}N /@start{userdict /start-hook
known{start-hook}if pop /VResolution X /Resolution X 1000 div /DVImag X
/IE 256 array N 0 1 255{IE S 1 string dup 0 3 index put cvn put}for
65781.76 div /vsize X 65781.76 div /hsize X}N /p{show}N /RMat[1 0 0 -1 0
0]N /BDot 260 string N /rulex 0 N /ruley 0 N /v{/ruley X /rulex X V}B /V
{}B /RV statusdict begin /product where{pop false[(Display)(NeXT)
(LaserWriter 16/600)]{dup length product length le{dup length product
exch 0 exch getinterval eq{pop true exit}if}{pop}ifelse}forall}{false}
ifelse end{{gsave TR -.1 .1 TR 1 1 scale rulex ruley false RMat{BDot}
imagemask grestore}}{{gsave TR -.1 .1 TR rulex ruley scale 1 1 false
RMat{BDot}imagemask grestore}}ifelse B /QV{gsave newpath transform round
exch round exch itransform moveto rulex 0 rlineto 0 ruley neg rlineto
rulex neg 0 rlineto fill grestore}B /a{moveto}B /delta 0 N /tail{dup
/delta X 0 rmoveto}B /M{S p delta add tail}B /b{S p tail}B /c{-4 M}B /d{
-3 M}B /e{-2 M}B /f{-1 M}B /g{0 M}B /h{1 M}B /i{2 M}B /j{3 M}B /k{4 M}B
/w{0 rmoveto}B /l{p -4 w}B /m{p -3 w}B /n{p -2 w}B /o{p -1 w}B /q{p 1 w}
B /r{p 2 w}B /s{p 3 w}B /t{p 4 w}B /x{0 S rmoveto}B /y{3 2 roll p a}B
/bos{/SS save N}B /eos{SS restore}B end

%%EndProcSet
TeXDict begin 39158280 55380996 1000 600 600 (example1.dvi)
@start
%DVIPSBitmapFont: Fa cmr10 10 19
/Fa 19 120 df<DA07FC13FC91393FFF07FF49B5009F1380903B03FC07FF8FC0903B0FE0
03FE0FE0903A1FC007FC1F90383F800FD97F0013F8017EED0FC001FE903907F007804992
C7FC1201ACB812F8A32801FC0007F0C7FCB3AB486C497E267FFFE0B512F0A3333B7FBA30
>11 D<B512FCA616067F941C>45 D<EB3FE0EBFFFC000313FF3907C03F80390F800FC048
6C6C7E01E07F6E7EA2380FC001D807807FEA0300C7FCA414FF130FEB7FF13801FF01EA07
F8EA0FF0EA1FE0EA3FC0EA7F80A2D8FF00141CA41403A2387F800714063A3FC01C7E383A
1FF0787FF83A0FFFF03FF0000301E013E03A007F000F8026277DA52A>97
D<EA03F812FFA3120F1203B0EC0FE0EC7FFC9038F9FFFE9039FBE03F809039FF800FC090
39FE0007E049EB03F0A249EB01F816FCA216FE1500A216FFA916FEA3150116FCA2ED03F8
6D14F0ED07E06DEB0FC09039E7801F809039E3E07F009038C1FFFE9038807FF8C7EA1FC0
283B7EB92E>I<EB03FC90381FFF80017F13E09038FE01F03901F800F83903F001FC3807
E003EA0FC0121F90388001F8003FEB00F01560007F140090C8FCA25AA97EA27FA2003F14
0E7F001F141C6C7E000714386C7ED801FC13F03900FF03E090387FFFC0011F1300EB07F8
1F277DA525>I<ED1FC0EC07FFA3EC007F151FB0EB07F8EB1FFE90387FFF9F9038FE07DF
3901F800FF4848137F4848133F4848131F121F485AA2127F90C7FCA35AA97EA27F123FA2
121F6C6C133F157F6C6C13FF3A03F001DFF03A01FC079FFF39007FFF1FEB3FFED907F013
C0283B7DB92E>I<EB07F8EB1FFF017F13809038FC0FC03901F003E03903E001F0000714
F8390FC000FC121F4913FE003F147EA248C7127FA35A90B6FCA390C8FCA57EA27F123F15
076C7E150E6C7E0007141C6C6C133CD801FC13783900FF01F090383FFFC06D1380903803
FC0020277EA525>I<147E903803FF80010F13C090381FC7E090383F07F0EB7E0F13FE13
FC0001EB07E09038F803C0000390C7FCADB512FCA3D803F8C7FCB3AB487EB512F8A31C3B
7FBA19>I<EA03F812FFA3120F1203B0EC07F0EC1FFCEC7FFF9138F07F809038F9C01FD9
FB807F9038FF000F49805BA35BB3A4486C497EB500E1B51280A3293A7EB92E>104
D<EA03C0487E487E487EA46C5A6C5A6C5AC8FCA9EA01F812FFA312071203B3AA487EB512
E0A313387EB718>I<EA03F812FFA3120F1203B1913803FFFCA36E13C0913800FE005D15
F04A5A4A5A4A5A4AC7FC141E5C5C14FCEBF9FE13FBEBFF7F496C7EEBFC1F01F87F6E7E6E
7EA26E7E6E7EA26E7E157FA2ED3F8016C0486CEB7FF0B500E1B5FCA3283A7EB92C>107
D<EA03F812FFA3120F1203B3B3AD487EB512E0A3133A7EB918>I<2703F807F8EB0FF000
FFD91FFEEB3FFCDA7FFFEBFFFE913AF03F81E07F3D0FF9C00FC3801F802603FB80D9E700
7F020013E601FED907FC6D7EA2495CA2495CB3A4486C496C497EB500E1B500C3B51280A3
41257EA446>I<3903F807F000FFEB1FFCEC7FFF9138F07F80390FF9C01F2603FB807F90
38FF000F49805BA35BB3A4486C497EB500E1B51280A329257EA42E>I<3803F03F00FFEB
7F809038F1FFE014C7390FF38FF03803F70F13F69038FE07E09038FC03C0EC018091C7FC
A25BB3A3487EB512F8A31C257EA421>114 D<EBFF83000313E7000F13FFEA1F80383E00
3F487F00787FA200F87FA37E6C90C7FC6C7EEA7FF8EBFF806C13E06C13F86C7F6C7F0001
7F6C7E01031380EB003F0060EB1FC000E0130FA26C1307A37E15806C130F1500B4131EEB
C07C38F3FFF800E15B38C07F801A277DA521>I<131CA5133CA3137CA213FC1201120312
07121FB6FCA3D801FCC7FCB2EC01C0A93900FE0380A2017E13006D5AEB1FFE6D5AEB03F0
1A347FB220>I<B538C07FFEA33A0FFC001FF0D803F8EB07C016807F00011500A26D5B00
00140EA2017F5BA2EC803C013F1338A26D6C5AA214E0010F5BA214F101075BA2903803FB
80A214FF6D90C7FCA36D5AA2147CA3143827257EA32C>118 D<B53A8FFFF07FFEA3260F
F8009038800FF8000791397F0007E0EF03C000031780816DEC80070001027F1400A26D6E
5A000002FF130E15EF6DECE01ED97F01141C15C70281EBF03CD93F8314381583D91FC36D
5AECC701A2D90FE76D5AECEE00A2D907FEEBFFC04A137FA201035D4A133FA2010192C7FC
4A7FA20100141E4A130E37257EA33C>I E
%EndDVIPSBitmapFont
end
%%EndProlog
%%BeginSetup
%%Feature: *Resolution 600dpi
TeXDict begin
%%PaperSize: A4

%%EndSetup
%%Page: 0 1
0 0 bop 0 36 a Fa(aaaaa)0 93 y(bb-)0 151 y(b-)0 209 y(bb)0
244 y(cc-)0 280 y(ccc)0 338 y(abra-)0 396 y(k)-5 b(ad-)0
431 y(a-)0 489 y(bra)0 547 y(clien)n(t-serv)n(er)0 604
y(bart-)0 662 y(w)n(al)0 720 y(bimm-)0 777 y(bamm)0 835
y(sc)n(hi\013-)0 892 y(fahrt)p eop
%%Trailer
end
userdict /end-hook known{end-hook}if
%%EOF