Artifact 03b591170923aaeb021e27cce9e54ed1a22f118a9bd70fdedfd7aa39f97345f1:

• File psl-1983/20-tests/dmain6.mac — part of check-in [eb17ceb7f6] at 2020-04-21 19:40:01 on branch master — Add Reduce 3.0 to the historical section of the archive, and some more
  files relating to version sof PSL from the early 1980s. Thanks are due to
  Paul McJones and Nelson Beebe for these, as well as to all the original
  authors.

  git-svn-id: https://svn.code.sf.net/p/reduce-algebra/code/historical@5328 2bfe0521-f11c-4a00-b80e-6202646ff360 (user: arthurcnorman@users.sourceforge.net, size: 32809) [annotate] [blame] [check-ins using] [more...]

	radix 10
STACK:	block 5001
	intern STACK
L0001:	STACK+0
	intern L0001
L0002:	STACK+5000
	intern L0002
HEAP:	block 150001
	intern HEAP
L0183:	HEAP+0
	intern L0183
L0184:	HEAP+150000
	intern L0184
L0185:	0
	intern L0185
L0186:	0
	intern L0186
BPS:	block 501
	intern BPS
L1074:	BPS+0
	intern L1074
L1075:	BPS+0
	intern L1075
L1076:	BPS+500
	intern L1076
L1077:	BPS+500
	intern L1077
L0004:	block 10
	intern L0004
ARG1:	0
	intern ARG1
ARG2:	0
	intern ARG2
ARG3:	0
	intern ARG3
ARG4:	0
	intern ARG4
ARG5:	0
	intern ARG5
ARG6:	0
	intern ARG6
ARG7:	0
	intern ARG7
ARG8:	0
	intern ARG8
ARG9:	0
	intern ARG9
ARG10:	0
	intern ARG10
ARG11:	0
	intern ARG11
ARG12:	0
	intern ARG12
ARG13:	0
	intern ARG13
ARG14:	0
	intern ARG14
ARG15:	0
	intern ARG15
