doc-src/Isa-logics.eps
author wenzelm
Wed, 31 Dec 1997 15:17:49 +0100
changeset 4504 2f39aa4bebf3
parent 1688 2121df622671
permissions -rw-r--r--
removed -i option;
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
840
wenzelm
parents:
diff changeset
     1
%!PS-Adobe-3.0 EPSF-3.0
1688
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
     2
%%BoundingBox: 106 651 274 788
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
     3
%%Title: (Isa-logics)
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
     4
%%Creator: (ClarisDraw: LaserWriter 8 8.1.1)
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
     5
%%CreationDate: (9:19 pm Wednesday, April 24, 1996)
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
     6
%%For: (Larry)
840
wenzelm
parents:
diff changeset
     7
%%Pages: 1
1688
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
     8
%%DocumentFonts: Times-Roman
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
     9
%%DocumentNeededFonts: Times-Roman
840
wenzelm
parents:
diff changeset
    10
%%DocumentSuppliedFonts:
wenzelm
parents:
diff changeset
    11
%%DocumentData: Clean7Bit
wenzelm
parents:
diff changeset
    12
%%PageOrder: Ascend
wenzelm
parents:
diff changeset
    13
%%Orientation: Portrait
1688
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
    14
%ADO_PaperArea: -124 -112 3244 2268
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
    15
%ADO_ImageableArea: 0 0 3124 2152
840
wenzelm
parents:
diff changeset
    16
%%EndComments
1688
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
    17
/md 148 dict def md begin
840
wenzelm
parents:
diff changeset
    18
/currentpacking where {pop /sc_oldpacking currentpacking def true setpacking}if
wenzelm
parents:
diff changeset
    19
%%BeginFile: adobe_psp_basic
wenzelm
parents:
diff changeset
    20
%%Copyright: Copyright 1990-1993 Adobe Systems Incorporated. All Rights Reserved.
wenzelm
parents:
diff changeset
    21
/bd{bind def}bind def
wenzelm
parents:
diff changeset
    22
/xdf{exch def}bd
wenzelm
parents:
diff changeset
    23
/xs{exch store}bd
wenzelm
parents:
diff changeset
    24
/ld{load def}bd
wenzelm
parents:
diff changeset
    25
/Z{0 def}bd
wenzelm
parents:
diff changeset
    26
/T/true
wenzelm
parents:
diff changeset
    27
/F/false
wenzelm
parents:
diff changeset
    28
/:L/lineto
wenzelm
parents:
diff changeset
    29
/lw/setlinewidth
wenzelm
parents:
diff changeset
    30
/:M/moveto
wenzelm
parents:
diff changeset
    31
/rl/rlineto
wenzelm
parents:
diff changeset
    32
/rm/rmoveto
wenzelm
parents:
diff changeset
    33
/:C/curveto
wenzelm
parents:
diff changeset
    34
/:T/translate
wenzelm
parents:
diff changeset
    35
/:K/closepath
wenzelm
parents:
diff changeset
    36
/:mf/makefont
wenzelm
parents:
diff changeset
    37
/gS/gsave
wenzelm
parents:
diff changeset
    38
/gR/grestore
wenzelm
parents:
diff changeset
    39
/np/newpath
wenzelm
parents:
diff changeset
    40
14{ld}repeat
wenzelm
parents:
diff changeset
    41
/$m matrix def
wenzelm
parents:
diff changeset
    42
/av 81 def
wenzelm
parents:
diff changeset
    43
/por true def
wenzelm
parents:
diff changeset
    44
/normland false def
wenzelm
parents:
diff changeset
    45
/psb-nosave{}bd
wenzelm
parents:
diff changeset
    46
/pse-nosave{}bd
wenzelm
parents:
diff changeset
    47
/us Z
wenzelm
parents:
diff changeset
    48
/psb{/us save store}bd
wenzelm
parents:
diff changeset
    49
/pse{us restore}bd
wenzelm
parents:
diff changeset
    50
/level2
wenzelm
parents:
diff changeset
    51
/languagelevel where
wenzelm
parents:
diff changeset
    52
{
wenzelm
parents:
diff changeset
    53
pop languagelevel 2 ge
wenzelm
parents:
diff changeset
    54
}{
wenzelm
parents:
diff changeset
    55
false
wenzelm
parents:
diff changeset
    56
}ifelse
wenzelm
parents:
diff changeset
    57
def
wenzelm
parents:
diff changeset
    58
/featurecleanup
wenzelm
parents:
diff changeset
    59
{
wenzelm
parents:
diff changeset
    60
stopped
wenzelm
parents:
diff changeset
    61
cleartomark
wenzelm
parents:
diff changeset
    62
countdictstack exch sub dup 0 gt
wenzelm
parents:
diff changeset
    63
{
wenzelm
parents:
diff changeset
    64
{end}repeat
wenzelm
parents:
diff changeset
    65
}{
wenzelm
parents:
diff changeset
    66
pop
wenzelm
parents:
diff changeset
    67
}ifelse
wenzelm
parents:
diff changeset
    68
}bd
wenzelm
parents:
diff changeset
    69
/noload Z
wenzelm
parents:
diff changeset
    70
/startnoload
wenzelm
parents:
diff changeset
    71
{
wenzelm
parents:
diff changeset
    72
{/noload save store}if
wenzelm
parents:
diff changeset
    73
}bd
wenzelm
parents:
diff changeset
    74
/endnoload
wenzelm
parents:
diff changeset
    75
{
wenzelm
parents:
diff changeset
    76
{noload restore}if
wenzelm
parents:
diff changeset
    77
}bd
wenzelm
parents:
diff changeset
    78
level2 startnoload
wenzelm
parents:
diff changeset
    79
