ATXXA9 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON APR 29, 2014;
;;5.1;TAXONOMY;**11**;FEB 04, 1997;Build 48
;
START ;
K:'$G(ATXPGMC) ^TMP("ATX",$J)
S ATXPGMC=$G(ATXPGMC)+1
F ATXI=1:1 S X=$P($T(TMP+ATXI),";;",2,99) Q:X="" S X="^TMP(""ATX"",$J,"_X,ATXI=ATXI+1,Y=$P($T(TMP+ATXI),";;",2,99) S @X=Y
Q
;
TMP ;;TAXONOMY (WITH BULLETIN)
;;21,"S52.221A ")
;;3100
;;21,"S52.221B ")
;;3101
;;21,"S52.221C ")
;;3102
;;21,"S52.222A ")
;;3103
;;21,"S52.222B ")
;;3104
;;21,"S52.222C ")
;;3105
;;21,"S52.223A ")
;;3106
;;21,"S52.223B ")
;;3107
;;21,"S52.223C ")
;;3108
;;21,"S52.224A ")
;;3109
;;21,"S52.224B ")
;;3110
;;21,"S52.224C ")
;;3111
;;21,"S52.225A ")
;;3112
;;21,"S52.225B ")
;;3113
;;21,"S52.225C ")
;;3114
;;21,"S52.226A ")
;;3115
;;21,"S52.226B ")
;;3116
;;21,"S52.226C ")
;;3117
;;21,"S52.231A ")
;;3118
;;21,"S52.231B ")
;;3119
;;21,"S52.231C ")
;;3120
;;21,"S52.232A ")
;;3121
;;21,"S52.232B ")
;;3122
;;21,"S52.232C ")
;;3123
;;21,"S52.233A ")
;;3124
;;21,"S52.233B ")
;;3125
;;21,"S52.233C ")
;;3126
;;21,"S52.234A ")
;;3127
;;21,"S52.234B ")
;;3128
;;21,"S52.234C ")
;;3129
;;21,"S52.235A ")
;;3130
;;21,"S52.235B ")
;;3131
;;21,"S52.235C ")
;;3132
;;21,"S52.236A ")
;;3133
;;21,"S52.236B ")
;;3134
;;21,"S52.236C ")
;;3135
;;21,"S52.241A ")
;;3136
;;21,"S52.241B ")
;;3137
;;21,"S52.241C ")
;;3138
;;21,"S52.242A ")
;;3139
;;21,"S52.242B ")
;;3140
;;21,"S52.242C ")
;;3141
;;21,"S52.243A ")
;;3142
;;21,"S52.243B ")
;;3143
;;21,"S52.243C ")
;;3144
;;21,"S52.244A ")
;;3145
;;21,"S52.244B ")
;;3146
;;21,"S52.244C ")
;;3147
;;21,"S52.245A ")
;;3148
;;21,"S52.245B ")
;;3149
;;21,"S52.245C ")
;;3150
;;21,"S52.246A ")
;;3151
;;21,"S52.246B ")
;;3152
;;21,"S52.246C ")
;;3153
;;21,"S52.251A ")
;;3154
;;21,"S52.251B ")
;;3155
;;21,"S52.251C ")
;;3156
;;21,"S52.252A ")
;;3157
;;21,"S52.252B ")
;;3158
;;21,"S52.252C ")
;;3159
;;21,"S52.253A ")
;;3160
;;21,"S52.253B ")
;;3161
;;21,"S52.253C ")
;;3162
;;21,"S52.254A ")
;;3163
;;21,"S52.254B ")
;;3164
;;21,"S52.254C ")
;;3165
;;21,"S52.255A ")
;;3166
;;21,"S52.255B ")
;;3167
;;21,"S52.255C ")
;;3168
;;21,"S52.256A ")
;;3169
;;21,"S52.256B ")
;;3170
;;21,"S52.256C ")
;;3171
;;21,"S52.261A ")
;;3172
;;21,"S52.261B ")
;;3173
;;21,"S52.261C ")
;;3174
;;21,"S52.262A ")
;;3175
;;21,"S52.262B ")
;;3176
;;21,"S52.262C ")
;;3177
;;21,"S52.263A ")
;;3178
;;21,"S52.263B ")
;;3179
;;21,"S52.263C ")
;;3180
;;21,"S52.264A ")
;;3181
;;21,"S52.264B ")
;;3182
;;21,"S52.264C ")
;;3183
;;21,"S52.265A ")
;;3184
;;21,"S52.265B ")
;;3185
;;21,"S52.265C ")
;;3186
;;21,"S52.266A ")
;;3187
;;21,"S52.266B ")
;;3188
;;21,"S52.266C ")
;;3189
;;21,"S52.271A ")
;;3190
;;21,"S52.271B ")
;;3191
;;21,"S52.271C ")
;;3192
;;21,"S52.272A ")
;;3193
;;21,"S52.272B ")
;;3194
;;21,"S52.272C ")
;;3195
;;21,"S52.279A ")
;;3196
;;21,"S52.279B ")
;;3197
;;21,"S52.279C ")
;;3198
;;21,"S52.281A ")
;;3199
;;21,"S52.281B ")
;;3200
;;21,"S52.281C ")
;;3201
;;21,"S52.282A ")
;;3202
;;21,"S52.282B ")
;;3203
;;21,"S52.282C ")
;;3204
;;21,"S52.283A ")
;;3205
;;21,"S52.283B ")
;;3206
;;21,"S52.283C ")
;;3207
;;21,"S52.291A ")
;;3208
;;21,"S52.291B ")
;;3209
;;21,"S52.291C ")
;;3210
;;21,"S52.292A ")
;;3211
;;21,"S52.292B ")
;;3212
;;21,"S52.292C ")
;;3213
;;21,"S52.299A ")
;;3214
;;21,"S52.299B ")
;;3215
;;21,"S52.299C ")
;;3216
;;21,"S52.301A ")
;;3217
;;21,"S52.301B ")
;;3218
;;21,"S52.301C ")
;;3219
;;21,"S52.302A ")
;;3220
;;21,"S52.302B ")
;;3221
;;21,"S52.302C ")
;;3222
;;21,"S52.309A ")
;;3223
;;21,"S52.309B ")
;;3224
;;21,"S52.309C ")
;;3225
;;21,"S52.311A ")
;;3226
;;21,"S52.312A ")
;;3227
;;21,"S52.319A ")
;;3228
;;21,"S52.321A ")
;;3229
;;21,"S52.321B ")
;;3230
;;21,"S52.321C ")
;;3231
;;21,"S52.322A ")
;;3232
;;21,"S52.322B ")
;;3233
;;21,"S52.322C ")
;;3234
;;21,"S52.323A ")
;;3235
;;21,"S52.323B ")
;;3236
;;21,"S52.323C ")
;;3237
;;21,"S52.324A ")
;;3238
;;21,"S52.324B ")
;;3239
;;21,"S52.324C ")
;;3240
;;21,"S52.325A ")
;;3241
;;21,"S52.325B ")
;;3242
;;21,"S52.325C ")
;;3243
;;21,"S52.326A ")
;;3244
;;21,"S52.326B ")
;;3245
;;21,"S52.326C ")
;;3246
;;21,"S52.331A ")
;;3247
;;21,"S52.331B ")
;;3248
;;21,"S52.331C ")
;;3249
;;21,"S52.332A ")
;;3250
;;21,"S52.332B ")
;;3251
;;21,"S52.332C ")
;;3252
;;21,"S52.333A ")
;;3253
;;21,"S52.333B ")
;;3254
;;21,"S52.333C ")
;;3255
;;21,"S52.334A ")
;;3256
;;21,"S52.334B ")
;;3257
;;21,"S52.334C ")
;;3258
;;21,"S52.335A ")
;;3259
;;21,"S52.335B ")
;;3260
;;21,"S52.335C ")
;;3261
;;21,"S52.336A ")
;;3262
;;21,"S52.336B ")
;;3263
;;21,"S52.336C ")
;;3264
;;21,"S52.341A ")
;;3265
;;21,"S52.341B ")
;;3266
;;21,"S52.341C ")
;;3267
;;21,"S52.342A ")
;;3268
;;21,"S52.342B ")
;;3269
;;21,"S52.342C ")
;;3270
;;21,"S52.343A ")
;;3271
;;21,"S52.343B ")
;;3272
;;21,"S52.343C ")
;;3273
;;21,"S52.344A ")
;;3274
;;21,"S52.344B ")
;;3275
;;21,"S52.344C ")
;;3276
;;21,"S52.345A ")
;;3277
;;21,"S52.345B ")
;;3278
;;21,"S52.345C ")
;;3279
;;21,"S52.346A ")
;;3280
;;21,"S52.346B ")
;;3281
;;21,"S52.346C ")
;;3282
;;21,"S52.351A ")
;;3283
;;21,"S52.351B ")
;;3284
;;21,"S52.351C ")
;;3285
;;21,"S52.352A ")
;;3286
;;21,"S52.352B ")
;;3287
;;21,"S52.352C ")
;;3288
;;21,"S52.353A ")
;;3289
;;21,"S52.353B ")
;;3290
;;21,"S52.353C ")
;;3291
;;21,"S52.354A ")
;;3292
;;21,"S52.354B ")
;;3293
;;21,"S52.354C ")
;;3294
;;21,"S52.355A ")
;;3295
;;21,"S52.355B ")
;;3296
;;21,"S52.355C ")
;;3297
;;21,"S52.356A ")
;;3298
;;21,"S52.356B ")
;;3299
;;21,"S52.356C ")
;;3300
;;21,"S52.361A ")
;;3301
;;21,"S52.361B ")
;;3302
;;21,"S52.361C ")
;;3303
;;21,"S52.362A ")
;;3304
;;21,"S52.362B ")
;;3305
;;21,"S52.362C ")
;;3306
;;21,"S52.363A ")
;;3307
;;21,"S52.363B ")
;;3308
;;21,"S52.363C ")
;;3309
;;21,"S52.364A ")
;;3310
;;21,"S52.364B ")
;;3311
;;21,"S52.364C ")
;;3312
;;21,"S52.365A ")
;;3313
;;21,"S52.365B ")
;;3314
;;21,"S52.365C ")
;;3315
;;21,"S52.366A ")
;;3316
;;21,"S52.366B ")
;;3317
;;21,"S52.366C ")
;;3318
;;21,"S52.371A ")
;;3319
;;21,"S52.371B ")
;;3320
;;21,"S52.371C ")
;;3321
;;21,"S52.372A ")
;;3322
;;21,"S52.372B ")
;;3323
;;21,"S52.372C ")
;;3324
;;21,"S52.379A ")
;;3325
;;21,"S52.379B ")
;;3326
;;21,"S52.379C ")
;;3327
;;21,"S52.381A ")
;;3328
;;21,"S52.381B ")
;;3329
;;21,"S52.381C ")
;;3330
;;21,"S52.382A ")
;;3331
;;21,"S52.382B ")
;;3332
;;21,"S52.382C ")
;;3333
;;21,"S52.389A ")
;;3334
;;21,"S52.389B ")
;;3335
;;21,"S52.389C ")
;;3336
;;21,"S52.391A ")
;;3337
;;21,"S52.391B ")
;;3338
;;21,"S52.391C ")
;;3339
;;21,"S52.392A ")
;;3340
;;21,"S52.392B ")
;;3341
;;21,"S52.392C ")
;;3342
;;21,"S52.399A ")
;;3343
;;21,"S52.399B ")
;;3344
;;21,"S52.399C ")
;;3345
;;21,"S52.501A ")
;;3346
;;21,"S52.501B ")
;;3347
;;21,"S52.501C ")
;;3348
;;21,"S52.502A ")
;;3349
;;21,"S52.502B ")
;;3350
;;21,"S52.502C ")
;;3351
;;21,"S52.509A ")
;;3352
;;21,"S52.509B ")
;;3353
;;21,"S52.509C ")
;;3354
;;21,"S52.511A ")
;;3355
;;21,"S52.511B ")
;;3356
;;21,"S52.511C ")
;;3357
;;21,"S52.512A ")
;;3358
;;21,"S52.512B ")
;;3359
;;21,"S52.512C ")
;;3360
;;21,"S52.513A ")
;;3361
;;21,"S52.513B ")
;;3362
;;21,"S52.513C ")
;;3363
;;21,"S52.514A ")
;;3364
;;21,"S52.514B ")
;;3365
;;21,"S52.514C ")
;;3366
;;21,"S52.515A ")
;;3367
;;21,"S52.515B ")
;;3368
;;21,"S52.515C ")
;;3369
;;21,"S52.516A ")
;;3370
;;21,"S52.516B ")
;;3371
;;21,"S52.516C ")
;;3372
;;21,"S52.521A ")
;;3373
;;21,"S52.522A ")
;;3374
;;21,"S52.529A ")
;;3375
;;21,"S52.531A ")
;;3376
;;21,"S52.531B ")
;;3377
;;21,"S52.531C ")
;;3378
;;21,"S52.532A ")
;;3379
;;21,"S52.532B ")
;;3380
;;21,"S52.532C ")
;;3381
;;21,"S52.539A ")
;;3382
;;21,"S52.539B ")
;;3383
;;21,"S52.539C ")
;;3384
;;21,"S52.541A ")
;;3385
;;21,"S52.541B ")
;;3386
;;21,"S52.541C ")
;;3387
;;21,"S52.542A ")
;;3388
;;21,"S52.542B ")
;;3389
;;21,"S52.542C ")
;;3390
;;21,"S52.549A ")
;;3391
;;21,"S52.549B ")
;;3392
;;21,"S52.549C ")
;;3393
;;21,"S52.551A ")
;;3394
;;21,"S52.551B ")
;;3395
;;21,"S52.551C ")
;;3396
;;21,"S52.552A ")
;;3397
;;21,"S52.552B ")
;;3398
;;21,"S52.552C ")
;;3399
;;21,"S52.559A ")
;;3400
;;21,"S52.559B ")
;;3401
;;21,"S52.559C ")
;;3402
;;21,"S52.561A ")
;;3403
;;21,"S52.561B ")
;;3404
;;21,"S52.561C ")
;;3405
;;21,"S52.562A ")
;;3406
;;21,"S52.562B ")
;;3407
;;21,"S52.562C ")
;;3408
;;21,"S52.569A ")
;;3409
;;21,"S52.569B ")
;;3410
;;21,"S52.569C ")
;;3411
;;21,"S52.571A ")
;;3412
;;21,"S52.571B ")
;;3413
;;21,"S52.571C ")
;;3414
;;21,"S52.572A ")
;;3415
;;21,"S52.572B ")
;;3416
;;21,"S52.572C ")
;;3417
;;21,"S52.579A ")
;;3418
;;21,"S52.579B ")
;;3419
;;21,"S52.579C ")
;;3420
;;21,"S52.591A ")
;;3421
;;21,"S52.591B ")
;;3422
;;21,"S52.591C ")
;;3423
;;21,"S52.592A ")
;;3424
;;21,"S52.592B ")
;;3425
;;21,"S52.592C ")
;;3426
;;21,"S52.599A ")
;;3427
;;21,"S52.599B ")
;;3428
;;21,"S52.599C ")
;;3429
;;21,"S52.601A ")
;;3430
;;21,"S52.601B ")
;;3431
;;21,"S52.601C ")
;;3432
;;21,"S52.602A ")
;;3433
;;21,"S52.602B ")
;;3434
;;21,"S52.602C ")
;;3435
;;21,"S52.609A ")
;;3436
;;21,"S52.609B ")
;;3437
;;21,"S52.609C ")
;;3438
;;21,"S52.611A ")
;;3439
;;21,"S52.611B ")
;;3440
;;21,"S52.611C ")
;;3441
;;21,"S52.612A ")
;;3442
;;21,"S52.612B ")
;;3443
;;21,"S52.612C ")
;;3444
;;21,"S52.613A ")
;;3445
;;21,"S52.613B ")
;;3446
;;21,"S52.613C ")
;;3447
;;21,"S52.614A ")
;;3448
;;21,"S52.614B ")
;;3449
;;21,"S52.614C ")
;;3450
;;21,"S52.615A ")
;;3451
;;21,"S52.615B ")
;;3452
;;21,"S52.615C ")
;;3453
;;21,"S52.616A ")
;;3454
;;21,"S52.616B ")
;;3455
;;21,"S52.616C ")
;;3456
;;21,"S52.621A ")
;;3457
;;21,"S52.622A ")
;;3458
;;21,"S52.629A ")
;;3459
;;21,"S52.691A ")
;;3460
;;21,"S52.691B ")
;;3461
;;21,"S52.691C ")
;;3462
;;21,"S52.692A ")
;;3463
;;21,"S52.692B ")
;;3464
;;21,"S52.692C ")
;;3465
;;21,"S52.699A ")
;;3466
;;21,"S52.699B ")
;;3467
;;21,"S52.699C ")
;;3468
;;21,"S52.90XA ")
;;3469
;;21,"S52.90XB ")
;;3470
;;21,"S52.90XC ")
;;3471
;;21,"S52.91XA ")
;;3472
;;21,"S52.91XB ")
;;3473
;;21,"S52.91XC ")
;;3474
;;21,"S52.92XA ")
;;3475
;;21,"S52.92XB ")
;;3476
;;21,"S52.92XC ")
;;3477
;;21,"S53.001A ")
;;3478
;;21,"S53.002A ")
;;3479
;;21,"S53.003A ")
;;3480
;;21,"S53.004A ")
;;3481
;;21,"S53.005A ")
;;3482
;;21,"S53.006A ")
;;3483
ATXXA9 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON APR 29, 2014;
+1 ;;5.1;TAXONOMY;**11**;FEB 04, 1997;Build 48
+2 ;
START ;
+1 IF '$GET(ATXPGMC)
KILL ^TMP("ATX",$JOB)
+2 SET ATXPGMC=$GET(ATXPGMC)+1
+3 FOR ATXI=1:1
SET X=$PIECE($TEXT(TMP+ATXI),";;",2,99)
IF X=""
QUIT
SET X="^TMP(""ATX"",$J,"_X
SET ATXI=ATXI+1
SET Y=$PIECE($TEXT(TMP+ATXI),";;",2,99)
SET @X=Y
+4 QUIT
+5 ;
TMP ;;TAXONOMY (WITH BULLETIN)
+1 ;;21,"S52.221A ")
+2 ;;3100
+3 ;;21,"S52.221B ")
+4 ;;3101
+5 ;;21,"S52.221C ")
+6 ;;3102
+7 ;;21,"S52.222A ")
+8 ;;3103
+9 ;;21,"S52.222B ")
+10 ;;3104
+11 ;;21,"S52.222C ")
+12 ;;3105
+13 ;;21,"S52.223A ")
+14 ;;3106
+15 ;;21,"S52.223B ")
+16 ;;3107
+17 ;;21,"S52.223C ")
+18 ;;3108
+19 ;;21,"S52.224A ")
+20 ;;3109
+21 ;;21,"S52.224B ")
+22 ;;3110
+23 ;;21,"S52.224C ")
+24 ;;3111
+25 ;;21,"S52.225A ")
+26 ;;3112
+27 ;;21,"S52.225B ")
+28 ;;3113
+29 ;;21,"S52.225C ")
+30 ;;3114
+31 ;;21,"S52.226A ")
+32 ;;3115
+33 ;;21,"S52.226B ")
+34 ;;3116
+35 ;;21,"S52.226C ")
+36 ;;3117
+37 ;;21,"S52.231A ")
+38 ;;3118
+39 ;;21,"S52.231B ")
+40 ;;3119
+41 ;;21,"S52.231C ")
+42 ;;3120
+43 ;;21,"S52.232A ")
+44 ;;3121
+45 ;;21,"S52.232B ")
+46 ;;3122
+47 ;;21,"S52.232C ")
+48 ;;3123
+49 ;;21,"S52.233A ")
+50 ;;3124
+51 ;;21,"S52.233B ")
+52 ;;3125
+53 ;;21,"S52.233C ")
+54 ;;3126
+55 ;;21,"S52.234A ")
+56 ;;3127
+57 ;;21,"S52.234B ")
+58 ;;3128
+59 ;;21,"S52.234C ")
+60 ;;3129
+61 ;;21,"S52.235A ")
+62 ;;3130
+63 ;;21,"S52.235B ")
+64 ;;3131
+65 ;;21,"S52.235C ")
+66 ;;3132
+67 ;;21,"S52.236A ")
+68 ;;3133
+69 ;;21,"S52.236B ")
+70 ;;3134
+71 ;;21,"S52.236C ")
+72 ;;3135
+73 ;;21,"S52.241A ")
+74 ;;3136
+75 ;;21,"S52.241B ")
+76 ;;3137
+77 ;;21,"S52.241C ")
+78 ;;3138
+79 ;;21,"S52.242A ")
+80 ;;3139
+81 ;;21,"S52.242B ")
+82 ;;3140
+83 ;;21,"S52.242C ")
+84 ;;3141
+85 ;;21,"S52.243A ")
+86 ;;3142
+87 ;;21,"S52.243B ")
+88 ;;3143
+89 ;;21,"S52.243C ")
+90 ;;3144
+91 ;;21,"S52.244A ")
+92 ;;3145
+93 ;;21,"S52.244B ")
+94 ;;3146
+95 ;;21,"S52.244C ")
+96 ;;3147
+97 ;;21,"S52.245A ")
+98 ;;3148
+99 ;;21,"S52.245B ")
+100 ;;3149
+101 ;;21,"S52.245C ")
+102 ;;3150
+103 ;;21,"S52.246A ")
+104 ;;3151
+105 ;;21,"S52.246B ")
+106 ;;3152
+107 ;;21,"S52.246C ")
+108 ;;3153
+109 ;;21,"S52.251A ")
+110 ;;3154
+111 ;;21,"S52.251B ")
+112 ;;3155
+113 ;;21,"S52.251C ")
+114 ;;3156
+115 ;;21,"S52.252A ")
+116 ;;3157
+117 ;;21,"S52.252B ")
+118 ;;3158
+119 ;;21,"S52.252C ")
+120 ;;3159
+121 ;;21,"S52.253A ")
+122 ;;3160
+123 ;;21,"S52.253B ")
+124 ;;3161
+125 ;;21,"S52.253C ")
+126 ;;3162
+127 ;;21,"S52.254A ")
+128 ;;3163
+129 ;;21,"S52.254B ")
+130 ;;3164
+131 ;;21,"S52.254C ")
+132 ;;3165
+133 ;;21,"S52.255A ")
+134 ;;3166
+135 ;;21,"S52.255B ")
+136 ;;3167
+137 ;;21,"S52.255C ")
+138 ;;3168
+139 ;;21,"S52.256A ")
+140 ;;3169
+141 ;;21,"S52.256B ")
+142 ;;3170
+143 ;;21,"S52.256C ")
+144 ;;3171
+145 ;;21,"S52.261A ")
+146 ;;3172
+147 ;;21,"S52.261B ")
+148 ;;3173
+149 ;;21,"S52.261C ")
+150 ;;3174
+151 ;;21,"S52.262A ")
+152 ;;3175
+153 ;;21,"S52.262B ")
+154 ;;3176
+155 ;;21,"S52.262C ")
+156 ;;3177
+157 ;;21,"S52.263A ")
+158 ;;3178
+159 ;;21,"S52.263B ")
+160 ;;3179
+161 ;;21,"S52.263C ")
+162 ;;3180
+163 ;;21,"S52.264A ")
+164 ;;3181
+165 ;;21,"S52.264B ")
+166 ;;3182
+167 ;;21,"S52.264C ")
+168 ;;3183
+169 ;;21,"S52.265A ")
+170 ;;3184
+171 ;;21,"S52.265B ")
+172 ;;3185
+173 ;;21,"S52.265C ")
+174 ;;3186
+175 ;;21,"S52.266A ")
+176 ;;3187
+177 ;;21,"S52.266B ")
+178 ;;3188
+179 ;;21,"S52.266C ")
+180 ;;3189
+181 ;;21,"S52.271A ")
+182 ;;3190
+183 ;;21,"S52.271B ")
+184 ;;3191
+185 ;;21,"S52.271C ")
+186 ;;3192
+187 ;;21,"S52.272A ")
+188 ;;3193
+189 ;;21,"S52.272B ")
+190 ;;3194
+191 ;;21,"S52.272C ")
+192 ;;3195
+193 ;;21,"S52.279A ")
+194 ;;3196
+195 ;;21,"S52.279B ")
+196 ;;3197
+197 ;;21,"S52.279C ")
+198 ;;3198
+199 ;;21,"S52.281A ")
+200 ;;3199
+201 ;;21,"S52.281B ")
+202 ;;3200
+203 ;;21,"S52.281C ")
+204 ;;3201
+205 ;;21,"S52.282A ")
+206 ;;3202
+207 ;;21,"S52.282B ")
+208 ;;3203
+209 ;;21,"S52.282C ")
+210 ;;3204
+211 ;;21,"S52.283A ")
+212 ;;3205
+213 ;;21,"S52.283B ")
+214 ;;3206
+215 ;;21,"S52.283C ")
+216 ;;3207
+217 ;;21,"S52.291A ")
+218 ;;3208
+219 ;;21,"S52.291B ")
+220 ;;3209
+221 ;;21,"S52.291C ")
+222 ;;3210
+223 ;;21,"S52.292A ")
+224 ;;3211
+225 ;;21,"S52.292B ")
+226 ;;3212
+227 ;;21,"S52.292C ")
+228 ;;3213
+229 ;;21,"S52.299A ")
+230 ;;3214
+231 ;;21,"S52.299B ")
+232 ;;3215
+233 ;;21,"S52.299C ")
+234 ;;3216
+235 ;;21,"S52.301A ")
+236 ;;3217
+237 ;;21,"S52.301B ")
+238 ;;3218
+239 ;;21,"S52.301C ")
+240 ;;3219
+241 ;;21,"S52.302A ")
+242 ;;3220
+243 ;;21,"S52.302B ")
+244 ;;3221
+245 ;;21,"S52.302C ")
+246 ;;3222
+247 ;;21,"S52.309A ")
+248 ;;3223
+249 ;;21,"S52.309B ")
+250 ;;3224
+251 ;;21,"S52.309C ")
+252 ;;3225
+253 ;;21,"S52.311A ")
+254 ;;3226
+255 ;;21,"S52.312A ")
+256 ;;3227
+257 ;;21,"S52.319A ")
+258 ;;3228
+259 ;;21,"S52.321A ")
+260 ;;3229
+261 ;;21,"S52.321B ")
+262 ;;3230
+263 ;;21,"S52.321C ")
+264 ;;3231
+265 ;;21,"S52.322A ")
+266 ;;3232
+267 ;;21,"S52.322B ")
+268 ;;3233
+269 ;;21,"S52.322C ")
+270 ;;3234
+271 ;;21,"S52.323A ")
+272 ;;3235
+273 ;;21,"S52.323B ")
+274 ;;3236
+275 ;;21,"S52.323C ")
+276 ;;3237
+277 ;;21,"S52.324A ")
+278 ;;3238
+279 ;;21,"S52.324B ")
+280 ;;3239
+281 ;;21,"S52.324C ")
+282 ;;3240
+283 ;;21,"S52.325A ")
+284 ;;3241
+285 ;;21,"S52.325B ")
+286 ;;3242
+287 ;;21,"S52.325C ")
+288 ;;3243
+289 ;;21,"S52.326A ")
+290 ;;3244
+291 ;;21,"S52.326B ")
+292 ;;3245
+293 ;;21,"S52.326C ")
+294 ;;3246
+295 ;;21,"S52.331A ")
+296 ;;3247
+297 ;;21,"S52.331B ")
+298 ;;3248
+299 ;;21,"S52.331C ")
+300 ;;3249
+301 ;;21,"S52.332A ")
+302 ;;3250
+303 ;;21,"S52.332B ")
+304 ;;3251
+305 ;;21,"S52.332C ")
+306 ;;3252
+307 ;;21,"S52.333A ")
+308 ;;3253
+309 ;;21,"S52.333B ")
+310 ;;3254
+311 ;;21,"S52.333C ")
+312 ;;3255
+313 ;;21,"S52.334A ")
+314 ;;3256
+315 ;;21,"S52.334B ")
+316 ;;3257
+317 ;;21,"S52.334C ")
+318 ;;3258
+319 ;;21,"S52.335A ")
+320 ;;3259
+321 ;;21,"S52.335B ")
+322 ;;3260
+323 ;;21,"S52.335C ")
+324 ;;3261
+325 ;;21,"S52.336A ")
+326 ;;3262
+327 ;;21,"S52.336B ")
+328 ;;3263
+329 ;;21,"S52.336C ")
+330 ;;3264
+331 ;;21,"S52.341A ")
+332 ;;3265
+333 ;;21,"S52.341B ")
+334 ;;3266
+335 ;;21,"S52.341C ")
+336 ;;3267
+337 ;;21,"S52.342A ")
+338 ;;3268
+339 ;;21,"S52.342B ")
+340 ;;3269
+341 ;;21,"S52.342C ")
+342 ;;3270
+343 ;;21,"S52.343A ")
+344 ;;3271
+345 ;;21,"S52.343B ")
+346 ;;3272
+347 ;;21,"S52.343C ")
+348 ;;3273
+349 ;;21,"S52.344A ")
+350 ;;3274
+351 ;;21,"S52.344B ")
+352 ;;3275
+353 ;;21,"S52.344C ")
+354 ;;3276
+355 ;;21,"S52.345A ")
+356 ;;3277
+357 ;;21,"S52.345B ")
+358 ;;3278
+359 ;;21,"S52.345C ")
+360 ;;3279
+361 ;;21,"S52.346A ")
+362 ;;3280
+363 ;;21,"S52.346B ")
+364 ;;3281
+365 ;;21,"S52.346C ")
+366 ;;3282
+367 ;;21,"S52.351A ")
+368 ;;3283
+369 ;;21,"S52.351B ")
+370 ;;3284
+371 ;;21,"S52.351C ")
+372 ;;3285
+373 ;;21,"S52.352A ")
+374 ;;3286
+375 ;;21,"S52.352B ")
+376 ;;3287
+377 ;;21,"S52.352C ")
+378 ;;3288
+379 ;;21,"S52.353A ")
+380 ;;3289
+381 ;;21,"S52.353B ")
+382 ;;3290
+383 ;;21,"S52.353C ")
+384 ;;3291
+385 ;;21,"S52.354A ")
+386 ;;3292
+387 ;;21,"S52.354B ")
+388 ;;3293
+389 ;;21,"S52.354C ")
+390 ;;3294
+391 ;;21,"S52.355A ")
+392 ;;3295
+393 ;;21,"S52.355B ")
+394 ;;3296
+395 ;;21,"S52.355C ")
+396 ;;3297
+397 ;;21,"S52.356A ")
+398 ;;3298
+399 ;;21,"S52.356B ")
+400 ;;3299
+401 ;;21,"S52.356C ")
+402 ;;3300
+403 ;;21,"S52.361A ")
+404 ;;3301
+405 ;;21,"S52.361B ")
+406 ;;3302
+407 ;;21,"S52.361C ")
+408 ;;3303
+409 ;;21,"S52.362A ")
+410 ;;3304
+411 ;;21,"S52.362B ")
+412 ;;3305
+413 ;;21,"S52.362C ")
+414 ;;3306
+415 ;;21,"S52.363A ")
+416 ;;3307
+417 ;;21,"S52.363B ")
+418 ;;3308
+419 ;;21,"S52.363C ")
+420 ;;3309
+421 ;;21,"S52.364A ")
+422 ;;3310
+423 ;;21,"S52.364B ")
+424 ;;3311
+425 ;;21,"S52.364C ")
+426 ;;3312
+427 ;;21,"S52.365A ")
+428 ;;3313
+429 ;;21,"S52.365B ")
+430 ;;3314
+431 ;;21,"S52.365C ")
+432 ;;3315
+433 ;;21,"S52.366A ")
+434 ;;3316
+435 ;;21,"S52.366B ")
+436 ;;3317
+437 ;;21,"S52.366C ")
+438 ;;3318
+439 ;;21,"S52.371A ")
+440 ;;3319
+441 ;;21,"S52.371B ")
+442 ;;3320
+443 ;;21,"S52.371C ")
+444 ;;3321
+445 ;;21,"S52.372A ")
+446 ;;3322
+447 ;;21,"S52.372B ")
+448 ;;3323
+449 ;;21,"S52.372C ")
+450 ;;3324
+451 ;;21,"S52.379A ")
+452 ;;3325
+453 ;;21,"S52.379B ")
+454 ;;3326
+455 ;;21,"S52.379C ")
+456 ;;3327
+457 ;;21,"S52.381A ")
+458 ;;3328
+459 ;;21,"S52.381B ")
+460 ;;3329
+461 ;;21,"S52.381C ")
+462 ;;3330
+463 ;;21,"S52.382A ")
+464 ;;3331
+465 ;;21,"S52.382B ")
+466 ;;3332
+467 ;;21,"S52.382C ")
+468 ;;3333
+469 ;;21,"S52.389A ")
+470 ;;3334
+471 ;;21,"S52.389B ")
+472 ;;3335
+473 ;;21,"S52.389C ")
+474 ;;3336
+475 ;;21,"S52.391A ")
+476 ;;3337
+477 ;;21,"S52.391B ")
+478 ;;3338
+479 ;;21,"S52.391C ")
+480 ;;3339
+481 ;;21,"S52.392A ")
+482 ;;3340
+483 ;;21,"S52.392B ")
+484 ;;3341
+485 ;;21,"S52.392C ")
+486 ;;3342
+487 ;;21,"S52.399A ")
+488 ;;3343
+489 ;;21,"S52.399B ")
+490 ;;3344
+491 ;;21,"S52.399C ")
+492 ;;3345
+493 ;;21,"S52.501A ")
+494 ;;3346
+495 ;;21,"S52.501B ")
+496 ;;3347
+497 ;;21,"S52.501C ")
+498 ;;3348
+499 ;;21,"S52.502A ")
+500 ;;3349
+501 ;;21,"S52.502B ")
+502 ;;3350
+503 ;;21,"S52.502C ")
+504 ;;3351
+505 ;;21,"S52.509A ")
+506 ;;3352
+507 ;;21,"S52.509B ")
+508 ;;3353
+509 ;;21,"S52.509C ")
+510 ;;3354
+511 ;;21,"S52.511A ")
+512 ;;3355
+513 ;;21,"S52.511B ")
+514 ;;3356
+515 ;;21,"S52.511C ")
+516 ;;3357
+517 ;;21,"S52.512A ")
+518 ;;3358
+519 ;;21,"S52.512B ")
+520 ;;3359
+521 ;;21,"S52.512C ")
+522 ;;3360
+523 ;;21,"S52.513A ")
+524 ;;3361
+525 ;;21,"S52.513B ")
+526 ;;3362
+527 ;;21,"S52.513C ")
+528 ;;3363
+529 ;;21,"S52.514A ")
+530 ;;3364
+531 ;;21,"S52.514B ")
+532 ;;3365
+533 ;;21,"S52.514C ")
+534 ;;3366
+535 ;;21,"S52.515A ")
+536 ;;3367
+537 ;;21,"S52.515B ")
+538 ;;3368
+539 ;;21,"S52.515C ")
+540 ;;3369
+541 ;;21,"S52.516A ")
+542 ;;3370
+543 ;;21,"S52.516B ")
+544 ;;3371
+545 ;;21,"S52.516C ")
+546 ;;3372
+547 ;;21,"S52.521A ")
+548 ;;3373
+549 ;;21,"S52.522A ")
+550 ;;3374
+551 ;;21,"S52.529A ")
+552 ;;3375
+553 ;;21,"S52.531A ")
+554 ;;3376
+555 ;;21,"S52.531B ")
+556 ;;3377
+557 ;;21,"S52.531C ")
+558 ;;3378
+559 ;;21,"S52.532A ")
+560 ;;3379
+561 ;;21,"S52.532B ")
+562 ;;3380
+563 ;;21,"S52.532C ")
+564 ;;3381
+565 ;;21,"S52.539A ")
+566 ;;3382
+567 ;;21,"S52.539B ")
+568 ;;3383
+569 ;;21,"S52.539C ")
+570 ;;3384
+571 ;;21,"S52.541A ")
+572 ;;3385
+573 ;;21,"S52.541B ")
+574 ;;3386
+575 ;;21,"S52.541C ")
+576 ;;3387
+577 ;;21,"S52.542A ")
+578 ;;3388
+579 ;;21,"S52.542B ")
+580 ;;3389
+581 ;;21,"S52.542C ")
+582 ;;3390
+583 ;;21,"S52.549A ")
+584 ;;3391
+585 ;;21,"S52.549B ")
+586 ;;3392
+587 ;;21,"S52.549C ")
+588 ;;3393
+589 ;;21,"S52.551A ")
+590 ;;3394
+591 ;;21,"S52.551B ")
+592 ;;3395
+593 ;;21,"S52.551C ")
+594 ;;3396
+595 ;;21,"S52.552A ")
+596 ;;3397
+597 ;;21,"S52.552B ")
+598 ;;3398
+599 ;;21,"S52.552C ")
+600 ;;3399
+601 ;;21,"S52.559A ")
+602 ;;3400
+603 ;;21,"S52.559B ")
+604 ;;3401
+605 ;;21,"S52.559C ")
+606 ;;3402
+607 ;;21,"S52.561A ")
+608 ;;3403
+609 ;;21,"S52.561B ")
+610 ;;3404
+611 ;;21,"S52.561C ")
+612 ;;3405
+613 ;;21,"S52.562A ")
+614 ;;3406
+615 ;;21,"S52.562B ")
+616 ;;3407
+617 ;;21,"S52.562C ")
+618 ;;3408
+619 ;;21,"S52.569A ")
+620 ;;3409
+621 ;;21,"S52.569B ")
+622 ;;3410
+623 ;;21,"S52.569C ")
+624 ;;3411
+625 ;;21,"S52.571A ")
+626 ;;3412
+627 ;;21,"S52.571B ")
+628 ;;3413
+629 ;;21,"S52.571C ")
+630 ;;3414
+631 ;;21,"S52.572A ")
+632 ;;3415
+633 ;;21,"S52.572B ")
+634 ;;3416
+635 ;;21,"S52.572C ")
+636 ;;3417
+637 ;;21,"S52.579A ")
+638 ;;3418
+639 ;;21,"S52.579B ")
+640 ;;3419
+641 ;;21,"S52.579C ")
+642 ;;3420
+643 ;;21,"S52.591A ")
+644 ;;3421
+645 ;;21,"S52.591B ")
+646 ;;3422
+647 ;;21,"S52.591C ")
+648 ;;3423
+649 ;;21,"S52.592A ")
+650 ;;3424
+651 ;;21,"S52.592B ")
+652 ;;3425
+653 ;;21,"S52.592C ")
+654 ;;3426
+655 ;;21,"S52.599A ")
+656 ;;3427
+657 ;;21,"S52.599B ")
+658 ;;3428
+659 ;;21,"S52.599C ")
+660 ;;3429
+661 ;;21,"S52.601A ")
+662 ;;3430
+663 ;;21,"S52.601B ")
+664 ;;3431
+665 ;;21,"S52.601C ")
+666 ;;3432
+667 ;;21,"S52.602A ")
+668 ;;3433
+669 ;;21,"S52.602B ")
+670 ;;3434
+671 ;;21,"S52.602C ")
+672 ;;3435
+673 ;;21,"S52.609A ")
+674 ;;3436
+675 ;;21,"S52.609B ")
+676 ;;3437
+677 ;;21,"S52.609C ")
+678 ;;3438
+679 ;;21,"S52.611A ")
+680 ;;3439
+681 ;;21,"S52.611B ")
+682 ;;3440
+683 ;;21,"S52.611C ")
+684 ;;3441
+685 ;;21,"S52.612A ")
+686 ;;3442
+687 ;;21,"S52.612B ")
+688 ;;3443
+689 ;;21,"S52.612C ")
+690 ;;3444
+691 ;;21,"S52.613A ")
+692 ;;3445
+693 ;;21,"S52.613B ")
+694 ;;3446
+695 ;;21,"S52.613C ")
+696 ;;3447
+697 ;;21,"S52.614A ")
+698 ;;3448
+699 ;;21,"S52.614B ")
+700 ;;3449
+701 ;;21,"S52.614C ")
+702 ;;3450
+703 ;;21,"S52.615A ")
+704 ;;3451
+705 ;;21,"S52.615B ")
+706 ;;3452
+707 ;;21,"S52.615C ")
+708 ;;3453
+709 ;;21,"S52.616A ")
+710 ;;3454
+711 ;;21,"S52.616B ")
+712 ;;3455
+713 ;;21,"S52.616C ")
+714 ;;3456
+715 ;;21,"S52.621A ")
+716 ;;3457
+717 ;;21,"S52.622A ")
+718 ;;3458
+719 ;;21,"S52.629A ")
+720 ;;3459
+721 ;;21,"S52.691A ")
+722 ;;3460
+723 ;;21,"S52.691B ")
+724 ;;3461
+725 ;;21,"S52.691C ")
+726 ;;3462
+727 ;;21,"S52.692A ")
+728 ;;3463
+729 ;;21,"S52.692B ")
+730 ;;3464
+731 ;;21,"S52.692C ")
+732 ;;3465
+733 ;;21,"S52.699A ")
+734 ;;3466
+735 ;;21,"S52.699B ")
+736 ;;3467
+737 ;;21,"S52.699C ")
+738 ;;3468
+739 ;;21,"S52.90XA ")
+740 ;;3469
+741 ;;21,"S52.90XB ")
+742 ;;3470
+743 ;;21,"S52.90XC ")
+744 ;;3471
+745 ;;21,"S52.91XA ")
+746 ;;3472
+747 ;;21,"S52.91XB ")
+748 ;;3473
+749 ;;21,"S52.91XC ")
+750 ;;3474
+751 ;;21,"S52.92XA ")
+752 ;;3475
+753 ;;21,"S52.92XB ")
+754 ;;3476
+755 ;;21,"S52.92XC ")
+756 ;;3477
+757 ;;21,"S53.001A ")
+758 ;;3478
+759 ;;21,"S53.002A ")
+760 ;;3479
+761 ;;21,"S53.003A ")
+762 ;;3480
+763 ;;21,"S53.004A ")
+764 ;;3481
+765 ;;21,"S53.005A ")
+766 ;;3482
+767 ;;21,"S53.006A ")
+768 ;;3483