SYMVAL:	intern SYMVAL
	<29_31>+0
	<29_31>+1
	<29_31>+2
	<29_31>+3
	<29_31>+4
	<29_31>+5
	<29_31>+6
	<29_31>+7
	<29_31>+8
	<29_31>+9
	<29_31>+10
	<29_31>+11
	<29_31>+12
	<29_31>+13
	<29_31>+14
	<29_31>+15
	<29_31>+16
	<29_31>+17
	<29_31>+18
	<29_31>+19
	<29_31>+20
	<29_31>+21
	<29_31>+22
	<29_31>+23
	<29_31>+24
	<29_31>+25
	<29_31>+26
	<29_31>+27
	<29_31>+28
	<29_31>+29
	<29_31>+30
	<29_31>+31
	<29_31>+32
	<29_31>+33
	<29_31>+34
	<29_31>+35
	<29_31>+36
	<29_31>+37
	<29_31>+38
	<29_31>+39
	<29_31>+40
	<29_31>+41
	<29_31>+42
	<29_31>+43
	<29_31>+44
	<29_31>+45
	<29_31>+46
	<29_31>+47
	<29_31>+48
	<29_31>+49
	<29_31>+50
	<29_31>+51
	<29_31>+52
	<29_31>+53
	<29_31>+54
	<29_31>+55
	<29_31>+56
	<29_31>+57
	<29_31>+58
	<29_31>+59
	<29_31>+60
	<29_31>+61
	<29_31>+62
	<29_31>+63
	<29_31>+64
	<29_31>+65
	<29_31>+66
	<29_31>+67
	<29_31>+68
	<29_31>+69
	<29_31>+70
	<29_31>+71
	<29_31>+72
	<29_31>+73
	<29_31>+74
	<29_31>+75
	<29_31>+76
	<29_31>+77
	<29_31>+78
	<29_31>+79
	<29_31>+80
	<29_31>+81
	<29_31>+82
	<29_31>+83
	<30_31>+84
	<29_31>+85
	<29_31>+86
	<29_31>+87
	<29_31>+88
	<29_31>+89
	<29_31>+90
	<29_31>+91
	<29_31>+92
	<29_31>+93
	<29_31>+94
	<29_31>+95
	<29_31>+96
	<29_31>+97
	<29_31>+98
	<29_31>+99
	<29_31>+100
	<29_31>+101
	<29_31>+102
	<29_31>+103
	<29_31>+104
	<29_31>+105
	<29_31>+106
	<29_31>+107
	<29_31>+108
	<29_31>+109
	<29_31>+110
	<29_31>+111
	<29_31>+112
	<29_31>+113
	<29_31>+114
	<29_31>+115
	<29_31>+116
	<29_31>+117
	<29_31>+118
	<29_31>+119
	<29_31>+120
	<29_31>+121
	<29_31>+122
	<29_31>+123
	<29_31>+124
	<29_31>+125
	<29_31>+126
	<29_31>+127
	<30_31>+128
	<29_31>+129
	<29_31>+130
	<29_31>+131
	<29_31>+132
	<29_31>+133
	<29_31>+134
	<29_31>+135
	<29_31>+136
	<29_31>+137
	<29_31>+138
	<29_31>+139
	<29_31>+140
	<29_31>+141
	<29_31>+142
	<29_31>+143
	<29_31>+144
	<29_31>+145
	<29_31>+146
	<29_31>+147
	<29_31>+148
	<29_31>+149
	<29_31>+150
	<29_31>+151
	<29_31>+152
	<29_31>+153
	<30_31>+128
	<29_31>+155
	<29_31>+156
	<29_31>+157
	<29_31>+158
	<29_31>+159
	<29_31>+160
	<29_31>+161
	<29_31>+162
	<29_31>+163
	<29_31>+164
	<29_31>+165
	<29_31>+166
	<29_31>+167
	<29_31>+168
	<29_31>+169
	<29_31>+170
	<29_31>+171
	<29_31>+172
	<29_31>+173
	<29_31>+174
	<29_31>+175
	<29_31>+176
	<29_31>+177
	<29_31>+178
	<29_31>+179
	<29_31>+180
	<29_31>+181
	<29_31>+182
	<29_31>+183
	<29_31>+184
	<29_31>+185
	<29_31>+186
	<29_31>+187
	<29_31>+188
	<29_31>+189
	<29_31>+190
	<29_31>+191
	<29_31>+192
	<29_31>+193
	<29_31>+194
	<29_31>+195
	<29_31>+196
	<29_31>+197
	<29_31>+198
	<29_31>+199
	<29_31>+200
	<29_31>+201
	<29_31>+202
	<29_31>+203
	<29_31>+204
	<29_31>+205
	<29_31>+206
	<29_31>+207
	<29_31>+208
	<29_31>+209
	<29_31>+210
	<29_31>+211
	<29_31>+212
	<29_31>+213
	<29_31>+214
	<29_31>+215
	<29_31>+216
	<29_31>+217
	<29_31>+218
	<29_31>+219
	<29_31>+220
	<29_31>+221
	<29_31>+222
	<29_31>+223
	<29_31>+224
	<29_31>+225
	<29_31>+226
	<29_31>+227
	<29_31>+228
	<29_31>+229
	<29_31>+230
	<29_31>+231
	<29_31>+232
	<29_31>+233
	<29_31>+234
	<29_31>+235
	<29_31>+236
	<29_31>+237
	<29_31>+238
	<29_31>+239
	<29_31>+240
	<30_31>+128
	<29_31>+242
	<30_31>+128
	<30_31>+128
	<29_31>+245
	<29_31>+246
	<29_31>+247
	<29_31>+248
	<29_31>+249
	<29_31>+250
	<29_31>+251
	<29_31>+252
	<29_31>+253
	<29_31>+254
	<29_31>+255
	<29_31>+256
	<29_31>+257
	<29_31>+258
	<29_31>+259
	<29_31>+260
	<29_31>+261
	<29_31>+262
	<29_31>+263
	<29_31>+264
	<29_31>+265
	<29_31>+266
	<29_31>+267
	<29_31>+268
	<29_31>+269
	<29_31>+270
	<29_31>+271
	<29_31>+272
	<29_31>+273
	<29_31>+274
	<29_31>+275
	<29_31>+276
	<29_31>+277
	<29_31>+278
	<29_31>+279
	<29_31>+280
	<29_31>+281
	<29_31>+282
	<29_31>+283
	<29_31>+284
	<29_31>+285
	<29_31>+286
	<29_31>+287
	<29_31>+288
	<29_31>+289
	<29_31>+290
	<29_31>+291
	<29_31>+292
	<29_31>+293
	<29_31>+294
	<29_31>+295
	<29_31>+296
	<29_31>+297
	<29_31>+298
	<29_31>+299
	<29_31>+300
	<29_31>+301
	<29_31>+302
	<29_31>+303
	<29_31>+304
	<29_31>+305
	<29_31>+306
	<29_31>+307
	<29_31>+308
	<29_31>+309
	<29_31>+310
	<29_31>+311
	<29_31>+312
	<29_31>+313
	<29_31>+314
	<29_31>+315
	<29_31>+316
	<29_31>+317
	<29_31>+318
	<29_31>+319
	<29_31>+320
	<29_31>+321
	<29_31>+322
	<29_31>+323
	<29_31>+324
	<29_31>+325
	<29_31>+326
	<29_31>+327
	<29_31>+328
	<29_31>+329
	<29_31>+330
	<29_31>+331
	<29_31>+332
	<29_31>+333
	<29_31>+334
	<29_31>+335
	<29_31>+336
	<29_31>+337
	<29_31>+338
	<29_31>+339
	<29_31>+340
	<29_31>+341
	<29_31>+342
	<29_31>+343
	<29_31>+344
	<29_31>+345
	<29_31>+346
	<29_31>+347
	<29_31>+348
	<29_31>+349
	<29_31>+350
	<29_31>+351
	<30_31>+128
	<29_31>+353
	<29_31>+354
	<29_31>+355
	<29_31>+356
	<29_31>+357
	<29_31>+358
	<30_31>+128
	<30_31>+128
	<29_31>+361
	<29_31>+362
	<29_31>+363
	<29_31>+364
	<29_31>+365
	<29_31>+366
	<29_31>+367
	<29_31>+368
	<29_31>+369
	<29_31>+370
	<29_31>+371
	<29_31>+372
	<29_31>+373
	<29_31>+374
	<30_31>+26
	<29_31>+376
	<29_31>+377
	<29_31>+378
	<29_31>+379
	<29_31>+380
	<29_31>+381
	<29_31>+382
	<29_31>+383
	<29_31>+384
	<29_31>+385
	<29_31>+386
	<29_31>+387
	<29_31>+388
	<29_31>+389
	<29_31>+390
	<29_31>+391
	<29_31>+392
	<30_31>+128
	<30_31>+128
	<29_31>+395
	<29_31>+396
	<29_31>+397
	<29_31>+398
	<29_31>+399
	<29_31>+400
	<29_31>+401
	<29_31>+402
	<29_31>+403
	<29_31>+404
	<29_31>+405
	<29_31>+406
	<29_31>+407
	<29_31>+408
	<29_31>+409
	<29_31>+410
	<29_31>+411
	<29_31>+412
	block 88