/setjob
wenzelm
parents:
diff changeset
    80
{
wenzelm
parents:
diff changeset
    81
statusdict/jobname 3 -1 roll put
wenzelm
parents:
diff changeset
    82
}bd
wenzelm
parents:
diff changeset
    83
/setcopies
wenzelm
parents:
diff changeset
    84
{
wenzelm
parents:
diff changeset
    85
userdict/#copies 3 -1 roll put
wenzelm
parents:
diff changeset
    86
}bd
wenzelm
parents:
diff changeset
    87
level2 endnoload level2 not startnoload
wenzelm
parents:
diff changeset
    88
/setjob
wenzelm
parents:
diff changeset
    89
{
wenzelm
parents:
diff changeset
    90
1 dict begin/JobName xdf currentdict end setuserparams
wenzelm
parents:
diff changeset
    91
}bd
wenzelm
parents:
diff changeset
    92
/setcopies
wenzelm
parents:
diff changeset
    93
{
wenzelm
parents:
diff changeset
    94
1 dict begin/NumCopies xdf currentdict end setpagedevice
wenzelm
parents:
diff changeset
    95
}bd
wenzelm
parents:
diff changeset
    96
level2 not endnoload
wenzelm
parents:
diff changeset
    97
/pm Z
wenzelm
parents:
diff changeset
    98
/mT Z
wenzelm
parents:
diff changeset
    99
/sD Z
wenzelm
parents:
diff changeset
   100
/realshowpage Z
wenzelm
parents:
diff changeset
   101
/initializepage
wenzelm
parents:
diff changeset
   102
{
wenzelm
parents:
diff changeset
   103
/pm save store mT concat
wenzelm
parents:
diff changeset
   104
}bd
wenzelm
parents:
diff changeset
   105
/endp
wenzelm
parents:
diff changeset
   106
{
wenzelm
parents:
diff changeset
   107
pm restore showpage
wenzelm
parents:
diff changeset
   108
}def
wenzelm
parents:
diff changeset
   109
/$c/DeviceRGB def
wenzelm
parents:
diff changeset
   110
/rectclip where
wenzelm
parents:
diff changeset
   111
{
wenzelm
parents:
diff changeset
   112
pop/rC/rectclip ld
wenzelm
parents:
diff changeset
   113
}{
wenzelm
parents:
diff changeset
   114
/rC
wenzelm
parents:
diff changeset
   115
{
wenzelm
parents:
diff changeset
   116
np 4 2 roll
wenzelm
parents:
diff changeset
   117
:M
wenzelm
parents:
diff changeset
   118
1 index 0 rl
wenzelm
parents:
diff changeset
   119
0 exch rl
wenzelm
parents:
diff changeset
   120
neg 0 rl
wenzelm
parents:
diff changeset
   121
:K
wenzelm
parents:
diff changeset
   122
clip np
wenzelm
parents:
diff changeset
   123
}bd
wenzelm
parents:
diff changeset
   124
}ifelse
wenzelm
parents:
diff changeset
   125
/rectfill where
wenzelm
parents:
diff changeset
   126
{
wenzelm
parents:
diff changeset
   127
pop/rF/rectfill ld
wenzelm
parents:
diff changeset
   128
}{
wenzelm
parents:
diff changeset
   129
/rF
wenzelm
parents:
diff changeset
   130
{
wenzelm
parents:
diff changeset
   131
gS
wenzelm
parents:
diff changeset
   132
np
wenzelm
parents:
diff changeset
   133
4 2 roll
wenzelm
parents:
diff changeset
   134
:M
wenzelm
parents:
diff changeset
   135
1 index 0 rl
wenzelm
parents:
diff changeset
   136
0 exch rl
wenzelm
parents:
diff changeset
   137
neg 0 rl
wenzelm
parents:
diff changeset
   138
fill
wenzelm
parents:
diff changeset
   139
gR
wenzelm
parents:
diff changeset
   140
}bd
wenzelm
parents:
diff changeset
   141
}ifelse
wenzelm
parents:
diff changeset
   142
/rectstroke where
wenzelm
parents:
diff changeset
   143
{
wenzelm
parents:
diff changeset
   144
pop/rS/rectstroke ld
wenzelm
parents:
diff changeset
   145
}{
wenzelm
parents:
diff changeset
   146
/rS
wenzelm
parents:
diff changeset
   147
{
wenzelm
parents:
diff changeset
   148
gS
wenzelm
parents:
diff changeset
   149
np
wenzelm
parents:
diff changeset
   150
4 2 roll
wenzelm
parents:
diff changeset
   151
:M
wenzelm
parents:
diff changeset
   152
1 index 0 rl
wenzelm
parents:
diff changeset
   153
0 exch rl
wenzelm
parents:
diff changeset
   154
neg 0 rl
wenzelm
parents:
diff changeset
   155
:K
wenzelm
parents:
diff changeset
   156
stroke
wenzelm
parents:
diff changeset
   157
gR
wenzelm
parents:
diff changeset
   158
}bd
wenzelm
parents:
diff changeset
   159
}ifelse
wenzelm
parents:
diff changeset
   160
%%EndFile
wenzelm
parents:
diff changeset
   161
%%BeginFile: adobe_psp_colorspace_level1
wenzelm
parents:
diff changeset
   162
%%Copyright: Copyright 1991-1993 Adobe Systems Incorporated. All Rights Reserved.
wenzelm
parents:
diff changeset
   163
/G/setgray ld
wenzelm
parents:
diff changeset
   164
/:F/setrgbcolor ld
wenzelm
parents:
diff changeset
   165
%%EndFile
wenzelm
parents:
diff changeset
   166
%%BeginFile: adobe_psp_uniform_graphics
wenzelm
parents:
diff changeset
   167
%%Copyright: Copyright 1990-1993 Adobe Systems Incorporated. All Rights Reserved.
wenzelm
parents:
diff changeset
   168
