ATXD5P22 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON NOV 12, 2013;
;;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)
;;9002226.02101,"169,Y37.191A ",.02)
;;Y37.191A
;;9002226.02101,"169,Y37.191A ",.03)
;;30
;;9002226.02101,"169,Y37.191D ",.01)
;;Y37.191D
;;9002226.02101,"169,Y37.191D ",.02)
;;Y37.191D
;;9002226.02101,"169,Y37.191D ",.03)
;;30
;;9002226.02101,"169,Y37.191S ",.01)
;;Y37.191S
;;9002226.02101,"169,Y37.191S ",.02)
;;Y37.191S
;;9002226.02101,"169,Y37.191S ",.03)
;;30
;;9002226.02101,"169,Y37.200A ",.01)
;;Y37.200A
;;9002226.02101,"169,Y37.200A ",.02)
;;Y37.200A
;;9002226.02101,"169,Y37.200A ",.03)
;;30
;;9002226.02101,"169,Y37.200D ",.01)
;;Y37.200D
;;9002226.02101,"169,Y37.200D ",.02)
;;Y37.200D
;;9002226.02101,"169,Y37.200D ",.03)
;;30
;;9002226.02101,"169,Y37.200S ",.01)
;;Y37.200S
;;9002226.02101,"169,Y37.200S ",.02)
;;Y37.200S
;;9002226.02101,"169,Y37.200S ",.03)
;;30
;;9002226.02101,"169,Y37.201A ",.01)
;;Y37.201A
;;9002226.02101,"169,Y37.201A ",.02)
;;Y37.201A
;;9002226.02101,"169,Y37.201A ",.03)
;;30
;;9002226.02101,"169,Y37.201D ",.01)
;;Y37.201D
;;9002226.02101,"169,Y37.201D ",.02)
;;Y37.201D
;;9002226.02101,"169,Y37.201D ",.03)
;;30
;;9002226.02101,"169,Y37.201S ",.01)
;;Y37.201S
;;9002226.02101,"169,Y37.201S ",.02)
;;Y37.201S
;;9002226.02101,"169,Y37.201S ",.03)
;;30
;;9002226.02101,"169,Y37.210A ",.01)
;;Y37.210A
;;9002226.02101,"169,Y37.210A ",.02)
;;Y37.210A
;;9002226.02101,"169,Y37.210A ",.03)
;;30
;;9002226.02101,"169,Y37.210D ",.01)
;;Y37.210D
;;9002226.02101,"169,Y37.210D ",.02)
;;Y37.210D
;;9002226.02101,"169,Y37.210D ",.03)
;;30
;;9002226.02101,"169,Y37.210S ",.01)
;;Y37.210S
;;9002226.02101,"169,Y37.210S ",.02)
;;Y37.210S
;;9002226.02101,"169,Y37.210S ",.03)
;;30
;;9002226.02101,"169,Y37.211A ",.01)
;;Y37.211A
;;9002226.02101,"169,Y37.211A ",.02)
;;Y37.211A
;;9002226.02101,"169,Y37.211A ",.03)
;;30
;;9002226.02101,"169,Y37.211D ",.01)
;;Y37.211D
;;9002226.02101,"169,Y37.211D ",.02)
;;Y37.211D
;;9002226.02101,"169,Y37.211D ",.03)
;;30
;;9002226.02101,"169,Y37.211S ",.01)
;;Y37.211S
;;9002226.02101,"169,Y37.211S ",.02)
;;Y37.211S
;;9002226.02101,"169,Y37.211S ",.03)
;;30
;;9002226.02101,"169,Y37.220A ",.01)
;;Y37.220A
;;9002226.02101,"169,Y37.220A ",.02)
;;Y37.220A
;;9002226.02101,"169,Y37.220A ",.03)
;;30
;;9002226.02101,"169,Y37.220D ",.01)
;;Y37.220D
;;9002226.02101,"169,Y37.220D ",.02)
;;Y37.220D
;;9002226.02101,"169,Y37.220D ",.03)
;;30
;;9002226.02101,"169,Y37.220S ",.01)
;;Y37.220S
;;9002226.02101,"169,Y37.220S ",.02)
;;Y37.220S
;;9002226.02101,"169,Y37.220S ",.03)
;;30
;;9002226.02101,"169,Y37.221A ",.01)
;;Y37.221A
;;9002226.02101,"169,Y37.221A ",.02)
;;Y37.221A
;;9002226.02101,"169,Y37.221A ",.03)
;;30
;;9002226.02101,"169,Y37.221D ",.01)
;;Y37.221D
;;9002226.02101,"169,Y37.221D ",.02)
;;Y37.221D
;;9002226.02101,"169,Y37.221D ",.03)
;;30
;;9002226.02101,"169,Y37.221S ",.01)
;;Y37.221S
;;9002226.02101,"169,Y37.221S ",.02)
;;Y37.221S
;;9002226.02101,"169,Y37.221S ",.03)
;;30
;;9002226.02101,"169,Y37.230A ",.01)
;;Y37.230A
;;9002226.02101,"169,Y37.230A ",.02)
;;Y37.230A
;;9002226.02101,"169,Y37.230A ",.03)
;;30
;;9002226.02101,"169,Y37.230D ",.01)
;;Y37.230D
;;9002226.02101,"169,Y37.230D ",.02)
;;Y37.230D
;;9002226.02101,"169,Y37.230D ",.03)
;;30
;;9002226.02101,"169,Y37.230S ",.01)
;;Y37.230S
;;9002226.02101,"169,Y37.230S ",.02)
;;Y37.230S
;;9002226.02101,"169,Y37.230S ",.03)
;;30
;;9002226.02101,"169,Y37.231A ",.01)
;;Y37.231A
;;9002226.02101,"169,Y37.231A ",.02)
;;Y37.231A
;;9002226.02101,"169,Y37.231A ",.03)
;;30
;;9002226.02101,"169,Y37.231D ",.01)
;;Y37.231D
;;9002226.02101,"169,Y37.231D ",.02)
;;Y37.231D
;;9002226.02101,"169,Y37.231D ",.03)
;;30
;;9002226.02101,"169,Y37.231S ",.01)
;;Y37.231S
;;9002226.02101,"169,Y37.231S ",.02)
;;Y37.231S
;;9002226.02101,"169,Y37.231S ",.03)
;;30
;;9002226.02101,"169,Y37.240A ",.01)
;;Y37.240A
;;9002226.02101,"169,Y37.240A ",.02)
;;Y37.240A
;;9002226.02101,"169,Y37.240A ",.03)
;;30
;;9002226.02101,"169,Y37.240D ",.01)
;;Y37.240D
;;9002226.02101,"169,Y37.240D ",.02)
;;Y37.240D
;;9002226.02101,"169,Y37.240D ",.03)
;;30
;;9002226.02101,"169,Y37.240S ",.01)
;;Y37.240S
;;9002226.02101,"169,Y37.240S ",.02)
;;Y37.240S
;;9002226.02101,"169,Y37.240S ",.03)
;;30
;;9002226.02101,"169,Y37.241A ",.01)
;;Y37.241A
;;9002226.02101,"169,Y37.241A ",.02)
;;Y37.241A
;;9002226.02101,"169,Y37.241A ",.03)
;;30
;;9002226.02101,"169,Y37.241D ",.01)
;;Y37.241D
;;9002226.02101,"169,Y37.241D ",.02)
;;Y37.241D
;;9002226.02101,"169,Y37.241D ",.03)
;;30
;;9002226.02101,"169,Y37.241S ",.01)
;;Y37.241S
;;9002226.02101,"169,Y37.241S ",.02)
;;Y37.241S
;;9002226.02101,"169,Y37.241S ",.03)
;;30
;;9002226.02101,"169,Y37.250A ",.01)
;;Y37.250A
;;9002226.02101,"169,Y37.250A ",.02)
;;Y37.250A
;;9002226.02101,"169,Y37.250A ",.03)
;;30
;;9002226.02101,"169,Y37.250D ",.01)
;;Y37.250D
;;9002226.02101,"169,Y37.250D ",.02)
;;Y37.250D
;;9002226.02101,"169,Y37.250D ",.03)
;;30
;;9002226.02101,"169,Y37.250S ",.01)
;;Y37.250S
;;9002226.02101,"169,Y37.250S ",.02)
;;Y37.250S
;;9002226.02101,"169,Y37.250S ",.03)
;;30
;;9002226.02101,"169,Y37.251A ",.01)
;;Y37.251A
;;9002226.02101,"169,Y37.251A ",.02)
;;Y37.251A
;;9002226.02101,"169,Y37.251A ",.03)
;;30
;;9002226.02101,"169,Y37.251D ",.01)
;;Y37.251D
;;9002226.02101,"169,Y37.251D ",.02)
;;Y37.251D
;;9002226.02101,"169,Y37.251D ",.03)
;;30
;;9002226.02101,"169,Y37.251S ",.01)
;;Y37.251S
;;9002226.02101,"169,Y37.251S ",.02)
;;Y37.251S
;;9002226.02101,"169,Y37.251S ",.03)
;;30
;;9002226.02101,"169,Y37.260A ",.01)
;;Y37.260A
;;9002226.02101,"169,Y37.260A ",.02)
;;Y37.260A
;;9002226.02101,"169,Y37.260A ",.03)
;;30
;;9002226.02101,"169,Y37.260D ",.01)
;;Y37.260D
;;9002226.02101,"169,Y37.260D ",.02)
;;Y37.260D
;;9002226.02101,"169,Y37.260D ",.03)
;;30
;;9002226.02101,"169,Y37.260S ",.01)
;;Y37.260S
;;9002226.02101,"169,Y37.260S ",.02)
;;Y37.260S
;;9002226.02101,"169,Y37.260S ",.03)
;;30
;;9002226.02101,"169,Y37.261A ",.01)
;;Y37.261A
;;9002226.02101,"169,Y37.261A ",.02)
;;Y37.261A
;;9002226.02101,"169,Y37.261A ",.03)
;;30
;;9002226.02101,"169,Y37.261D ",.01)
;;Y37.261D
;;9002226.02101,"169,Y37.261D ",.02)
;;Y37.261D
;;9002226.02101,"169,Y37.261D ",.03)
;;30
;;9002226.02101,"169,Y37.261S ",.01)
;;Y37.261S
;;9002226.02101,"169,Y37.261S ",.02)
;;Y37.261S
;;9002226.02101,"169,Y37.261S ",.03)
;;30
;;9002226.02101,"169,Y37.270A ",.01)
;;Y37.270A
;;9002226.02101,"169,Y37.270A ",.02)
;;Y37.270A
;;9002226.02101,"169,Y37.270A ",.03)
;;30
;;9002226.02101,"169,Y37.270D ",.01)
;;Y37.270D
;;9002226.02101,"169,Y37.270D ",.02)
;;Y37.270D
;;9002226.02101,"169,Y37.270D ",.03)
;;30
;;9002226.02101,"169,Y37.270S ",.01)
;;Y37.270S
;;9002226.02101,"169,Y37.270S ",.02)
;;Y37.270S
;;9002226.02101,"169,Y37.270S ",.03)
;;30
;;9002226.02101,"169,Y37.271A ",.01)
;;Y37.271A
;;9002226.02101,"169,Y37.271A ",.02)
;;Y37.271A
;;9002226.02101,"169,Y37.271A ",.03)
;;30
;;9002226.02101,"169,Y37.271D ",.01)
;;Y37.271D
;;9002226.02101,"169,Y37.271D ",.02)
;;Y37.271D
;;9002226.02101,"169,Y37.271D ",.03)
;;30
;;9002226.02101,"169,Y37.271S ",.01)
;;Y37.271S
;;9002226.02101,"169,Y37.271S ",.02)
;;Y37.271S
;;9002226.02101,"169,Y37.271S ",.03)
;;30
;;9002226.02101,"169,Y37.290A ",.01)
;;Y37.290A
;;9002226.02101,"169,Y37.290A ",.02)
;;Y37.290A
;;9002226.02101,"169,Y37.290A ",.03)
;;30
;;9002226.02101,"169,Y37.290D ",.01)
;;Y37.290D
;;9002226.02101,"169,Y37.290D ",.02)
;;Y37.290D
;;9002226.02101,"169,Y37.290D ",.03)
;;30
;;9002226.02101,"169,Y37.290S ",.01)
;;Y37.290S
;;9002226.02101,"169,Y37.290S ",.02)
;;Y37.290S
;;9002226.02101,"169,Y37.290S ",.03)
;;30
;;9002226.02101,"169,Y37.291A ",.01)
;;Y37.291A
;;9002226.02101,"169,Y37.291A ",.02)
;;Y37.291A
;;9002226.02101,"169,Y37.291A ",.03)
;;30
;;9002226.02101,"169,Y37.291D ",.01)
;;Y37.291D
;;9002226.02101,"169,Y37.291D ",.02)
;;Y37.291D
;;9002226.02101,"169,Y37.291D ",.03)
;;30
;;9002226.02101,"169,Y37.291S ",.01)
;;Y37.291S
;;9002226.02101,"169,Y37.291S ",.02)
;;Y37.291S
;;9002226.02101,"169,Y37.291S ",.03)
;;30
;;9002226.02101,"169,Y37.300A ",.01)
;;Y37.300A
;;9002226.02101,"169,Y37.300A ",.02)
;;Y37.300A
;;9002226.02101,"169,Y37.300A ",.03)
;;30
;;9002226.02101,"169,Y37.300D ",.01)
;;Y37.300D
;;9002226.02101,"169,Y37.300D ",.02)
;;Y37.300D
;;9002226.02101,"169,Y37.300D ",.03)
;;30
;;9002226.02101,"169,Y37.300S ",.01)
;;Y37.300S
;;9002226.02101,"169,Y37.300S ",.02)
;;Y37.300S
;;9002226.02101,"169,Y37.300S ",.03)
;;30
;;9002226.02101,"169,Y37.301A ",.01)
;;Y37.301A
;;9002226.02101,"169,Y37.301A ",.02)
;;Y37.301A
;;9002226.02101,"169,Y37.301A ",.03)
;;30
;;9002226.02101,"169,Y37.301D ",.01)
;;Y37.301D
;;9002226.02101,"169,Y37.301D ",.02)
;;Y37.301D
;;9002226.02101,"169,Y37.301D ",.03)
;;30
;;9002226.02101,"169,Y37.301S ",.01)
;;Y37.301S
;;9002226.02101,"169,Y37.301S ",.02)
;;Y37.301S
;;9002226.02101,"169,Y37.301S ",.03)
;;30
;;9002226.02101,"169,Y37.310A ",.01)
;;Y37.310A
;;9002226.02101,"169,Y37.310A ",.02)
;;Y37.310A
;;9002226.02101,"169,Y37.310A ",.03)
;;30
;;9002226.02101,"169,Y37.310D ",.01)
;;Y37.310D
;;9002226.02101,"169,Y37.310D ",.02)
;;Y37.310D
;;9002226.02101,"169,Y37.310D ",.03)
;;30
;;9002226.02101,"169,Y37.310S ",.01)
;;Y37.310S
;;9002226.02101,"169,Y37.310S ",.02)
;;Y37.310S
;;9002226.02101,"169,Y37.310S ",.03)
;;30
;;9002226.02101,"169,Y37.311A ",.01)
;;Y37.311A
;;9002226.02101,"169,Y37.311A ",.02)
;;Y37.311A
;;9002226.02101,"169,Y37.311A ",.03)
;;30
;;9002226.02101,"169,Y37.311D ",.01)
;;Y37.311D
;;9002226.02101,"169,Y37.311D ",.02)
;;Y37.311D
;;9002226.02101,"169,Y37.311D ",.03)
;;30
;;9002226.02101,"169,Y37.311S ",.01)
;;Y37.311S
;;9002226.02101,"169,Y37.311S ",.02)
;;Y37.311S
;;9002226.02101,"169,Y37.311S ",.03)
;;30
;;9002226.02101,"169,Y37.320A ",.01)
;;Y37.320A
;;9002226.02101,"169,Y37.320A ",.02)
;;Y37.320A
;;9002226.02101,"169,Y37.320A ",.03)
;;30
;;9002226.02101,"169,Y37.320D ",.01)
;;Y37.320D
;;9002226.02101,"169,Y37.320D ",.02)
;;Y37.320D
;;9002226.02101,"169,Y37.320D ",.03)
;;30
;;9002226.02101,"169,Y37.320S ",.01)
;;Y37.320S
;;9002226.02101,"169,Y37.320S ",.02)
;;Y37.320S
;;9002226.02101,"169,Y37.320S ",.03)
;;30
;;9002226.02101,"169,Y37.321A ",.01)
;;Y37.321A
;;9002226.02101,"169,Y37.321A ",.02)
;;Y37.321A
;;9002226.02101,"169,Y37.321A ",.03)
;;30
;;9002226.02101,"169,Y37.321D ",.01)
;;Y37.321D
;;9002226.02101,"169,Y37.321D ",.02)
;;Y37.321D
;;9002226.02101,"169,Y37.321D ",.03)
;;30
;;9002226.02101,"169,Y37.321S ",.01)
;;Y37.321S
;;9002226.02101,"169,Y37.321S ",.02)
;;Y37.321S
;;9002226.02101,"169,Y37.321S ",.03)
;;30
;;9002226.02101,"169,Y37.330A ",.01)
;;Y37.330A
;;9002226.02101,"169,Y37.330A ",.02)
;;Y37.330A
;;9002226.02101,"169,Y37.330A ",.03)
;;30
;;9002226.02101,"169,Y37.330D ",.01)
;;Y37.330D
;;9002226.02101,"169,Y37.330D ",.02)
;;Y37.330D
;;9002226.02101,"169,Y37.330D ",.03)
;;30
;;9002226.02101,"169,Y37.330S ",.01)
;;Y37.330S
;;9002226.02101,"169,Y37.330S ",.02)
;;Y37.330S
;;9002226.02101,"169,Y37.330S ",.03)
;;30
;;9002226.02101,"169,Y37.331A ",.01)
;;Y37.331A
;;9002226.02101,"169,Y37.331A ",.02)
;;Y37.331A
;;9002226.02101,"169,Y37.331A ",.03)
;;30
;;9002226.02101,"169,Y37.331D ",.01)
;;Y37.331D
;;9002226.02101,"169,Y37.331D ",.02)
;;Y37.331D
;;9002226.02101,"169,Y37.331D ",.03)
;;30
;;9002226.02101,"169,Y37.331S ",.01)
;;Y37.331S
;;9002226.02101,"169,Y37.331S ",.02)
;;Y37.331S
;;9002226.02101,"169,Y37.331S ",.03)
;;30
;;9002226.02101,"169,Y37.390A ",.01)
;;Y37.390A
;;9002226.02101,"169,Y37.390A ",.02)
;;Y37.390A
;;9002226.02101,"169,Y37.390A ",.03)
;;30
;;9002226.02101,"169,Y37.390D ",.01)
;;Y37.390D
;;9002226.02101,"169,Y37.390D ",.02)
;;Y37.390D
;;9002226.02101,"169,Y37.390D ",.03)
;;30
;;9002226.02101,"169,Y37.390S ",.01)
;;Y37.390S
;;9002226.02101,"169,Y37.390S ",.02)
;;Y37.390S
;;9002226.02101,"169,Y37.390S ",.03)
;;30
;;9002226.02101,"169,Y37.391A ",.01)
;;Y37.391A
;;9002226.02101,"169,Y37.391A ",.02)
;;Y37.391A
;;9002226.02101,"169,Y37.391A ",.03)
;;30
;;9002226.02101,"169,Y37.391D ",.01)
;;Y37.391D
;;9002226.02101,"169,Y37.391D ",.02)
;;Y37.391D
;;9002226.02101,"169,Y37.391D ",.03)
;;30
;;9002226.02101,"169,Y37.391S ",.01)
;;Y37.391S
;;9002226.02101,"169,Y37.391S ",.02)
;;Y37.391S
;;9002226.02101,"169,Y37.391S ",.03)
;;30
;;9002226.02101,"169,Y37.410A ",.01)
;;Y37.410A
;;9002226.02101,"169,Y37.410A ",.02)
;;Y37.410A
;;9002226.02101,"169,Y37.410A ",.03)
;;30
;;9002226.02101,"169,Y37.410D ",.01)
;;Y37.410D
;;9002226.02101,"169,Y37.410D ",.02)
;;Y37.410D
;;9002226.02101,"169,Y37.410D ",.03)
;;30
;;9002226.02101,"169,Y37.410S ",.01)
;;Y37.410S
;;9002226.02101,"169,Y37.410S ",.02)
;;Y37.410S
;;9002226.02101,"169,Y37.410S ",.03)
;;30
ATXD5P22 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON NOV 12, 2013;
+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 ;;9002226.02101,"169,Y37.191A ",.02)
+2 ;;Y37.191A
+3 ;;9002226.02101,"169,Y37.191A ",.03)
+4 ;;30
+5 ;;9002226.02101,"169,Y37.191D ",.01)
+6 ;;Y37.191D
+7 ;;9002226.02101,"169,Y37.191D ",.02)
+8 ;;Y37.191D
+9 ;;9002226.02101,"169,Y37.191D ",.03)
+10 ;;30
+11 ;;9002226.02101,"169,Y37.191S ",.01)
+12 ;;Y37.191S
+13 ;;9002226.02101,"169,Y37.191S ",.02)
+14 ;;Y37.191S
+15 ;;9002226.02101,"169,Y37.191S ",.03)
+16 ;;30
+17 ;;9002226.02101,"169,Y37.200A ",.01)
+18 ;;Y37.200A
+19 ;;9002226.02101,"169,Y37.200A ",.02)
+20 ;;Y37.200A
+21 ;;9002226.02101,"169,Y37.200A ",.03)
+22 ;;30
+23 ;;9002226.02101,"169,Y37.200D ",.01)
+24 ;;Y37.200D
+25 ;;9002226.02101,"169,Y37.200D ",.02)
+26 ;;Y37.200D
+27 ;;9002226.02101,"169,Y37.200D ",.03)
+28 ;;30
+29 ;;9002226.02101,"169,Y37.200S ",.01)
+30 ;;Y37.200S
+31 ;;9002226.02101,"169,Y37.200S ",.02)
+32 ;;Y37.200S
+33 ;;9002226.02101,"169,Y37.200S ",.03)
+34 ;;30
+35 ;;9002226.02101,"169,Y37.201A ",.01)
+36 ;;Y37.201A
+37 ;;9002226.02101,"169,Y37.201A ",.02)
+38 ;;Y37.201A
+39 ;;9002226.02101,"169,Y37.201A ",.03)
+40 ;;30
+41 ;;9002226.02101,"169,Y37.201D ",.01)
+42 ;;Y37.201D
+43 ;;9002226.02101,"169,Y37.201D ",.02)
+44 ;;Y37.201D
+45 ;;9002226.02101,"169,Y37.201D ",.03)
+46 ;;30
+47 ;;9002226.02101,"169,Y37.201S ",.01)
+48 ;;Y37.201S
+49 ;;9002226.02101,"169,Y37.201S ",.02)
+50 ;;Y37.201S
+51 ;;9002226.02101,"169,Y37.201S ",.03)
+52 ;;30
+53 ;;9002226.02101,"169,Y37.210A ",.01)
+54 ;;Y37.210A
+55 ;;9002226.02101,"169,Y37.210A ",.02)
+56 ;;Y37.210A
+57 ;;9002226.02101,"169,Y37.210A ",.03)
+58 ;;30
+59 ;;9002226.02101,"169,Y37.210D ",.01)
+60 ;;Y37.210D
+61 ;;9002226.02101,"169,Y37.210D ",.02)
+62 ;;Y37.210D
+63 ;;9002226.02101,"169,Y37.210D ",.03)
+64 ;;30
+65 ;;9002226.02101,"169,Y37.210S ",.01)
+66 ;;Y37.210S
+67 ;;9002226.02101,"169,Y37.210S ",.02)
+68 ;;Y37.210S
+69 ;;9002226.02101,"169,Y37.210S ",.03)
+70 ;;30
+71 ;;9002226.02101,"169,Y37.211A ",.01)
+72 ;;Y37.211A
+73 ;;9002226.02101,"169,Y37.211A ",.02)
+74 ;;Y37.211A
+75 ;;9002226.02101,"169,Y37.211A ",.03)
+76 ;;30
+77 ;;9002226.02101,"169,Y37.211D ",.01)
+78 ;;Y37.211D
+79 ;;9002226.02101,"169,Y37.211D ",.02)
+80 ;;Y37.211D
+81 ;;9002226.02101,"169,Y37.211D ",.03)
+82 ;;30
+83 ;;9002226.02101,"169,Y37.211S ",.01)
+84 ;;Y37.211S
+85 ;;9002226.02101,"169,Y37.211S ",.02)
+86 ;;Y37.211S
+87 ;;9002226.02101,"169,Y37.211S ",.03)
+88 ;;30
+89 ;;9002226.02101,"169,Y37.220A ",.01)
+90 ;;Y37.220A
+91 ;;9002226.02101,"169,Y37.220A ",.02)
+92 ;;Y37.220A
+93 ;;9002226.02101,"169,Y37.220A ",.03)
+94 ;;30
+95 ;;9002226.02101,"169,Y37.220D ",.01)
+96 ;;Y37.220D
+97 ;;9002226.02101,"169,Y37.220D ",.02)
+98 ;;Y37.220D
+99 ;;9002226.02101,"169,Y37.220D ",.03)
+100 ;;30
+101 ;;9002226.02101,"169,Y37.220S ",.01)
+102 ;;Y37.220S
+103 ;;9002226.02101,"169,Y37.220S ",.02)
+104 ;;Y37.220S
+105 ;;9002226.02101,"169,Y37.220S ",.03)
+106 ;;30
+107 ;;9002226.02101,"169,Y37.221A ",.01)
+108 ;;Y37.221A
+109 ;;9002226.02101,"169,Y37.221A ",.02)
+110 ;;Y37.221A
+111 ;;9002226.02101,"169,Y37.221A ",.03)
+112 ;;30
+113 ;;9002226.02101,"169,Y37.221D ",.01)
+114 ;;Y37.221D
+115 ;;9002226.02101,"169,Y37.221D ",.02)
+116 ;;Y37.221D
+117 ;;9002226.02101,"169,Y37.221D ",.03)
+118 ;;30
+119 ;;9002226.02101,"169,Y37.221S ",.01)
+120 ;;Y37.221S
+121 ;;9002226.02101,"169,Y37.221S ",.02)
+122 ;;Y37.221S
+123 ;;9002226.02101,"169,Y37.221S ",.03)
+124 ;;30
+125 ;;9002226.02101,"169,Y37.230A ",.01)
+126 ;;Y37.230A
+127 ;;9002226.02101,"169,Y37.230A ",.02)
+128 ;;Y37.230A
+129 ;;9002226.02101,"169,Y37.230A ",.03)
+130 ;;30
+131 ;;9002226.02101,"169,Y37.230D ",.01)
+132 ;;Y37.230D
+133 ;;9002226.02101,"169,Y37.230D ",.02)
+134 ;;Y37.230D
+135 ;;9002226.02101,"169,Y37.230D ",.03)
+136 ;;30
+137 ;;9002226.02101,"169,Y37.230S ",.01)
+138 ;;Y37.230S
+139 ;;9002226.02101,"169,Y37.230S ",.02)
+140 ;;Y37.230S
+141 ;;9002226.02101,"169,Y37.230S ",.03)
+142 ;;30
+143 ;;9002226.02101,"169,Y37.231A ",.01)
+144 ;;Y37.231A
+145 ;;9002226.02101,"169,Y37.231A ",.02)
+146 ;;Y37.231A
+147 ;;9002226.02101,"169,Y37.231A ",.03)
+148 ;;30
+149 ;;9002226.02101,"169,Y37.231D ",.01)
+150 ;;Y37.231D
+151 ;;9002226.02101,"169,Y37.231D ",.02)
+152 ;;Y37.231D
+153 ;;9002226.02101,"169,Y37.231D ",.03)
+154 ;;30
+155 ;;9002226.02101,"169,Y37.231S ",.01)
+156 ;;Y37.231S
+157 ;;9002226.02101,"169,Y37.231S ",.02)
+158 ;;Y37.231S
+159 ;;9002226.02101,"169,Y37.231S ",.03)
+160 ;;30
+161 ;;9002226.02101,"169,Y37.240A ",.01)
+162 ;;Y37.240A
+163 ;;9002226.02101,"169,Y37.240A ",.02)
+164 ;;Y37.240A
+165 ;;9002226.02101,"169,Y37.240A ",.03)
+166 ;;30
+167 ;;9002226.02101,"169,Y37.240D ",.01)
+168 ;;Y37.240D
+169 ;;9002226.02101,"169,Y37.240D ",.02)
+170 ;;Y37.240D
+171 ;;9002226.02101,"169,Y37.240D ",.03)
+172 ;;30
+173 ;;9002226.02101,"169,Y37.240S ",.01)
+174 ;;Y37.240S
+175 ;;9002226.02101,"169,Y37.240S ",.02)
+176 ;;Y37.240S
+177 ;;9002226.02101,"169,Y37.240S ",.03)
+178 ;;30
+179 ;;9002226.02101,"169,Y37.241A ",.01)
+180 ;;Y37.241A
+181 ;;9002226.02101,"169,Y37.241A ",.02)
+182 ;;Y37.241A
+183 ;;9002226.02101,"169,Y37.241A ",.03)
+184 ;;30
+185 ;;9002226.02101,"169,Y37.241D ",.01)
+186 ;;Y37.241D
+187 ;;9002226.02101,"169,Y37.241D ",.02)
+188 ;;Y37.241D
+189 ;;9002226.02101,"169,Y37.241D ",.03)
+190 ;;30
+191 ;;9002226.02101,"169,Y37.241S ",.01)
+192 ;;Y37.241S
+193 ;;9002226.02101,"169,Y37.241S ",.02)
+194 ;;Y37.241S
+195 ;;9002226.02101,"169,Y37.241S ",.03)
+196 ;;30
+197 ;;9002226.02101,"169,Y37.250A ",.01)
+198 ;;Y37.250A
+199 ;;9002226.02101,"169,Y37.250A ",.02)
+200 ;;Y37.250A
+201 ;;9002226.02101,"169,Y37.250A ",.03)
+202 ;;30
+203 ;;9002226.02101,"169,Y37.250D ",.01)
+204 ;;Y37.250D
+205 ;;9002226.02101,"169,Y37.250D ",.02)
+206 ;;Y37.250D
+207 ;;9002226.02101,"169,Y37.250D ",.03)
+208 ;;30
+209 ;;9002226.02101,"169,Y37.250S ",.01)
+210 ;;Y37.250S
+211 ;;9002226.02101,"169,Y37.250S ",.02)
+212 ;;Y37.250S
+213 ;;9002226.02101,"169,Y37.250S ",.03)
+214 ;;30
+215 ;;9002226.02101,"169,Y37.251A ",.01)
+216 ;;Y37.251A
+217 ;;9002226.02101,"169,Y37.251A ",.02)
+218 ;;Y37.251A
+219 ;;9002226.02101,"169,Y37.251A ",.03)
+220 ;;30
+221 ;;9002226.02101,"169,Y37.251D ",.01)
+222 ;;Y37.251D
+223 ;;9002226.02101,"169,Y37.251D ",.02)
+224 ;;Y37.251D
+225 ;;9002226.02101,"169,Y37.251D ",.03)
+226 ;;30
+227 ;;9002226.02101,"169,Y37.251S ",.01)
+228 ;;Y37.251S
+229 ;;9002226.02101,"169,Y37.251S ",.02)
+230 ;;Y37.251S
+231 ;;9002226.02101,"169,Y37.251S ",.03)
+232 ;;30
+233 ;;9002226.02101,"169,Y37.260A ",.01)
+234 ;;Y37.260A
+235 ;;9002226.02101,"169,Y37.260A ",.02)
+236 ;;Y37.260A
+237 ;;9002226.02101,"169,Y37.260A ",.03)
+238 ;;30
+239 ;;9002226.02101,"169,Y37.260D ",.01)
+240 ;;Y37.260D
+241 ;;9002226.02101,"169,Y37.260D ",.02)
+242 ;;Y37.260D
+243 ;;9002226.02101,"169,Y37.260D ",.03)
+244 ;;30
+245 ;;9002226.02101,"169,Y37.260S ",.01)
+246 ;;Y37.260S
+247 ;;9002226.02101,"169,Y37.260S ",.02)
+248 ;;Y37.260S
+249 ;;9002226.02101,"169,Y37.260S ",.03)
+250 ;;30
+251 ;;9002226.02101,"169,Y37.261A ",.01)
+252 ;;Y37.261A
+253 ;;9002226.02101,"169,Y37.261A ",.02)
+254 ;;Y37.261A
+255 ;;9002226.02101,"169,Y37.261A ",.03)
+256 ;;30
+257 ;;9002226.02101,"169,Y37.261D ",.01)
+258 ;;Y37.261D
+259 ;;9002226.02101,"169,Y37.261D ",.02)
+260 ;;Y37.261D
+261 ;;9002226.02101,"169,Y37.261D ",.03)
+262 ;;30
+263 ;;9002226.02101,"169,Y37.261S ",.01)
+264 ;;Y37.261S
+265 ;;9002226.02101,"169,Y37.261S ",.02)
+266 ;;Y37.261S
+267 ;;9002226.02101,"169,Y37.261S ",.03)
+268 ;;30
+269 ;;9002226.02101,"169,Y37.270A ",.01)
+270 ;;Y37.270A
+271 ;;9002226.02101,"169,Y37.270A ",.02)
+272 ;;Y37.270A
+273 ;;9002226.02101,"169,Y37.270A ",.03)
+274 ;;30
+275 ;;9002226.02101,"169,Y37.270D ",.01)
+276 ;;Y37.270D
+277 ;;9002226.02101,"169,Y37.270D ",.02)
+278 ;;Y37.270D
+279 ;;9002226.02101,"169,Y37.270D ",.03)
+280 ;;30
+281 ;;9002226.02101,"169,Y37.270S ",.01)
+282 ;;Y37.270S
+283 ;;9002226.02101,"169,Y37.270S ",.02)
+284 ;;Y37.270S
+285 ;;9002226.02101,"169,Y37.270S ",.03)
+286 ;;30
+287 ;;9002226.02101,"169,Y37.271A ",.01)
+288 ;;Y37.271A
+289 ;;9002226.02101,"169,Y37.271A ",.02)
+290 ;;Y37.271A
+291 ;;9002226.02101,"169,Y37.271A ",.03)
+292 ;;30
+293 ;;9002226.02101,"169,Y37.271D ",.01)
+294 ;;Y37.271D
+295 ;;9002226.02101,"169,Y37.271D ",.02)
+296 ;;Y37.271D
+297 ;;9002226.02101,"169,Y37.271D ",.03)
+298 ;;30
+299 ;;9002226.02101,"169,Y37.271S ",.01)
+300 ;;Y37.271S
+301 ;;9002226.02101,"169,Y37.271S ",.02)
+302 ;;Y37.271S
+303 ;;9002226.02101,"169,Y37.271S ",.03)
+304 ;;30
+305 ;;9002226.02101,"169,Y37.290A ",.01)
+306 ;;Y37.290A
+307 ;;9002226.02101,"169,Y37.290A ",.02)
+308 ;;Y37.290A
+309 ;;9002226.02101,"169,Y37.290A ",.03)
+310 ;;30
+311 ;;9002226.02101,"169,Y37.290D ",.01)
+312 ;;Y37.290D
+313 ;;9002226.02101,"169,Y37.290D ",.02)
+314 ;;Y37.290D
+315 ;;9002226.02101,"169,Y37.290D ",.03)
+316 ;;30
+317 ;;9002226.02101,"169,Y37.290S ",.01)
+318 ;;Y37.290S
+319 ;;9002226.02101,"169,Y37.290S ",.02)
+320 ;;Y37.290S
+321 ;;9002226.02101,"169,Y37.290S ",.03)
+322 ;;30
+323 ;;9002226.02101,"169,Y37.291A ",.01)
+324 ;;Y37.291A
+325 ;;9002226.02101,"169,Y37.291A ",.02)
+326 ;;Y37.291A
+327 ;;9002226.02101,"169,Y37.291A ",.03)
+328 ;;30
+329 ;;9002226.02101,"169,Y37.291D ",.01)
+330 ;;Y37.291D
+331 ;;9002226.02101,"169,Y37.291D ",.02)
+332 ;;Y37.291D
+333 ;;9002226.02101,"169,Y37.291D ",.03)
+334 ;;30
+335 ;;9002226.02101,"169,Y37.291S ",.01)
+336 ;;Y37.291S
+337 ;;9002226.02101,"169,Y37.291S ",.02)
+338 ;;Y37.291S
+339 ;;9002226.02101,"169,Y37.291S ",.03)
+340 ;;30
+341 ;;9002226.02101,"169,Y37.300A ",.01)
+342 ;;Y37.300A
+343 ;;9002226.02101,"169,Y37.300A ",.02)
+344 ;;Y37.300A
+345 ;;9002226.02101,"169,Y37.300A ",.03)
+346 ;;30
+347 ;;9002226.02101,"169,Y37.300D ",.01)
+348 ;;Y37.300D
+349 ;;9002226.02101,"169,Y37.300D ",.02)
+350 ;;Y37.300D
+351 ;;9002226.02101,"169,Y37.300D ",.03)
+352 ;;30
+353 ;;9002226.02101,"169,Y37.300S ",.01)
+354 ;;Y37.300S
+355 ;;9002226.02101,"169,Y37.300S ",.02)
+356 ;;Y37.300S
+357 ;;9002226.02101,"169,Y37.300S ",.03)
+358 ;;30
+359 ;;9002226.02101,"169,Y37.301A ",.01)
+360 ;;Y37.301A
+361 ;;9002226.02101,"169,Y37.301A ",.02)
+362 ;;Y37.301A
+363 ;;9002226.02101,"169,Y37.301A ",.03)
+364 ;;30
+365 ;;9002226.02101,"169,Y37.301D ",.01)
+366 ;;Y37.301D
+367 ;;9002226.02101,"169,Y37.301D ",.02)
+368 ;;Y37.301D
+369 ;;9002226.02101,"169,Y37.301D ",.03)
+370 ;;30
+371 ;;9002226.02101,"169,Y37.301S ",.01)
+372 ;;Y37.301S
+373 ;;9002226.02101,"169,Y37.301S ",.02)
+374 ;;Y37.301S
+375 ;;9002226.02101,"169,Y37.301S ",.03)
+376 ;;30
+377 ;;9002226.02101,"169,Y37.310A ",.01)
+378 ;;Y37.310A
+379 ;;9002226.02101,"169,Y37.310A ",.02)
+380 ;;Y37.310A
+381 ;;9002226.02101,"169,Y37.310A ",.03)
+382 ;;30
+383 ;;9002226.02101,"169,Y37.310D ",.01)
+384 ;;Y37.310D
+385 ;;9002226.02101,"169,Y37.310D ",.02)
+386 ;;Y37.310D
+387 ;;9002226.02101,"169,Y37.310D ",.03)
+388 ;;30
+389 ;;9002226.02101,"169,Y37.310S ",.01)
+390 ;;Y37.310S
+391 ;;9002226.02101,"169,Y37.310S ",.02)
+392 ;;Y37.310S
+393 ;;9002226.02101,"169,Y37.310S ",.03)
+394 ;;30
+395 ;;9002226.02101,"169,Y37.311A ",.01)
+396 ;;Y37.311A
+397 ;;9002226.02101,"169,Y37.311A ",.02)
+398 ;;Y37.311A
+399 ;;9002226.02101,"169,Y37.311A ",.03)
+400 ;;30
+401 ;;9002226.02101,"169,Y37.311D ",.01)
+402 ;;Y37.311D
+403 ;;9002226.02101,"169,Y37.311D ",.02)
+404 ;;Y37.311D
+405 ;;9002226.02101,"169,Y37.311D ",.03)
+406 ;;30
+407 ;;9002226.02101,"169,Y37.311S ",.01)
+408 ;;Y37.311S
+409 ;;9002226.02101,"169,Y37.311S ",.02)
+410 ;;Y37.311S
+411 ;;9002226.02101,"169,Y37.311S ",.03)
+412 ;;30
+413 ;;9002226.02101,"169,Y37.320A ",.01)
+414 ;;Y37.320A
+415 ;;9002226.02101,"169,Y37.320A ",.02)
+416 ;;Y37.320A
+417 ;;9002226.02101,"169,Y37.320A ",.03)
+418 ;;30
+419 ;;9002226.02101,"169,Y37.320D ",.01)
+420 ;;Y37.320D
+421 ;;9002226.02101,"169,Y37.320D ",.02)
+422 ;;Y37.320D
+423 ;;9002226.02101,"169,Y37.320D ",.03)
+424 ;;30
+425 ;;9002226.02101,"169,Y37.320S ",.01)
+426 ;;Y37.320S
+427 ;;9002226.02101,"169,Y37.320S ",.02)
+428 ;;Y37.320S
+429 ;;9002226.02101,"169,Y37.320S ",.03)
+430 ;;30
+431 ;;9002226.02101,"169,Y37.321A ",.01)
+432 ;;Y37.321A
+433 ;;9002226.02101,"169,Y37.321A ",.02)
+434 ;;Y37.321A
+435 ;;9002226.02101,"169,Y37.321A ",.03)
+436 ;;30
+437 ;;9002226.02101,"169,Y37.321D ",.01)
+438 ;;Y37.321D
+439 ;;9002226.02101,"169,Y37.321D ",.02)
+440 ;;Y37.321D
+441 ;;9002226.02101,"169,Y37.321D ",.03)
+442 ;;30
+443 ;;9002226.02101,"169,Y37.321S ",.01)
+444 ;;Y37.321S
+445 ;;9002226.02101,"169,Y37.321S ",.02)
+446 ;;Y37.321S
+447 ;;9002226.02101,"169,Y37.321S ",.03)
+448 ;;30
+449 ;;9002226.02101,"169,Y37.330A ",.01)
+450 ;;Y37.330A
+451 ;;9002226.02101,"169,Y37.330A ",.02)
+452 ;;Y37.330A
+453 ;;9002226.02101,"169,Y37.330A ",.03)
+454 ;;30
+455 ;;9002226.02101,"169,Y37.330D ",.01)
+456 ;;Y37.330D
+457 ;;9002226.02101,"169,Y37.330D ",.02)
+458 ;;Y37.330D
+459 ;;9002226.02101,"169,Y37.330D ",.03)
+460 ;;30
+461 ;;9002226.02101,"169,Y37.330S ",.01)
+462 ;;Y37.330S
+463 ;;9002226.02101,"169,Y37.330S ",.02)
+464 ;;Y37.330S
+465 ;;9002226.02101,"169,Y37.330S ",.03)
+466 ;;30
+467 ;;9002226.02101,"169,Y37.331A ",.01)
+468 ;;Y37.331A
+469 ;;9002226.02101,"169,Y37.331A ",.02)
+470 ;;Y37.331A
+471 ;;9002226.02101,"169,Y37.331A ",.03)
+472 ;;30
+473 ;;9002226.02101,"169,Y37.331D ",.01)
+474 ;;Y37.331D
+475 ;;9002226.02101,"169,Y37.331D ",.02)
+476 ;;Y37.331D
+477 ;;9002226.02101,"169,Y37.331D ",.03)
+478 ;;30
+479 ;;9002226.02101,"169,Y37.331S ",.01)
+480 ;;Y37.331S
+481 ;;9002226.02101,"169,Y37.331S ",.02)
+482 ;;Y37.331S
+483 ;;9002226.02101,"169,Y37.331S ",.03)
+484 ;;30
+485 ;;9002226.02101,"169,Y37.390A ",.01)
+486 ;;Y37.390A
+487 ;;9002226.02101,"169,Y37.390A ",.02)
+488 ;;Y37.390A
+489 ;;9002226.02101,"169,Y37.390A ",.03)
+490 ;;30
+491 ;;9002226.02101,"169,Y37.390D ",.01)
+492 ;;Y37.390D
+493 ;;9002226.02101,"169,Y37.390D ",.02)
+494 ;;Y37.390D
+495 ;;9002226.02101,"169,Y37.390D ",.03)
+496 ;;30
+497 ;;9002226.02101,"169,Y37.390S ",.01)
+498 ;;Y37.390S
+499 ;;9002226.02101,"169,Y37.390S ",.02)
+500 ;;Y37.390S
+501 ;;9002226.02101,"169,Y37.390S ",.03)
+502 ;;30
+503 ;;9002226.02101,"169,Y37.391A ",.01)
+504 ;;Y37.391A
+505 ;;9002226.02101,"169,Y37.391A ",.02)
+506 ;;Y37.391A
+507 ;;9002226.02101,"169,Y37.391A ",.03)
+508 ;;30
+509 ;;9002226.02101,"169,Y37.391D ",.01)
+510 ;;Y37.391D
+511 ;;9002226.02101,"169,Y37.391D ",.02)
+512 ;;Y37.391D
+513 ;;9002226.02101,"169,Y37.391D ",.03)
+514 ;;30
+515 ;;9002226.02101,"169,Y37.391S ",.01)
+516 ;;Y37.391S
+517 ;;9002226.02101,"169,Y37.391S ",.02)
+518 ;;Y37.391S
+519 ;;9002226.02101,"169,Y37.391S ",.03)
+520 ;;30
+521 ;;9002226.02101,"169,Y37.410A ",.01)
+522 ;;Y37.410A
+523 ;;9002226.02101,"169,Y37.410A ",.02)
+524 ;;Y37.410A
+525 ;;9002226.02101,"169,Y37.410A ",.03)
+526 ;;30
+527 ;;9002226.02101,"169,Y37.410D ",.01)
+528 ;;Y37.410D
+529 ;;9002226.02101,"169,Y37.410D ",.02)
+530 ;;Y37.410D
+531 ;;9002226.02101,"169,Y37.410D ",.03)
+532 ;;30
+533 ;;9002226.02101,"169,Y37.410S ",.01)
+534 ;;Y37.410S
+535 ;;9002226.02101,"169,Y37.410S ",.02)
+536 ;;Y37.410S
+537 ;;9002226.02101,"169,Y37.410S ",.03)
+538 ;;30