SYMPRP:	intern SYMPRP
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	<30_31>+128
	block 88
SYMNAM:	intern SYMNAM
	extern L1305
	<4_31>+L1305
	extern L1306
	<4_31>+L1306
	extern L1307
	<4_31>+L1307
	extern L1308
	<4_31>+L1308
	extern L1309
	<4_31>+L1309
	extern L1310
	<4_31>+L1310
	extern L1311
	<4_31>+L1311
	extern L1312
	<4_31>+L1312
	extern L1313
	<4_31>+L1313
	extern L1314
	<4_31>+L1314
	extern L1315
	<4_31>+L1315
	extern L1316
	<4_31>+L1316
	extern L1317
	<4_31>+L1317
	extern L1318
	<4_31>+L1318
	extern L1319
	<4_31>+L1319
	extern L1320
	<4_31>+L1320
	extern L1321
	<4_31>+L1321
	extern L1322
	<4_31>+L1322
	extern L1323
	<4_31>+L1323
	extern L1324
	<4_31>+L1324
	extern L1325
	<4_31>+L1325
	extern L1326
	<4_31>+L1326
	extern L1327
	<4_31>+L1327
	extern L1328
	<4_31>+L1328
	extern L1329
	<4_31>+L1329
	extern L1330
	<4_31>+L1330
	extern L1331
	<4_31>+L1331
	extern L1332
	<4_31>+L1332
	extern L1333
	<4_31>+L1333
	extern L1334
	<4_31>+L1334
	extern L1335
	<4_31>+L1335
	extern L1336
	<4_31>+L1336
	extern L1337
	<4_31>+L1337
	extern L1338
	<4_31>+L1338
	extern L1339
	<4_31>+L1339
	extern L1340
	<4_31>+L1340
	extern L1341
	<4_31>+L1341
	extern L1342
	<4_31>+L1342
	extern L1343
	<4_31>+L1343
	extern L1344
	<4_31>+L1344
	extern L1345
	<4_31>+L1345
	extern L1346
	<4_31>+L1346
	extern L1347
	<4_31>+L1347
	extern L1348
	<4_31>+L1348
	extern L1349
	<4_31>+L1349
	extern L1350
	<4_31>+L1350
	extern L1351
	<4_31>+L1351
	extern L1352
	<4_31>+L1352
	extern L1353
	<4_31>+L1353
	extern L1354
	<4_31>+L1354
	extern L1355
	<4_31>+L1355
	extern L1356
	<4_31>+L1356
	extern L1357
	<4_31>+L1357
	extern L1358
	<4_31>+L1358
	extern L1359
	<4_31>+L1359
	extern L1360
	<4_31>+L1360
	extern L1361
	<4_31>+L1361
	extern L1362
	<4_31>+L1362
	extern L1363
	<4_31>+L1363
	extern L1364
	<4_31>+L1364
	extern L1365
	<4_31>+L1365
	extern L1366
	<4_31>+L1366
	extern L1367
	<4_31>+L1367
	extern L1368
	<4_31>+L1368
	extern L1369
	<4_31>+L1369
	extern L1370
	<4_31>+L1370
	extern L1371
	<4_31>+L1371
	extern L1372
	<4_31>+L1372
	extern L1373
	<4_31>+L1373
	extern L1374
	<4_31>+L1374
	extern L1375
	<4_31>+L1375
	extern L1376
	<4_31>+L1376
	extern L1377
	<4_31>+L1377
	extern L1378
	<4_31>+L1378
	extern L1379
	<4_31>+L1379
	extern L1380
	<4_31>+L1380
	extern L1381
	<4_31>+L1381
	extern L1382
	<4_31>+L1382
	extern L1383
	<4_31>+L1383
	extern L1384
	<4_31>+L1384
	extern L1385
	<4_31>+L1385
	extern L1386
	<4_31>+L1386
	extern L1387
	<4_31>+L1387
	extern L1388
	<4_31>+L1388
	extern L1389
	<4_31>+L1389
	extern L1390
	<4_31>+L1390
	extern L1391
	<4_31>+L1391
	extern L1392
	<4_31>+L1392
	extern L1393
	<4_31>+L1393
	extern L1394
	<4_31>+L1394
	extern L1395
	<4_31>+L1395
	extern L1396
	<4_31>+L1396
	extern L1397
	<4_31>+L1397
	extern L1398
	<4_31>+L1398
	extern L1399
	<4_31>+L1399
	extern L1400
	<4_31>+L1400
	extern L1401
	<4_31>+L1401
	extern L1402
	<4_31>+L1402
	extern L1403
	<4_31>+L1403
	extern L1404
	<4_31>+L1404
	extern L1405
	<4_31>+L1405
	extern L1406
	<4_31>+L1406
	extern L1407
	<4_31>+L1407
	extern L1408
	<4_31>+L1408
	extern L1409
	<4_31>+L1409
	extern L1410
	<4_31>+L1410
	extern L1411
	<4_31>+L1411
	extern L1412
	<4_31>+L1412
	extern L1413
	<4_31>+L1413
	extern L1414
	<4_31>+L1414
	extern L1415
	<4_31>+L1415
	extern L1416
	<4_31>+L1416
	extern L1417
	<4_31>+L1417
	extern L1418
	<4_31>+L1418
	extern L1419
	<4_31>+L1419
	extern L1420
	<4_31>+L1420
	extern L1421
	<4_31>+L1421
	extern L1422
	<4_31>+L1422
	extern L1423
	<4_31>+L1423
	extern L1424
	<4_31>+L1424
	extern L1425
	<4_31>+L1425
	extern L1426
	<4_31>+L1426
	extern L1427
	<4_31>+L1427
	extern L1428
	<4_31>+L1428
	extern L1429
	<4_31>+L1429
	extern L1430
	<4_31>+L1430
	extern L1431
	<4_31>+L1431
	extern L1432
	<4_31>+L1432
	extern L1433
	<4_31>+L1433
	extern L1434
	<4_31>+L1434
	extern L1435
	<4_31>+L1435
	extern L1436
	<4_31>+L1436
	extern L1437
	<4_31>+L1437
	extern L1438
	<4_31>+L1438
	extern L1439
	<4_31>+L1439
	extern L1440
	<4_31>+L1440
	extern L1441
	<4_31>+L1441
	extern L1442
	<4_31>+L1442
	extern L1443
	<4_31>+L1443
	extern L1444
	<4_31>+L1444
	extern L1445
	<4_31>+L1445
	extern L1446
	<4_31>+L1446
	extern L1447
	<4_31>+L1447
	extern L1448
	<4_31>+L1448
	extern L1449
	<4_31>+L1449
	extern L1450
	<4_31>+L1450
	extern L1451
	<4_31>+L1451
	extern L1452
	<4_31>+L1452
	extern L1453
	<4_31>+L1453
	extern L1454
	<4_31>+L1454
	extern L1455
	<4_31>+L1455
	extern L1456
	<4_31>+L1456
	extern L1457
	<4_31>+L1457
	extern L1458
	<4_31>+L1458
	extern L1459
	<4_31>+L1459
	extern L1460
	<4_31>+L1460
	extern L1461
	<4_31>+L1461
	extern L1462
	<4_31>+L1462
	extern L1463
	<4_31>+L1463
	extern L1464
	<4_31>+L1464
	extern L1465
	<4_31>+L1465
	extern L1466
	<4_31>+L1466
	extern L1467
	<4_31>+L1467
	extern L1468
	<4_31>+L1468
	extern L1469
	<4_31>+L1469
	extern L1470
	<4_31>+L1470
	extern L1471
	<4_31>+L1471
	extern L1472
	<4_31>+L1472
	extern L1473
	<4_31>+L1473
	extern L1474
	<4_31>+L1474
	extern L1475
	<4_31>+L1475
	extern L1476
	<4_31>+L1476
	extern L1477
	<4_31>+L1477
	extern L1478
	<4_31>+L1478
	extern L1479
	<4_31>+L1479
	extern L1480
	<4_31>+L1480
	extern L1481
	<4_31>+L1481
	extern L1482
	<4_31>+L1482
	extern L1483
	<4_31>+L1483
	extern L1484
	<4_31>+L1484
	extern L1485
	<4_31>+L1485
	extern L1486
	<4_31>+L1486
	extern L1487
	<4_31>+L1487
	extern L1488
	<4_31>+L1488
	extern L1489
	<4_31>+L1489
	extern L1490
	<4_31>+L1490
	extern L1491
	<4_31>+L1491
	extern L1492
	<4_31>+L1492
	extern L1493
	<4_31>+L1493
	extern L1494
	<4_31>+L1494
	extern L1495
	<4_31>+L1495
	extern L1496
	<4_31>+L1496
	extern L1497
	<4_31>+L1497
	extern L1498
	<4_31>+L1498
	extern L1499
	<4_31>+L1499
	extern L1500
	<4_31>+L1500
	extern L1501
	<4_31>+L1501
	extern L1502
	<4_31>+L1502
	extern L1503
	<4_31>+L1503
	extern L1504
	<4_31>+L1504
	extern L1505
	<4_31>+L1505
	extern L1506
	<4_31>+L1506
	extern L1507
	<4_31>+L1507
	extern L1508
	<4_31>+L1508
	extern L1509
	<4_31>+L1509
	extern L1510
	<4_31>+L1510
	extern L1511
	<4_31>+L1511
	extern L1512
	<4_31>+L1512
	extern L1513
	<4_31>+L1513
	extern L1514
	<4_31>+L1514
	extern L1515
	<4_31>+L1515
	extern L1516
	<4_31>+L1516
	extern L1517
	<4_31>+L1517
	extern L1518
	<4_31>+L1518
	extern L1519
	<4_31>+L1519
	extern L1520
	<4_31>+L1520
	extern L1521
	<4_31>+L1521
	extern L1522
	<4_31>+L1522
	extern L1523
	<4_31>+L1523
	extern L1524
	<4_31>+L1524
	extern L1525
	<4_31>+L1525
	extern L1526
	<4_31>+L1526
	extern L1527
	<4_31>+L1527
	extern L1528
	<4_31>+L1528
	extern L1529
	<4_31>+L1529
	extern L1530
	<4_31>+L1530
	extern L1531
	<4_31>+L1531
	extern L1532
	<4_31>+L1532
	extern L1533
	<4_31>+L1533
	extern L1534
	<4_31>+L1534
	extern L1535
	<4_31>+L1535
	extern L1536
	<4_31>+L1536
	extern L1537
	<4_31>+L1537
	extern L1538
	<4_31>+L1538
	extern L1539
	<4_31>+L1539
	extern L1540
	<4_31>+L1540
	extern L1541
	<4_31>+L1541
	extern L1542
	<4_31>+L1542
	extern L1543
	<4_31>+L1543
	extern L1544
	<4_31>+L1544
	extern L1545
	<4_31>+L1545
	extern L1546
	<4_31>+L1546
	extern L1547
	<4_31>+L1547
	extern L1548
	<4_31>+L1548
	extern L1549
	<4_31>+L1549
	extern L1550
	<4_31>+L1550
	extern L1551
	<4_31>+L1551
	extern L1552
	<4_31>+L1552
	extern L1553
	<4_31>+L1553
	extern L1554
	<4_31>+L1554
	extern L1555
	<4_31>+L1555
	extern L1556
	<4_31>+L1556
	extern L1557
	<4_31>+L1557
	extern L1558
	<4_31>+L1558
	extern L1559
	<4_31>+L1559
	extern L1560
	<4_31>+L1560
	extern L1561
	<4_31>+L1561
	extern L1562
	<4_31>+L1562
	extern L1563
	<4_31>+L1563
	extern L1564
	<4_31>+L1564
	extern L1565
	<4_31>+L1565
	extern L1566
	<4_31>+L1566
	extern L1567
	<4_31>+L1567
	extern L1568
	<4_31>+L1568
	extern L1569
	<4_31>+L1569
	extern L1570
	<4_31>+L1570
	extern L1571
	<4_31>+L1571
	extern L1572
	<4_31>+L1572
	extern L1573
	<4_31>+L1573
	extern L1574
	<4_31>+L1574
	extern L1575
	<4_31>+L1575
	extern L1576
	<4_31>+L1576
	extern L1577
	<4_31>+L1577
	extern L1578
	<4_31>+L1578
	extern L1579
	<4_31>+L1579
	extern L1580
	<4_31>+L1580
	extern L1581
	<4_31>+L1581
	extern L1582
	<4_31>+L1582
	extern L1583
	<4_31>+L1583
	extern L1584
	<4_31>+L1584
	extern L1585
	<4_31>+L1585
	extern L1586
	<4_31>+L1586
	extern L1587
	<4_31>+L1587
	extern L1588
	<4_31>+L1588
	extern L1589
	<4_31>+L1589
	extern L1590
	<4_31>+L1590
	extern L1591
	<4_31>+L1591
	extern L1592
	<4_31>+L1592
	extern L1593
	<4_31>+L1593
	extern L1594
	<4_31>+L1594
	extern L1595
	<4_31>+L1595
	extern L1596
	<4_31>+L1596
	extern L1597
	<4_31>+L1597
	extern L1598
	<4_31>+L1598
	extern L1599
	<4_31>+L1599
	extern L1600
	<4_31>+L1600
	extern L1601
	<4_31>+L1601
	extern L1602
	<4_31>+L1602
	extern L1603
	<4_31>+L1603
	extern L1604
	<4_31>+L1604
	extern L1605
	<4_31>+L1605
	extern L1606
	<4_31>+L1606
	extern L1607
	<4_31>+L1607
	extern L1608
	<4_31>+L1608
	extern L1609
	<4_31>+L1609
	extern L1610
	<4_31>+L1610
	extern L1611
	<4_31>+L1611
	extern L1612
	<4_31>+L1612
	extern L1613
	<4_31>+L1613
	extern L1614
	<4_31>+L1614
	extern L1615
	<4_31>+L1615
	extern L1616
	<4_31>+L1616
	extern L1617
	<4_31>+L1617
	extern L1618
	<4_31>+L1618
	extern L1619
	<4_31>+L1619
	extern L1620
	<4_31>+L1620
	extern L1621
	<4_31>+L1621
	extern L1622
	<4_31>+L1622
	extern L1623
	<4_31>+L1623
	extern L1624
	<4_31>+L1624
	extern L1625
	<4_31>+L1625
	extern L1626
	<4_31>+L1626
	extern L1627
	<4_31>+L1627
	extern L1628
	<4_31>+L1628
	extern L1629
	<4_31>+L1629
	extern L1630
	<4_31>+L1630
	extern L1631
	<4_31>+L1631
	extern L1632
	<4_31>+L1632
	extern L1633
	<4_31>+L1633
	extern L1634
	<4_31>+L1634
	extern L1635
	<4_31>+L1635
	extern L1636
	<4_31>+L1636
	extern L1637
	<4_31>+L1637
	extern L1638
	<4_31>+L1638
	extern L1639
	<4_31>+L1639
	extern L1640
	<4_31>+L1640
	extern L1641
	<4_31>+L1641
	extern L1642
	<4_31>+L1642
	extern L1643
	<4_31>+L1643
	extern L1644
	<4_31>+L1644
	extern L1645
	<4_31>+L1645
	extern L1646
	<4_31>+L1646
	extern L1647
	<4_31>+L1647
	extern L1648
	<4_31>+L1648
	extern L1649
	<4_31>+L1649
	extern L1650
	<4_31>+L1650
	extern L1651
	<4_31>+L1651
	extern L1652
	<4_31>+L1652
	extern L1653
	<4_31>+L1653
	extern L1654
	<4_31>+L1654
	extern L1655
	<4_31>+L1655
	extern L1656
	<4_31>+L1656
	extern L1657
	<4_31>+L1657
	extern L1658
	<4_31>+L1658
	extern L1659
	<4_31>+L1659
	extern L1660
	<4_31>+L1660
	extern L1661
	<4_31>+L1661
	extern L1662
	<4_31>+L1662
	extern L1663
	<4_31>+L1663
	extern L1664
	<4_31>+L1664
	extern L1665
	<4_31>+L1665
	extern L1666
	<4_31>+L1666
	extern L1667
	<4_31>+L1667
	extern L1668
	<4_31>+L1668
	extern L1669
	<4_31>+L1669
	extern L1670
	<4_31>+L1670
	extern L1671
	<4_31>+L1671
	extern L1672
	<4_31>+L1672
	extern L1673
	<4_31>+L1673
	extern L1674
	<4_31>+L1674
	extern L1675
	<4_31>+L1675
	extern L1676
	<4_31>+L1676
	extern L1677
	<4_31>+L1677
	extern L1678
	<4_31>+L1678
	extern L1679
	<4_31>+L1679
	extern L1680
	<4_31>+L1680
	extern L1681
	<4_31>+L1681
	extern L1682
	<4_31>+L1682
	extern L1683
	<4_31>+L1683
	extern L1684
	<4_31>+L1684
	extern L1685
	<4_31>+L1685
	extern L1686
	<4_31>+L1686
	extern L1687
	<4_31>+L1687
	extern L1688
	<4_31>+L1688
	extern L1689
	<4_31>+L1689
	extern L1690
	<4_31>+L1690
	extern L1691
	<4_31>+L1691
	extern L1692
	<4_31>+L1692
	extern L1693
	<4_31>+L1693
	extern L1694
	<4_31>+L1694
	extern L1695
	<4_31>+L1695
	extern L1696
	<4_31>+L1696
	extern L1697
	<4_31>+L1697
	extern L1698
	<4_31>+L1698
	extern L1699
	<4_31>+L1699
	extern L1700
	<4_31>+L1700
	extern L1701
	<4_31>+L1701
	extern L1702
	<4_31>+L1702
	extern L1703
	<4_31>+L1703
	extern L1704
	<4_31>+L1704
	extern L1705
	<4_31>+L1705
	extern L1706
	<4_31>+L1706
	extern L1707
	<4_31>+L1707
	extern L1708
	<4_31>+L1708
	extern L1709
	<4_31>+L1709
	extern L1710
	<4_31>+L1710
	extern L1711
	<4_31>+L1711
	extern L1712
	<4_31>+L1712
	extern L1713
	<4_31>+L1713
	extern L1714
	<4_31>+L1714
	extern L1715
	<4_31>+L1715
	extern L1716
	<4_31>+L1716
	extern L1717
	<4_31>+L1717
	414
	415
	416
	417
	418
	419
	420
	421
	422
	423
	424
	425
	426
	427
	428
	429
	430
	431
	432
	433
	434
	435
	436
	437
	438
	439
	440
	441
	442
	443
	444
	445
	446
	447
	448
	449
	450
	451
	452
	453
	454
	455
	456
	457
	458
	459
	460
	461
	462
	463
	464
	465
	466
	467
	468
	469
	470
	471
	472
	473
	474
	475
	476
	477
	478
	479
	480
	481
	482
	483
	484
	485
	486
	487
	488
	489
	490
	491
	492
	493
	494
	495
	496
	497
	498
	499
	500
	0