/@a
wenzelm
parents:
diff changeset
   169
{
wenzelm
parents:
diff changeset
   170
np :M 0 rl :L 0 exch rl 0 rl :L fill
wenzelm
parents:
diff changeset
   171
}bd
wenzelm
parents:
diff changeset
   172
/@b
wenzelm
parents:
diff changeset
   173
{
wenzelm
parents:
diff changeset
   174
np :M 0 rl 0 exch rl :L 0 rl 0 exch rl fill
wenzelm
parents:
diff changeset
   175
}bd
wenzelm
parents:
diff changeset
   176
/arct where
wenzelm
parents:
diff changeset
   177
{
wenzelm
parents:
diff changeset
   178
pop
wenzelm
parents:
diff changeset
   179
}{
wenzelm
parents:
diff changeset
   180
/arct
wenzelm
parents:
diff changeset
   181
{
wenzelm
parents:
diff changeset
   182
arcto pop pop pop pop
wenzelm
parents:
diff changeset
   183
}bd
wenzelm
parents:
diff changeset
   184
}ifelse
wenzelm
parents:
diff changeset
   185
/x1 Z
wenzelm
parents:
diff changeset
   186
/x2 Z
wenzelm
parents:
diff changeset
   187
/y1 Z
wenzelm
parents:
diff changeset
   188
/y2 Z
wenzelm
parents:
diff changeset
   189
/rad Z
wenzelm
parents:
diff changeset
   190
/@q
wenzelm
parents:
diff changeset
   191
{
wenzelm
parents:
diff changeset
   192
/rad xs
wenzelm
parents:
diff changeset
   193
/y2 xs
wenzelm
parents:
diff changeset
   194
/x2 xs
wenzelm
parents:
diff changeset
   195
/y1 xs
wenzelm
parents:
diff changeset
   196
/x1 xs
wenzelm
parents:
diff changeset
   197
np
wenzelm
parents:
diff changeset
   198
x2 x1 add 2 div y1 :M
wenzelm
parents:
diff changeset
   199
x2 y1 x2 y2 rad arct
wenzelm
parents:
diff changeset
   200
x2 y2 x1 y2 rad arct
wenzelm
parents:
diff changeset
   201
x1 y2 x1 y1 rad arct
wenzelm
parents:
diff changeset
   202
x1 y1 x2 y1 rad arct
wenzelm
parents:
diff changeset
   203
fill
wenzelm
parents:
diff changeset
   204
}bd
wenzelm
parents:
diff changeset
   205
/@s
wenzelm
parents:
diff changeset
   206
{
wenzelm
parents:
diff changeset
   207
/rad xs
wenzelm
parents:
diff changeset
   208
/y2 xs
wenzelm
parents:
diff changeset
   209
/x2 xs
wenzelm
parents:
diff changeset
   210
/y1 xs
wenzelm
parents:
diff changeset
   211
/x1 xs
wenzelm
parents:
diff changeset
   212
np
wenzelm
parents:
diff changeset
   213
x2 x1 add 2 div y1 :M
wenzelm
parents:
diff changeset
   214
x2 y1 x2 y2 rad arct
wenzelm
parents:
diff changeset
   215
x2 y2 x1 y2 rad arct
wenzelm
parents:
diff changeset
   216
x1 y2 x1 y1 rad arct
wenzelm
parents:
diff changeset
   217
x1 y1 x2 y1 rad arct
wenzelm
parents:
diff changeset
   218
:K
wenzelm
parents:
diff changeset
   219
stroke
wenzelm
parents:
diff changeset
   220
}bd
wenzelm
parents:
diff changeset
   221
/@i
wenzelm
parents:
diff changeset
   222
{
wenzelm
parents:
diff changeset
   223
np 0 360 arc fill
wenzelm
parents:
diff changeset
   224
}bd
wenzelm
parents:
diff changeset
   225
/@j
wenzelm
parents:
diff changeset
   226
{
wenzelm
parents:
diff changeset
   227
gS
wenzelm
parents:
diff changeset
   228
np
wenzelm
parents:
diff changeset
   229
:T
wenzelm
parents:
diff changeset
   230
scale
wenzelm
parents:
diff changeset
   231
0 0 .5 0 360 arc
wenzelm
parents:
diff changeset
   232
fill
wenzelm
parents:
diff changeset
   233
gR
wenzelm
parents:
diff changeset
   234
}bd
wenzelm
parents:
diff changeset
   235
/@e
wenzelm
parents:
diff changeset
   236
{
wenzelm
parents:
diff changeset
   237
np
wenzelm
parents:
diff changeset
   238
0 360 arc
wenzelm
parents:
diff changeset
   239
:K
wenzelm
parents:
diff changeset
   240
stroke
wenzelm
parents:
diff changeset
   241
}bd
wenzelm
parents:
diff changeset
   242
/@f
wenzelm
parents:
diff changeset
   243
{
wenzelm
parents:
diff changeset
   244
np
wenzelm
parents:
diff changeset
   245
$m currentmatrix
wenzelm
parents:
diff changeset
   246
pop
wenzelm
parents:
diff changeset
   247
:T
wenzelm
parents:
diff changeset
   248
scale
wenzelm
parents:
diff changeset
   249
0 0 .5 0 360 arc
wenzelm
parents:
diff changeset
   250
:K
wenzelm
parents:
diff changeset
   251
$m setmatrix
wenzelm
parents:
diff changeset
   252
stroke
wenzelm
parents:
diff changeset
   253
}bd
wenzelm
parents:
diff changeset
   254
/@k
wenzelm
parents:
diff changeset
   255
{
wenzelm
parents:
diff changeset
   256
gS
wenzelm
parents:
diff changeset
   257
np
wenzelm
parents:
diff changeset
   258
:T
wenzelm
parents:
diff changeset
   259
0 0 :M
wenzelm
parents:
diff changeset
   260
0 0 5 2 roll
wenzelm
parents:
diff changeset
   261
arc fill
wenzelm
parents:
diff changeset
   262
gR
wenzelm
parents:
diff changeset
   263
}bd
wenzelm
parents:
diff changeset
   264
/@l
wenzelm
parents:
diff changeset
   265
{
wenzelm
parents:
diff changeset
   266
gS
wenzelm
parents:
diff changeset
   267
np
wenzelm
parents:
diff changeset
   268
:T
wenzelm
parents:
diff changeset
   269
0 0 :M
wenzelm
parents:
diff changeset
   270
scale
wenzelm
parents:
diff changeset
   271
0 0 .5 5 -2 roll arc
wenzelm
parents:
diff changeset
   272
fill
wenzelm
parents:
diff changeset
   273
gR
wenzelm
parents:
diff changeset
   274
}bd
wenzelm
parents:
diff changeset
   275
/@m
wenzelm
parents:
diff changeset
   276
{
wenzelm
parents:
diff changeset
   277
np
wenzelm
parents:
diff changeset
   278
arc
wenzelm
parents:
diff changeset
   279
stroke
wenzelm
parents:
diff changeset
   280
}bd
wenzelm
parents:
diff changeset
   281
/@n
wenzelm
parents:
diff changeset
   282
{
wenzelm
parents:
diff changeset
   283
np
wenzelm
parents:
diff changeset
   284
$m currentmatrix
wenzelm
parents:
diff changeset
   285
pop
wenzelm
parents:
diff changeset
   286
:T
wenzelm
parents:
diff changeset
   287
scale
wenzelm
parents:
diff changeset
   288
0 0 .5 5 -2 roll arc
wenzelm
parents:
diff changeset
   289
$m setmatrix
wenzelm
parents:
diff changeset
   290
stroke
wenzelm
parents:
diff changeset
   291
}bd
wenzelm
parents:
diff changeset
   292
%%EndFile
wenzelm
parents:
diff changeset
   293
%%BeginFile: adobe_psp_customps
wenzelm
parents:
diff changeset
   294
%%Copyright: Copyright 1990-1993 Adobe Systems Incorporated. All Rights Reserved.
wenzelm
parents:
diff changeset
   295
/$t Z
wenzelm
parents:
diff changeset
   296
/$p Z
wenzelm
parents:
diff changeset
   297
/$s Z
wenzelm
parents:
diff changeset
   298
/$o 1. def
wenzelm
parents:
diff changeset
   299
/2state? false def
wenzelm
parents:
diff changeset
   300
/ps Z
wenzelm
parents:
diff changeset
   301
level2 startnoload
wenzelm
parents:
diff changeset
   302
/pushcolor/currentrgbcolor ld
wenzelm
parents:
diff changeset
   303
/popcolor/setrgbcolor ld
wenzelm
parents:
diff changeset
   304
/setcmykcolor where
wenzelm
parents:
diff changeset
   305
{
wenzelm
parents:
diff changeset
   306
pop/currentcmykcolor where
wenzelm
parents:
diff changeset
   307
{
wenzelm
parents:
diff changeset
   308
pop/pushcolor/currentcmykcolor ld
wenzelm
parents:
diff changeset
   309
/popcolor/setcmykcolor ld
wenzelm
parents:
diff changeset
   310
}if
wenzelm
parents:
diff changeset
   311
}if
wenzelm
parents:
diff changeset
   312
level2 endnoload level2 not startnoload
wenzelm
parents:
diff changeset
   313
/pushcolor
wenzelm
parents:
diff changeset
   314
{
wenzelm
parents:
diff changeset
   315
currentcolorspace $c eq
wenzelm
parents:
diff changeset
   316
{
wenzelm
parents:
diff changeset
   317
currentcolor currentcolorspace true
wenzelm
parents:
diff changeset
   318
}{
wenzelm
parents:
diff changeset
   319
currentcmykcolor false
wenzelm
parents:
diff changeset
   320
}ifelse
wenzelm
parents:
diff changeset
   321
}bd
wenzelm
parents:
diff changeset
   322
/popcolor
wenzelm
parents:
diff changeset
   323
{
wenzelm
parents:
diff changeset
   324
{
wenzelm
parents:
diff changeset
   325
setcolorspace setcolor
wenzelm
parents:
diff changeset
   326
}{
wenzelm
parents:
diff changeset
   327
setcmykcolor
wenzelm
parents:
diff changeset
   328
}ifelse
wenzelm
parents:
diff changeset
   329
}bd
wenzelm
parents:
diff changeset
   330
level2 not endnoload
wenzelm
parents:
diff changeset
   331
/pushstatic
wenzelm
parents:
diff changeset
   332
{
wenzelm
parents:
diff changeset
   333
ps
wenzelm
parents:
diff changeset
   334
2state?
wenzelm
parents:
diff changeset
   335
$o
wenzelm
parents:
diff changeset
   336
$t
wenzelm
parents:
diff changeset
   337
$p
wenzelm
parents:
diff changeset
   338
$s
wenzelm
parents:
diff changeset
   339
}bd
wenzelm
parents:
diff changeset
   340
/popstatic
wenzelm
parents:
diff changeset
   341
{
wenzelm
parents:
diff changeset
   342
/$s xs
wenzelm
parents:
diff changeset
   343
/$p xs
wenzelm
parents:
diff changeset
   344
/$t xs
wenzelm
parents:
diff changeset
   345
/$o xs
wenzelm
parents:
diff changeset
   346
/2state? xs
wenzelm
parents:
diff changeset
   347
/ps xs
wenzelm
parents:
diff changeset
   348
}bd
wenzelm
parents:
diff changeset
   349