SYMFNC:	intern SYMFNC
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
	extern L0024
	jrst L0024##
	extern L0017
	jrst L0017##
	extern L0026
	jrst L0026##
	extern L0034
	jrst L0034##
	extern PRTITM
	jrst PRTITM##
	extern PRIN1
	jrst PRIN1##
	extern L0025
	jrst L0025##
	extern L0028
	jrst L0028##
	extern L0042
	jrst L0042##
	extern PRIN2
	jrst PRIN2##
	extern TERPRI
	jrst TERPRI##
	extern PRINT
	jrst PRINT##
	extern PRIN2T
	jrst PRIN2T##
	extern PUTC
	jrst PUTC##
	extern PBLANK
	jrst PBLANK##
	extern L0021
	jrst L0021##
	extern L1091
	jrst L1091##
	extern L1092
	jrst L1092##
 JRST SYMFNC+358
	extern QUIT
	jrst QUIT##
	extern ERROR
	jrst ERROR##
	extern L0093
	jrst L0093##
	extern L0094
	jrst L0094##
 JRST SYMFNC+358
	extern L0095
	jrst L0095##
 JRST SYMFNC+358
	extern L0098
	jrst L0098##
	extern L0099
	jrst L0099##
	extern L0102
	jrst L0102##
	extern L0103
	jrst L0103##
	extern L0106
	jrst L0106##
 JRST SYMFNC+358
	extern L0156
	jrst L0156##
	extern L0165
	jrst L0165##
 JRST SYMFNC+358
 JRST SYMFNC+358
	extern L0172
	jrst L0172##
 JRST SYMFNC+358
	extern L1029
	jrst L1029##
	extern L1019
	jrst L1019##
	extern L0177
	jrst L0177##
	extern L0182
	jrst L0182##
 JRST SYMFNC+358
	extern L1095
	jrst L1095##
	extern GTHEAP
	jrst GTHEAP##
	extern GTSTR
	jrst GTSTR##
	extern GTVECT
	jrst GTVECT##
	extern L0191
	jrst L0191##
	extern GTID
	jrst GTID##
	extern L0192
	jrst L0192##
	extern CONS
	jrst CONS##
	extern XCONS
	jrst XCONS##
	extern NCONS
	jrst NCONS##
	extern MKVECT
	jrst MKVECT##
	extern LIST2
	jrst LIST2##
	extern LIST3
	jrst LIST3##
	extern LIST4
	jrst LIST4##
	extern LIST5
	jrst LIST5##
 JRST SYMFNC+358
	extern L0209
	jrst L0209##
	extern EQSTR
	jrst EQSTR##
	extern L0222
	jrst L0222##
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
	extern L0224
	jrst L0224##
	extern L0230
	jrst L0230##
	extern L0233
	jrst L0233##
	extern L0246
	jrst L0246##
	extern DIGITP
	jrst DIGITP##
	extern L0237
	jrst L0237##
	extern L0297
	jrst L0297##
	extern READID
	jrst READID##
	extern RATOM
	jrst RATOM##
	extern WHITEP
	jrst WHITEP##
	extern GETC
	jrst GETC##
	extern L1090
	jrst L1090##
	extern L0241
	jrst L0241##
	extern L0252
	jrst L0252##
	extern L0301
	jrst L0301##
	extern INTERN
	jrst INTERN##
	extern L0295
	jrst L0295##
	extern ALPHAP
	jrst ALPHAP##
	extern L0291
	jrst L0291##
	extern L0270
	jrst L0270##
	extern L0263
	jrst L0263##
	extern L0330
	jrst L0330##
	extern L0287
	jrst L0287##
	extern L0299
	jrst L0299##
	extern READ1
	jrst READ1##
	extern READ
	jrst READ##
	extern L0310
	jrst L0310##
	extern QUOTE
	jrst QUOTE##
 JRST SYMFNC+358
	extern L0321
	jrst L0321##
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
	extern L0325
	jrst L0325##
	extern L1088
	jrst L1088##
	extern L0360
	jrst L0360##
	extern L0334
	jrst L0334##
	extern L1087
	jrst L1087##
	extern L0339
	jrst L0339##
	extern FCODEP
	jrst FCODEP##
	extern L0350
	jrst L0350##
	extern L0355
	jrst L0355##
	extern L0359
	jrst L0359##
 JRST SYMFNC+358
	extern L0370
	jrst L0370##
 JRST SYMFNC+358
 JRST SYMFNC+358
	extern L0436
	jrst L0436##
	extern L0365
	jrst L0365##
	extern L0437
	jrst L0437##
 JRST SYMFNC+358
	extern L0371
	jrst L0371##
	extern L1129
	jrst L1129##
	extern L0375
	jrst L0375##
	extern L0398
	jrst L0398##
	extern L0402
	jrst L0402##
	extern EVAL
	jrst EVAL##
	extern L0429
	jrst L0429##
	extern L0425
	jrst L0425##
	extern LBIND1
	jrst LBIND1##
	extern GET
	jrst GET##
	extern L0443
	jrst L0443##
 JRST SYMFNC+358
	extern BLDMSG
	jrst BLDMSG##
	extern L0515
	jrst L0515##
	extern L0674
	jrst L0674##
	extern PLUS2
	jrst PLUS2##
	extern MINUS
	jrst MINUS##
 JRST SYMFNC+358
 JRST SYMFNC+358
	extern ADD1
	jrst ADD1##
 JRST SYMFNC+358
	extern SUB1
	jrst SUB1##
	extern L0471
	jrst L0471##
	extern LESSP
	jrst LESSP##
	extern L0483
	jrst L0483##
	extern TIMES2
	jrst TIMES2##
	extern CAR
	jrst CAR##
	extern CDR
	jrst CDR##
	extern CAAR
	jrst CAAR##
	extern CADR
	jrst CADR##
	extern CDAR
	jrst CDAR##
	extern CDDR
	jrst CDDR##
	extern ATOM
	jrst ATOM##
	extern APPEND
	jrst APPEND##
	extern MEMQ
	jrst MEMQ##
	extern L0509
	jrst L0509##
	extern EVLIS
	jrst EVLIS##
	extern PROGN
	jrst PROGN##
	extern EVCOND
	jrst EVCOND##
	extern COND
	jrst COND##
	extern SET
	jrst SET##
	extern SETQ
	jrst SETQ##
	extern PUTD
	jrst PUTD##
	extern DE
	jrst DE##
 JRST SYMFNC+358
	extern DF
	jrst DF##
 JRST SYMFNC+358
	extern DN
	jrst DN##
 JRST SYMFNC+358
	extern DM
	jrst DM##
 JRST SYMFNC+358
	extern LIST
	jrst LIST##
	extern ATSOC
	jrst ATSOC##
	extern GEQ
	jrst GEQ##
	extern LEQ
	jrst LEQ##
	extern EQCAR
	jrst EQCAR##
	extern GETD
	jrst GETD##
	extern COPYD
	jrst COPYD##
	extern DELATQ
	jrst DELATQ##
	extern PUT
	jrst PUT##
	extern L0569
	jrst L0569##
	extern WHILE
	jrst WHILE##
 JRST SYMFNC+358
	extern L0614
	jrst L0614##
	extern L0620
	jrst L0620##
	extern L0604
	jrst L0604##
	extern L0665
	jrst L0665##
	extern L0603
	jrst L0603##
	extern APPLY
	jrst APPLY##
	extern L0607
	jrst L0607##
	extern LENGTH
	jrst LENGTH##
	extern CODEP
	jrst CODEP##
	extern PAIRP
	jrst PAIRP##
	extern IDP
	jrst IDP##
	extern EQ
	jrst EQ##
	extern NULL
	jrst NULL##
	extern NOT
	jrst NOT##
	extern L0634
	jrst L0634##
	extern MAPOBL
	jrst MAPOBL##
	extern L0642
	jrst L0642##
	extern L0643
	jrst L0643##
 JRST SYMFNC+358
	extern L0646
	jrst L0646##
	extern L0647
	jrst L0647##
	extern PROP
	jrst PROP##
	extern L0660
	jrst L0660##
	extern L0679
	jrst L0679##
 JRST SYMFNC+358
 JRST SYMFNC+358
	extern RESET
	jrst RESET##
	extern L1010
	jrst L1010##
 JRST SYMFNC+358
	extern L1013
	jrst L1013##
	extern L1014
	jrst L1014##
	extern L1015
	jrst L1015##
 JRST SYMFNC+358
	extern L1018
	jrst L1018##
	extern PBIND1
	jrst PBIND1##
	extern L1032
	jrst L1032##
	extern L1078
	jrst L1078##
	extern L1148
	jrst L1148##
	extern MAIN.
	jrst MAIN.##
	extern INIT
	jrst INIT##
 JRST SYMFNC+358
 JRST SYMFNC+358
	extern TIMC
	jrst TIMC##
	extern DATE
	jrst DATE##
	extern L1086
	jrst L1086##
	extern PUTINT
	jrst PUTINT##
	extern L1089
	jrst L1089##
 JRST SYMFNC+358
 JRST SYMFNC+358
	extern FLAG
	jrst FLAG##
 JRST SYMFNC+358
	extern L1103
	jrst L1103##
	extern L1098
	jrst L1098##
	extern SPACED
	jrst SPACED##
	extern DASHED
	jrst DASHED##
	extern DOTTED
	jrst DOTTED##
	extern L1120
	jrst L1120##
	extern INF
	jrst INF##
	extern TAG
	jrst TAG##
	extern MKITEM
	jrst MKITEM##
	extern TIME
	jrst TIME##
	extern L1134
	jrst L1134##
	extern L1304
	jrst L1304##
 JRST SYMFNC+358
	extern L1163
	jrst L1163##
	extern L1244
	jrst L1244##
	extern L1282
	jrst L1282##
	extern L1153
	jrst L1153##
 JRST SYMFNC+358
	extern L1254
	jrst L1254##
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
	extern L1270
	jrst L1270##
	extern L1262
	jrst L1262##
 JRST SYMFNC+358
	extern L1245
	jrst L1245##
 JRST SYMFNC+358
	extern CBIND1
	jrst CBIND1##
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
 JRST SYMFNC+358
	extern CBIND2
	jrst CBIND2##
 JRST SYMFNC+358
 JRST SYMFNC+358
	block 88
L0003:	intern L0003
	413
	end