/pushgstate
wenzelm
parents:
diff changeset
   350
{
wenzelm
parents:
diff changeset
   351
save errordict/nocurrentpoint{pop 0 0}put
wenzelm
parents:
diff changeset
   352
currentpoint
wenzelm
parents:
diff changeset
   353
3 -1 roll restore
wenzelm
parents:
diff changeset
   354
pushcolor
wenzelm
parents:
diff changeset
   355
currentlinewidth
wenzelm
parents:
diff changeset
   356
currentlinecap
wenzelm
parents:
diff changeset
   357
currentlinejoin
wenzelm
parents:
diff changeset
   358
currentdash exch aload length
wenzelm
parents:
diff changeset
   359
np clippath pathbbox
wenzelm
parents:
diff changeset
   360
$m currentmatrix aload pop
wenzelm
parents:
diff changeset
   361
}bd
wenzelm
parents:
diff changeset
   362
/popgstate
wenzelm
parents:
diff changeset
   363
{
wenzelm
parents:
diff changeset
   364
$m astore setmatrix
wenzelm
parents:
diff changeset
   365
2 index sub exch
wenzelm
parents:
diff changeset
   366
3 index sub exch
wenzelm
parents:
diff changeset
   367
rC
wenzelm
parents:
diff changeset
   368
array astore exch setdash
wenzelm
parents:
diff changeset
   369
setlinejoin
wenzelm
parents:
diff changeset
   370
setlinecap
wenzelm
parents:
diff changeset
   371
lw
wenzelm
parents:
diff changeset
   372
popcolor
wenzelm
parents:
diff changeset
   373
np :M
wenzelm
parents:
diff changeset
   374
}bd
wenzelm
parents:
diff changeset
   375
/bu
wenzelm
parents:
diff changeset
   376
{
wenzelm
parents:
diff changeset
   377
pushgstate
wenzelm
parents:
diff changeset
   378
gR
wenzelm
parents:
diff changeset
   379
pushgstate
wenzelm
parents:
diff changeset
   380
2state?
wenzelm
parents:
diff changeset
   381
{
wenzelm
parents:
diff changeset
   382
gR
wenzelm
parents:
diff changeset
   383
pushgstate
wenzelm
parents:
diff changeset
   384
}if
wenzelm
parents:
diff changeset
   385
pushstatic
wenzelm
parents:
diff changeset
   386
pm restore
wenzelm
parents:
diff changeset
   387
mT concat
wenzelm
parents:
diff changeset
   388
}bd
wenzelm
parents:
diff changeset
   389
/bn
wenzelm
parents:
diff changeset
   390
{
wenzelm
parents:
diff changeset
   391
/pm save store
wenzelm
parents:
diff changeset
   392
popstatic
wenzelm
parents:
diff changeset
   393
popgstate
wenzelm
parents:
diff changeset
   394
gS
wenzelm
parents:
diff changeset
   395
popgstate
wenzelm
parents:
diff changeset
   396
2state?
wenzelm
parents:
diff changeset
   397
{
wenzelm
parents:
diff changeset
   398
gS
wenzelm
parents:
diff changeset
   399
popgstate
wenzelm
parents:
diff changeset
   400
}if
wenzelm
parents:
diff changeset
   401
}bd
wenzelm
parents:
diff changeset
   402
/cpat{pop 64 div G 8{pop}repeat}bd
wenzelm
parents:
diff changeset
   403
%%EndFile
wenzelm
parents:
diff changeset
   404
%%BeginFile: adobe_psp_basic_text
wenzelm
parents:
diff changeset
   405
%%Copyright: Copyright 1990-1993 Adobe Systems Incorporated. All Rights Reserved.
wenzelm
parents:
diff changeset
   406
/S/show ld
wenzelm
parents:
diff changeset
   407
/A{
wenzelm
parents:
diff changeset
   408
0.0 exch ashow
wenzelm
parents:
diff changeset
   409
}bd
wenzelm
parents:
diff changeset
   410
/R{
wenzelm
parents:
diff changeset
   411
0.0 exch 32 exch widthshow
wenzelm
parents:
diff changeset
   412
}bd
wenzelm
parents:
diff changeset
   413
/W{
wenzelm
parents:
diff changeset
   414
0.0 3 1 roll widthshow
wenzelm
parents:
diff changeset
   415
}bd
wenzelm
parents:
diff changeset
   416
/J{
wenzelm
parents:
diff changeset
   417
0.0 32 4 2 roll 0.0 exch awidthshow
wenzelm
parents:
diff changeset
   418
}bd
wenzelm
parents:
diff changeset
   419
/V{
wenzelm
parents:
diff changeset
   420
0.0 4 1 roll 0.0 exch awidthshow
wenzelm
parents:
diff changeset
   421
}bd
wenzelm
parents:
diff changeset
   422
/fcflg true def
wenzelm
parents:
diff changeset
   423
/fc{
wenzelm
parents:
diff changeset
   424
fcflg{
wenzelm
parents:
diff changeset
   425
vmstatus exch sub 50000 lt{
wenzelm
parents:
diff changeset
   426
(%%[ Warning: Running out of memory ]%%\r)print flush/fcflg false store
wenzelm
parents:
diff changeset
   427
}if pop
wenzelm
parents:
diff changeset
   428
}if
wenzelm
parents:
diff changeset
   429
}bd
wenzelm
parents:
diff changeset
   430
/$f[1 0 0 -1 0 0]def
wenzelm
parents:
diff changeset
   431
/:ff{$f :mf}bd
wenzelm
parents:
diff changeset
   432
/MacEncoding StandardEncoding 256 array copy def
wenzelm
parents:
diff changeset
   433
MacEncoding 39/quotesingle put
wenzelm
parents:
diff changeset
   434
MacEncoding 96/grave put
wenzelm
parents:
diff changeset
   435
/Adieresis/Aring/Ccedilla/Eacute/Ntilde/Odieresis/Udieresis/aacute
wenzelm
parents:
diff changeset
   436
/agrave/acircumflex/adieresis/atilde/aring/ccedilla/eacute/egrave
wenzelm
parents:
diff changeset
   437
/ecircumflex/edieresis/iacute/igrave/icircumflex/idieresis/ntilde/oacute
wenzelm
parents:
diff changeset
   438
/ograve/ocircumflex/odieresis/otilde/uacute/ugrave/ucircumflex/udieresis
wenzelm
parents:
diff changeset
   439
/dagger/degree/cent/sterling/section/bullet/paragraph/germandbls
wenzelm
parents:
diff changeset
   440
/registered/copyright/trademark/acute/dieresis/notequal/AE/Oslash
wenzelm
parents:
diff changeset
   441
/infinity/plusminus/lessequal/greaterequal/yen/mu/partialdiff/summation
wenzelm
parents:
diff changeset
   442
/product/pi/integral/ordfeminine/ordmasculine/Omega/ae/oslash
wenzelm
parents:
diff changeset
   443
/questiondown/exclamdown/logicalnot/radical/florin/approxequal/Delta/guillemotleft
wenzelm
parents:
diff changeset
   444
/guillemotright/ellipsis/space/Agrave/Atilde/Otilde/OE/oe
wenzelm
parents:
diff changeset
   445
/endash/emdash/quotedblleft/quotedblright/quoteleft/quoteright/divide/lozenge
wenzelm
parents:
diff changeset
   446
/ydieresis/Ydieresis/fraction/currency/guilsinglleft/guilsinglright/fi/fl
wenzelm
parents:
diff changeset
   447
/daggerdbl/periodcentered/quotesinglbase/quotedblbase/perthousand
wenzelm
parents:
diff changeset
   448
/Acircumflex/Ecircumflex/Aacute/Edieresis/Egrave/Iacute/Icircumflex/Idieresis/Igrave
wenzelm
parents:
diff changeset
   449
/Oacute/Ocircumflex/apple/Ograve/Uacute/Ucircumflex/Ugrave/dotlessi/circumflex/tilde
wenzelm
parents:
diff changeset
   450
/macron/breve/dotaccent/ring/cedilla/hungarumlaut/ogonek/caron
wenzelm
parents:
diff changeset
   451
MacEncoding 128 128 getinterval astore pop
wenzelm
parents:
diff changeset
   452
level2 startnoload
wenzelm
parents:
diff changeset
   453
/copyfontdict
wenzelm
parents:
diff changeset
   454
{
wenzelm
parents:
diff changeset
   455
findfont dup length dict
wenzelm
parents:
diff changeset
   456
begin
wenzelm
parents:
diff changeset
   457
{
wenzelm
parents:
diff changeset
   458
1 index/FID ne{def}{pop pop}ifelse
wenzelm
parents:
diff changeset
   459
}forall
wenzelm
parents:
diff changeset
   460
}bd
wenzelm
parents:
diff changeset
   461
level2 endnoload level2 not startnoload
wenzelm
parents:
diff changeset
   462
/copyfontdict
wenzelm
parents:
diff changeset
   463
{
wenzelm
parents:
diff changeset
   464
findfont dup length dict
wenzelm
parents:
diff changeset
   465
copy
wenzelm
parents:
diff changeset
   466
begin
wenzelm
parents:
diff changeset
   467
}bd
wenzelm
parents:
diff changeset
   468
level2 not endnoload
wenzelm
parents:
diff changeset
   469
md/fontname known not{
wenzelm
parents:
diff changeset
   470
/fontname/customfont def
wenzelm
parents:
diff changeset
   471
}if
wenzelm
parents:
diff changeset
   472
/Encoding Z
wenzelm
parents:
diff changeset
   473
/:mre
wenzelm
parents:
diff changeset
   474
{
wenzelm
parents:
diff changeset
   475
copyfontdict
wenzelm
parents:
diff changeset
   476
/Encoding MacEncoding def
wenzelm
parents:
diff changeset
   477
fontname currentdict
wenzelm
parents:
diff changeset
   478
end
wenzelm
parents:
diff changeset
   479
definefont :ff def
wenzelm
parents:
diff changeset
   480
}bd
wenzelm
parents:
diff changeset
   481
/:bsr
wenzelm
parents:
diff changeset
   482
{
wenzelm
parents:
diff changeset
   483
copyfontdict
wenzelm
parents:
diff changeset
   484
/Encoding Encoding 256 array copy def
wenzelm
parents:
diff changeset
   485
Encoding dup
wenzelm
parents:
diff changeset
   486
}bd
wenzelm
parents:
diff changeset
   487
/pd{put dup}bd
wenzelm
parents:
diff changeset
   488
/:esr
wenzelm
parents:
diff changeset
   489
{
wenzelm
parents:
diff changeset
   490
pop pop
wenzelm
parents:
diff changeset
   491
fontname currentdict
wenzelm
parents:
diff changeset
   492
end
wenzelm
parents:
diff changeset
   493
definefont :ff def
wenzelm
parents:
diff changeset
   494
}bd
wenzelm
parents:
diff changeset
   495
/scf
wenzelm
parents:
diff changeset
   496
{
wenzelm
parents:
diff changeset
   497
scalefont def
wenzelm
parents:
diff changeset
   498
}bd
wenzelm
parents:
diff changeset
   499
/scf-non
wenzelm
parents:
diff changeset
   500
{
wenzelm
parents:
diff changeset
   501
$m scale :mf setfont
wenzelm
parents:
diff changeset
   502
}bd
wenzelm
parents:
diff changeset
   503
/ps Z
wenzelm
parents:
diff changeset
   504
/fz{/ps xs}bd
wenzelm
parents:
diff changeset
   505
/sf/setfont ld
wenzelm
parents:
diff changeset
   506
/cF/currentfont ld
wenzelm
parents:
diff changeset
   507
/mbf
wenzelm
parents:
diff changeset
   508
{
wenzelm
parents:
diff changeset
   509
/makeblendedfont where
wenzelm
parents:
diff changeset
   510
{
wenzelm
parents:
diff changeset
   511
pop
wenzelm
parents:
diff changeset
   512
makeblendedfont
wenzelm
parents:
diff changeset
   513
/ABlend exch definefont
wenzelm
parents:
diff changeset
   514
}{
wenzelm
parents:
diff changeset
   515
pop
wenzelm
parents:
diff changeset
   516
}ifelse
wenzelm
parents:
diff changeset
   517
def
wenzelm
parents:
diff changeset
   518
}def
wenzelm
parents:
diff changeset
   519
%%EndFile
wenzelm
parents:
diff changeset
   520
/currentpacking where {pop sc_oldpacking setpacking}if
wenzelm
parents:
diff changeset
   521
end		% md
wenzelm
parents:
diff changeset
   522
%%EndProlog
wenzelm
parents:
diff changeset
   523
%%BeginSetup
wenzelm
parents:
diff changeset
   524
md begin
1688
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   525
/pT[1 0 0 -1 28 811]def/mT[.25 0 0 -.25 28 811]def
840
wenzelm
parents:
diff changeset
   526
/sD 16 dict def
1688
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   527
%%IncludeFont: Times-Roman
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   528
/f0_1/Times-Roman :mre
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   529
/f0_40 f0_1 40 scf
840
wenzelm
parents:
diff changeset
   530
/Courier findfont[10 0 0 -10 0 0]:mf setfont
1688
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   531
%PostScript Hack by Mike Brors 12/7/90
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   532
/DisableNextSetRGBColor
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   533
	{
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   534
	userdict begin
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   535
	/setrgbcolor 
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   536
		{
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   537
		pop
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   538
		pop
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   539
		pop
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   540
		userdict begin
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   541
		/setrgbcolor systemdict /setrgbcolor get def
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   542
		end
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   543
		} def
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   544
	end
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   545
} bind def
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   546
/bcarray where {
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   547
	pop
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   548
	bcarray 2 {
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   549
		/da 4 ps div def
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   550
		df setfont gsave cs wi
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   551
		1 index 0 ne{exch da add exch}if grestore setcharwidth
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   552
		cs 0 0 smc da 0 smc da da smc 0 da smc c
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   553
		gray
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   554
		{ gl}
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   555
		{1 setgray}ifelse
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   556
		da 2. div dup moveto show
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   557
	}bind put
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   558
} if
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   559
%
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   560
% Used to snap to device pixels, 1/4th of the pixel in.
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   561
/stp {  % x y  pl  x y                % Snap To Pixel, pixel  (auto stroke adjust)
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   562
	transform
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   563
	0.25 sub round 0.25 add exch
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   564
	0.25 sub round 0.25 add exch
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   565
	itransform
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   566
} bind def
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   567
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   568
/snapmoveto { % x y  m  -             % moveto, auto stroke adjust
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   569
	stp  moveto
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   570
} bind def
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   571
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   572
/snaplineto { % x y  l  -             % lineto, auto stroke adjust
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   573
	stp lineto
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   574
} bind def
840
wenzelm
parents:
diff changeset
   575
%%EndSetup
wenzelm
parents:
diff changeset
   576
%%Page: 1 1
wenzelm
parents:
diff changeset
   577
%%BeginPageSetup
wenzelm
parents:
diff changeset
   578
initializepage
wenzelm
parents:
diff changeset
   579
%%EndPageSetup
1688
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   580
gS 0 0 2152 3124 rC
840
wenzelm
parents:
diff changeset
   581
0 0 :M
1688
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   582
.25 0 translate
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   583
/DrawObject_save_matrix_0 matrix currentmatrix def
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   584
0 0 2152 2912 rC
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   585
-40 -12 :M
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   586
DrawObject_save_matrix_0 setmatrix
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   587
/DrawObject_save_matrix_0 matrix currentmatrix def
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   588
-40 -12 :M
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   589
/DrawObject_save_matrix_1 matrix currentmatrix def
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   590
0 0 2152 2911 rC
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   591
-40 -12 :M
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   592
/DrawObject_save_matrix_2 matrix currentmatrix def
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   593
-40 -12 :M
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   594
DrawObject_save_matrix_2 setmatrix
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   595
DrawObject_save_matrix_1 setmatrix
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   596
/DrawObject_save_matrix_1 matrix currentmatrix def
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   597
558 556 208 48 rC
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   598
558 556 :M
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   599
DrawObject_save_matrix_1 setmatrix
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   600
/DrawObject_save_matrix_1 matrix currentmatrix def
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   601
gR
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   602
gS 553 520 218 84 rC
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   603
558 592 :M
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   604
f0_40 sf
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   605
-.055(Pure Isabelle)A
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   606
gR
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   607
gS 0 0 2152 2912 rC
840
wenzelm
parents:
diff changeset
   608
4 lw
1688
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   609
518 528 806 636 32 @s
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   610
168 24 :M
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   611
DrawObject_save_matrix_1 setmatrix
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   612
/DrawObject_save_matrix_1 matrix currentmatrix def
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   613
426 422 -4 4 538 526 4 426 418 @a
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   614
426 418 :M
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   615
DrawObject_save_matrix_1 setmatrix
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   616
/DrawObject_save_matrix_1 matrix currentmatrix def
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   617
-4 -4 790 530 4 4 894 418 @b
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   618
786 526 :M
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   619
DrawObject_save_matrix_1 setmatrix
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   620
/DrawObject_save_matrix_1 matrix currentmatrix def
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   621
588 422 -4 4 610 526 4 588 418 @a
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   622
588 418 :M
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   623
DrawObject_save_matrix_1 setmatrix
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   624
/DrawObject_save_matrix_1 matrix currentmatrix def
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   625
-4 -4 718 530 4 4 732 418 @b
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   626
714 526 :M
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   627
DrawObject_save_matrix_1 setmatrix
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   628
/DrawObject_save_matrix_1 matrix currentmatrix def
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   629
376 364 92 48 rC
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   630
376 364 :M
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   631
DrawObject_save_matrix_1 setmatrix
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   632
/DrawObject_save_matrix_1 matrix currentmatrix def
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   633
gR
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   634
gS 371 328 102 84 rC
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   635
376 400 :M
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   636
f0_40 sf
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   637
-.286(IFOL)A
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   638
gR
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   639
gS 556 364 76 48 rC
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   640
556 364 :M
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   641
DrawObject_save_matrix_1 setmatrix
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   642
/DrawObject_save_matrix_1 matrix currentmatrix def
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   643
gR
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   644
gS 551 328 86 84 rC
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   645
556 400 :M
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   646
f0_40 sf
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   647
-.273(CTT)A
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   648
gR
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   649
gS 700 364 84 48 rC
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   650
700 364 :M
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   651
DrawObject_save_matrix_1 setmatrix
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   652
/DrawObject_save_matrix_1 matrix currentmatrix def
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   653
gR
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   654
gS 695 328 94 84 rC
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   655
700 400 :M
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   656
f0_40 sf
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   657
-.094(HOL)A
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   658
gR
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   659
gS 880 364 56 48 rC
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   660
880 364 :M
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   661
DrawObject_save_matrix_1 setmatrix
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   662
/DrawObject_save_matrix_1 matrix currentmatrix def
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   663
gR
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   664
gS 875 328 66 84 rC
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   665
880 400 :M
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   666
f0_40 sf
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   667
-.311(LK)A
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   668
gR
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   669
gS 0 0 2152 2912 rC
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   670
-4 -4 916 361 4 4 912 285 @b
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   671
4 lw
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   672
912 357 :M
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   673
DrawObject_save_matrix_1 setmatrix
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   674
/DrawObject_save_matrix_1 matrix currentmatrix def
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   675
320 94 :M
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   676
/DrawObject_save_matrix_2 matrix currentmatrix def
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   677
336 152 -4 4 394 220 4 336 148 @a
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   678
336 148 :M
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   679
DrawObject_save_matrix_2 setmatrix
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   680
/DrawObject_save_matrix_2 matrix currentmatrix def
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   681
-4 -4 430 224 4 4 480 148 @b
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   682
426 220 :M
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   683
DrawObject_save_matrix_2 setmatrix
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   684
/DrawObject_save_matrix_2 matrix currentmatrix def
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   685
320 94 48 48 rC
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   686
320 94 :M
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   687
DrawObject_save_matrix_2 setmatrix
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   688
/DrawObject_save_matrix_2 matrix currentmatrix def
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   689
gR
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   690
gS 315 58 58 84 rC
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   691
320 130 :M
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   692
f0_40 sf
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   693
-.67(ZF)A
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   694
gR
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   695
gS 448 94 76 48 rC
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   696
448 94 :M
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   697
DrawObject_save_matrix_2 setmatrix
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   698
DrawObject_save_matrix_1 setmatrix
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   699
/DrawObject_save_matrix_1 matrix currentmatrix def
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   700
gR
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   701
gS 443 58 86 84 rC
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   702
448 130 :M
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   703
f0_40 sf
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   704
-.175(LCF)A
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   705
gR
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   706
gS 860 178 116 96 rC
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   707
gR
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   708
gS 855 142 126 132 rC
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   709
860 214 :M
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   710
f0_40 sf
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   711
-.106(Modal)A
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   712
975 262 :M
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   713
DrawObject_save_matrix_1 setmatrix
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   714
/DrawObject_save_matrix_1 matrix currentmatrix def
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   715
860 262 :M
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   716
-.077(  logics)A
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   717
gR
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   718
gS 0 0 2152 2912 rC
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   719
-4 -4 412 360 4 4 408 284 @b
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   720
4 lw
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   721
408 356 :M
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   722
DrawObject_save_matrix_1 setmatrix
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   723
/DrawObject_save_matrix_1 matrix currentmatrix def
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   724
376 228 76 48 rC
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   725
376 228 :M
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   726
DrawObject_save_matrix_1 setmatrix
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   727
/DrawObject_save_matrix_1 matrix currentmatrix def
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   728
gR
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   729
gS 371 192 86 84 rC
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   730
376 264 :M
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   731
f0_40 sf
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   732
-.273(FOL)A
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   733
gR
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   734
gS 680 230 132 48 rC
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   735
680 230 :M
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   736
DrawObject_save_matrix_1 setmatrix
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   737
/DrawObject_save_matrix_1 matrix currentmatrix def
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   738
gR
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   739
gS 675 194 142 84 rC
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   740
680 266 :M
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   741
f0_40 sf
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   742
-.026(HOLCF)A
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   743
gR
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   744
gS 0 0 2152 2912 rC
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   745
-4 -4 748 361 4 4 744 285 @b
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   746
4 lw
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   747
744 357 :M
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   748
DrawObject_save_matrix_1 setmatrix
2121df622671 Now contains HOLCF
paulson
parents: 840
diff changeset
   749
DrawObject_save_matrix_0 setmatrix
840
wenzelm
parents:
diff changeset
   750
endp
wenzelm
parents:
diff changeset
   751
%%Trailer
wenzelm
parents:
diff changeset
   752
end		% md
wenzelm
parents:
diff changeset
   753
%%EOF