BGP03G7 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON MAY 23, 2010;
;;10.0;IHS CLINICAL REPORTING;;JUN 18, 2010
;
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,"847,50.26 ",.02)
;;50.26
;;9002226.02101,"847,50.29 ",.01)
;;50.29
;;9002226.02101,"847,50.29 ",.02)
;;50.29
;;9002226.02101,"847,50.3 ",.01)
;;50.3
;;9002226.02101,"847,50.3 ",.02)
;;50.3
;;9002226.02101,"847,50.4 ",.01)
;;50.4
;;9002226.02101,"847,50.4 ",.02)
;;50.4
;;9002226.02101,"847,50.51 ",.01)
;;50.51
;;9002226.02101,"847,50.51 ",.02)
;;50.51
;;9002226.02101,"847,50.59 ",.01)
;;50.59
;;9002226.02101,"847,50.59 ",.02)
;;50.59
;;9002226.02101,"847,50.61 ",.01)
;;50.61
;;9002226.02101,"847,50.61 ",.02)
;;50.61
;;9002226.02101,"847,50.69 ",.01)
;;50.69
;;9002226.02101,"847,50.69 ",.02)
;;50.69
;;9002226.02101,"847,51.02 ",.01)
;;51.02
;;9002226.02101,"847,51.02 ",.02)
;;51.02
;;9002226.02101,"847,51.03 ",.01)
;;51.03
;;9002226.02101,"847,51.03 ",.02)
;;51.03
;;9002226.02101,"847,51.04 ",.01)
;;51.04
;;9002226.02101,"847,51.04 ",.02)
;;51.04
;;9002226.02101,"847,51.21 ",.01)
;;51.21
;;9002226.02101,"847,51.21 ",.02)
;;51.21
;;9002226.02101,"847,51.22 ",.01)
;;51.22
;;9002226.02101,"847,51.22 ",.02)
;;51.22
;;9002226.02101,"847,51.31 ",.01)
;;51.31
;;9002226.02101,"847,51.31 ",.02)
;;51.31
;;9002226.02101,"847,51.32 ",.01)
;;51.32
;;9002226.02101,"847,51.32 ",.02)
;;51.32
;;9002226.02101,"847,51.33 ",.01)
;;51.33
;;9002226.02101,"847,51.33 ",.02)
;;51.33
;;9002226.02101,"847,51.34 ",.01)
;;51.34
;;9002226.02101,"847,51.34 ",.02)
;;51.34
;;9002226.02101,"847,51.35 ",.01)
;;51.35
;;9002226.02101,"847,51.35 ",.02)
;;51.35
;;9002226.02101,"847,51.36 ",.01)
;;51.36
;;9002226.02101,"847,51.36 ",.02)
;;51.36
;;9002226.02101,"847,51.37 ",.01)
;;51.37
;;9002226.02101,"847,51.37 ",.02)
;;51.37
;;9002226.02101,"847,51.39 ",.01)
;;51.39
;;9002226.02101,"847,51.39 ",.02)
;;51.39
;;9002226.02101,"847,51.41 ",.01)
;;51.41
;;9002226.02101,"847,51.41 ",.02)
;;51.41
;;9002226.02101,"847,51.42 ",.01)
;;51.42
;;9002226.02101,"847,51.42 ",.02)
;;51.42
;;9002226.02101,"847,51.43 ",.01)
;;51.43
;;9002226.02101,"847,51.43 ",.02)
;;51.43
;;9002226.02101,"847,51.49 ",.01)
;;51.49
;;9002226.02101,"847,51.49 ",.02)
;;51.49
;;9002226.02101,"847,51.51 ",.01)
;;51.51
;;9002226.02101,"847,51.51 ",.02)
;;51.51
;;9002226.02101,"847,51.59 ",.01)
;;51.59
;;9002226.02101,"847,51.59 ",.02)
;;51.59
;;9002226.02101,"847,51.61 ",.01)
;;51.61
;;9002226.02101,"847,51.61 ",.02)
;;51.61
;;9002226.02101,"847,51.62 ",.01)
;;51.62
;;9002226.02101,"847,51.62 ",.02)
;;51.62
;;9002226.02101,"847,51.63 ",.01)
;;51.63
;;9002226.02101,"847,51.63 ",.02)
;;51.63
;;9002226.02101,"847,51.69 ",.01)
;;51.69
;;9002226.02101,"847,51.69 ",.02)
;;51.69
;;9002226.02101,"847,51.71 ",.01)
;;51.71
;;9002226.02101,"847,51.71 ",.02)
;;51.71
;;9002226.02101,"847,51.72 ",.01)
;;51.72
;;9002226.02101,"847,51.72 ",.02)
;;51.72
;;9002226.02101,"847,51.79 ",.01)
;;51.79
;;9002226.02101,"847,51.79 ",.02)
;;51.79
;;9002226.02101,"847,51.81 ",.01)
;;51.81
;;9002226.02101,"847,51.81 ",.02)
;;51.81
;;9002226.02101,"847,51.82 ",.01)
;;51.82
;;9002226.02101,"847,51.82 ",.02)
;;51.82
;;9002226.02101,"847,51.83 ",.01)
;;51.83
;;9002226.02101,"847,51.83 ",.02)
;;51.83
;;9002226.02101,"847,51.89 ",.01)
;;51.89
;;9002226.02101,"847,51.89 ",.02)
;;51.89
;;9002226.02101,"847,51.91 ",.01)
;;51.91
;;9002226.02101,"847,51.91 ",.02)
;;51.91
;;9002226.02101,"847,51.92 ",.01)
;;51.92
;;9002226.02101,"847,51.92 ",.02)
;;51.92
;;9002226.02101,"847,51.93 ",.01)
;;51.93
;;9002226.02101,"847,51.93 ",.02)
;;51.93
;;9002226.02101,"847,51.94 ",.01)
;;51.94
;;9002226.02101,"847,51.94 ",.02)
;;51.94
;;9002226.02101,"847,51.95 ",.01)
;;51.95
;;9002226.02101,"847,51.95 ",.02)
;;51.95
;;9002226.02101,"847,51.99 ",.01)
;;51.99
;;9002226.02101,"847,51.99 ",.02)
;;51.99
;;9002226.02101,"847,52.09 ",.01)
;;52.09
;;9002226.02101,"847,52.09 ",.02)
;;52.09
;;9002226.02101,"847,52.22 ",.01)
;;52.22
;;9002226.02101,"847,52.22 ",.02)
;;52.22
;;9002226.02101,"847,52.3 ",.01)
;;52.3
;;9002226.02101,"847,52.3 ",.02)
;;52.3
;;9002226.02101,"847,52.4 ",.01)
;;52.4
;;9002226.02101,"847,52.4 ",.02)
;;52.4
;;9002226.02101,"847,52.51 ",.01)
;;52.51
;;9002226.02101,"847,52.51 ",.02)
;;52.51
;;9002226.02101,"847,52.52 ",.01)
;;52.52
;;9002226.02101,"847,52.52 ",.02)
;;52.52
;;9002226.02101,"847,52.53 ",.01)
;;52.53
;;9002226.02101,"847,52.53 ",.02)
;;52.53
;;9002226.02101,"847,52.59 ",.01)
;;52.59
;;9002226.02101,"847,52.59 ",.02)
;;52.59
;;9002226.02101,"847,52.6 ",.01)
;;52.6
;;9002226.02101,"847,52.6 ",.02)
;;52.6
;;9002226.02101,"847,52.7 ",.01)
;;52.7
;;9002226.02101,"847,52.7 ",.02)
;;52.7
;;9002226.02101,"847,52.80 ",.01)
;;52.80
;;9002226.02101,"847,52.80 ",.02)
;;52.80
;;9002226.02101,"847,52.81 ",.01)
;;52.81
;;9002226.02101,"847,52.81 ",.02)
;;52.81
;;9002226.02101,"847,52.82 ",.01)
;;52.82
;;9002226.02101,"847,52.82 ",.02)
;;52.82
;;9002226.02101,"847,52.83 ",.01)
;;52.83
;;9002226.02101,"847,52.83 ",.02)
;;52.83
;;9002226.02101,"847,52.92 ",.01)
;;52.92
;;9002226.02101,"847,52.92 ",.02)
;;52.92
;;9002226.02101,"847,52.95 ",.01)
;;52.95
;;9002226.02101,"847,52.95 ",.02)
;;52.95
;;9002226.02101,"847,52.96 ",.01)
;;52.96
;;9002226.02101,"847,52.96 ",.02)
;;52.96
;;9002226.02101,"847,52.99 ",.01)
;;52.99
;;9002226.02101,"847,52.99 ",.02)
;;52.99
;;9002226.02101,"847,53.51 ",.01)
;;53.51
;;9002226.02101,"847,53.51 ",.02)
;;53.51
;;9002226.02101,"847,53.59 ",.01)
;;53.59
;;9002226.02101,"847,53.59 ",.02)
;;53.59
;;9002226.02101,"847,53.61 ",.01)
;;53.61
;;9002226.02101,"847,53.61 ",.02)
;;53.61
;;9002226.02101,"847,53.69 ",.01)
;;53.69
;;9002226.02101,"847,53.69 ",.02)
;;53.69
;;9002226.02101,"847,53.7 ",.01)
;;53.7
;;9002226.02101,"847,53.7 ",.02)
;;53.7
;;9002226.02101,"847,53.80 ",.01)
;;53.80
;;9002226.02101,"847,53.80 ",.02)
;;53.80
;;9002226.02101,"847,53.81 ",.01)
;;53.81
;;9002226.02101,"847,53.81 ",.02)
;;53.81
;;9002226.02101,"847,53.82 ",.01)
;;53.82
;;9002226.02101,"847,53.82 ",.02)
;;53.82
;;9002226.02101,"847,53.9 ",.01)
;;53.9
;;9002226.02101,"847,53.9 ",.02)
;;53.9
;;9002226.02101,"847,54.11 ",.01)
;;54.11
;;9002226.02101,"847,54.11 ",.02)
;;54.11
;;9002226.02101,"847,54.12 ",.01)
;;54.12
;;9002226.02101,"847,54.12 ",.02)
;;54.12
;;9002226.02101,"847,54.19 ",.01)
;;54.19
;;9002226.02101,"847,54.19 ",.02)
;;54.19
;;9002226.02101,"847,54.4 ",.01)
;;54.4
;;9002226.02101,"847,54.4 ",.02)
;;54.4
;;9002226.02101,"847,54.59 ",.01)
;;54.59
;;9002226.02101,"847,54.59 ",.02)
;;54.59
;;9002226.02101,"847,54.61 ",.01)
;;54.61
;;9002226.02101,"847,54.61 ",.02)
;;54.61
;;9002226.02101,"847,54.62 ",.01)
;;54.62
;;9002226.02101,"847,54.62 ",.02)
;;54.62
;;9002226.02101,"847,54.63 ",.01)
;;54.63
;;9002226.02101,"847,54.63 ",.02)
;;54.63
;;9002226.02101,"847,54.64 ",.01)
;;54.64
;;9002226.02101,"847,54.64 ",.02)
;;54.64
;;9002226.02101,"847,54.71 ",.01)
;;54.71
;;9002226.02101,"847,54.71 ",.02)
;;54.71
;;9002226.02101,"847,54.72 ",.01)
;;54.72
;;9002226.02101,"847,54.72 ",.02)
;;54.72
;;9002226.02101,"847,54.73 ",.01)
;;54.73
;;9002226.02101,"847,54.73 ",.02)
;;54.73
;;9002226.02101,"847,54.74 ",.01)
;;54.74
;;9002226.02101,"847,54.74 ",.02)
;;54.74
;;9002226.02101,"847,54.75 ",.01)
;;54.75
;;9002226.02101,"847,54.75 ",.02)
;;54.75
;;9002226.02101,"847,54.92 ",.01)
;;54.92
;;9002226.02101,"847,54.92 ",.02)
;;54.92
;;9002226.02101,"847,54.94 ",.01)
;;54.94
;;9002226.02101,"847,54.94 ",.02)
;;54.94
;;9002226.02101,"847,54.95 ",.01)
;;54.95
;;9002226.02101,"847,54.95 ",.02)
;;54.95
;;9002226.02101,"847,55.01 ",.01)
;;55.01
;;9002226.02101,"847,55.01 ",.02)
;;55.01
;;9002226.02101,"847,55.02 ",.01)
;;55.02
;;9002226.02101,"847,55.02 ",.02)
;;55.02
;;9002226.02101,"847,55.11 ",.01)
;;55.11
;;9002226.02101,"847,55.11 ",.02)
;;55.11
;;9002226.02101,"847,55.12 ",.01)
;;55.12
;;9002226.02101,"847,55.12 ",.02)
;;55.12
;;9002226.02101,"847,55.32 ",.01)
;;55.32
;;9002226.02101,"847,55.32 ",.02)
;;55.32
;;9002226.02101,"847,55.34 ",.01)
;;55.34
;;9002226.02101,"847,55.34 ",.02)
;;55.34
;;9002226.02101,"847,55.35 ",.01)
;;55.35
;;9002226.02101,"847,55.35 ",.02)
;;55.35
;;9002226.02101,"847,55.4 ",.01)
;;55.4
;;9002226.02101,"847,55.4 ",.02)
;;55.4
;;9002226.02101,"847,55.51 ",.01)
;;55.51
;;9002226.02101,"847,55.51 ",.02)
;;55.51
;;9002226.02101,"847,55.52 ",.01)
;;55.52
;;9002226.02101,"847,55.52 ",.02)
;;55.52
;;9002226.02101,"847,55.53 ",.01)
;;55.53
;;9002226.02101,"847,55.53 ",.02)
;;55.53
;;9002226.02101,"847,55.54 ",.01)
;;55.54
;;9002226.02101,"847,55.54 ",.02)
;;55.54
;;9002226.02101,"847,55.61 ",.01)
;;55.61
;;9002226.02101,"847,55.61 ",.02)
;;55.61
;;9002226.02101,"847,55.69 ",.01)
;;55.69
;;9002226.02101,"847,55.69 ",.02)
;;55.69
;;9002226.02101,"847,55.7 ",.01)
;;55.7
;;9002226.02101,"847,55.7 ",.02)
;;55.7
;;9002226.02101,"847,55.81 ",.01)
;;55.81
;;9002226.02101,"847,55.81 ",.02)
;;55.81
;;9002226.02101,"847,55.82 ",.01)
;;55.82
;;9002226.02101,"847,55.82 ",.02)
;;55.82
;;9002226.02101,"847,55.83 ",.01)
;;55.83
;;9002226.02101,"847,55.83 ",.02)
;;55.83
;;9002226.02101,"847,55.84 ",.01)
;;55.84
;;9002226.02101,"847,55.84 ",.02)
;;55.84
;;9002226.02101,"847,55.85 ",.01)
;;55.85
;;9002226.02101,"847,55.85 ",.02)
;;55.85
;;9002226.02101,"847,55.86 ",.01)
;;55.86
;;9002226.02101,"847,55.86 ",.02)
;;55.86
;;9002226.02101,"847,55.87 ",.01)
;;55.87
;;9002226.02101,"847,55.87 ",.02)
;;55.87
;;9002226.02101,"847,55.91 ",.01)
;;55.91
;;9002226.02101,"847,55.91 ",.02)
;;55.91
;;9002226.02101,"847,55.97 ",.01)
;;55.97
;;9002226.02101,"847,55.97 ",.02)
;;55.97
;;9002226.02101,"847,55.98 ",.01)
;;55.98
;;9002226.02101,"847,55.98 ",.02)
;;55.98
;;9002226.02101,"847,55.99 ",.01)
;;55.99
;;9002226.02101,"847,55.99 ",.02)
;;55.99
;;9002226.02101,"847,56.40 ",.01)
;;56.40
;;9002226.02101,"847,56.40 ",.02)
;;56.40
;;9002226.02101,"847,56.41 ",.01)
;;56.41
;;9002226.02101,"847,56.41 ",.02)
;;56.41
;;9002226.02101,"847,56.42 ",.01)
;;56.42
;;9002226.02101,"847,56.42 ",.02)
;;56.42
;;9002226.02101,"847,56.51 ",.01)
;;56.51
;;9002226.02101,"847,56.51 ",.02)
;;56.51
;;9002226.02101,"847,56.52 ",.01)
;;56.52
;;9002226.02101,"847,56.52 ",.02)
;;56.52
;;9002226.02101,"847,56.61 ",.01)
;;56.61
;;9002226.02101,"847,56.61 ",.02)
;;56.61
;;9002226.02101,"847,56.62 ",.01)
;;56.62
;;9002226.02101,"847,56.62 ",.02)
;;56.62
;;9002226.02101,"847,56.71 ",.01)
;;56.71
;;9002226.02101,"847,56.71 ",.02)
;;56.71
;;9002226.02101,"847,56.72 ",.01)
;;56.72
;;9002226.02101,"847,56.72 ",.02)
;;56.72
;;9002226.02101,"847,56.73 ",.01)
;;56.73
;;9002226.02101,"847,56.73 ",.02)
;;56.73
;;9002226.02101,"847,56.74 ",.01)
;;56.74
;;9002226.02101,"847,56.74 ",.02)
;;56.74
;;9002226.02101,"847,56.75 ",.01)
;;56.75
;;9002226.02101,"847,56.75 ",.02)
;;56.75
;;9002226.02101,"847,56.79 ",.01)
;;56.79
;;9002226.02101,"847,56.79 ",.02)
;;56.79
;;9002226.02101,"847,56.81 ",.01)
;;56.81
;;9002226.02101,"847,56.81 ",.02)
;;56.81
;;9002226.02101,"847,56.82 ",.01)
;;56.82
;;9002226.02101,"847,56.82 ",.02)
;;56.82
;;9002226.02101,"847,56.83 ",.01)
;;56.83
;;9002226.02101,"847,56.83 ",.02)
;;56.83
;;9002226.02101,"847,56.84 ",.01)
;;56.84
;;9002226.02101,"847,56.84 ",.02)
;;56.84
;;9002226.02101,"847,56.85 ",.01)
;;56.85
;;9002226.02101,"847,56.85 ",.02)
;;56.85
;;9002226.02101,"847,56.86 ",.01)
;;56.86
;;9002226.02101,"847,56.86 ",.02)
;;56.86
;;9002226.02101,"847,56.89 ",.01)
;;56.89
;;9002226.02101,"847,56.89 ",.02)
;;56.89
;;9002226.02101,"847,56.95 ",.01)
;;56.95
;;9002226.02101,"847,56.95 ",.02)
;;56.95
;;9002226.02101,"847,56.99 ",.01)
;;56.99
;;9002226.02101,"847,56.99 ",.02)
;;56.99
;;9002226.02101,"847,57.12 ",.01)
;;57.12
;;9002226.02101,"847,57.12 ",.02)
;;57.12
;;9002226.02101,"847,57.18 ",.01)
;;57.18
;;9002226.02101,"847,57.18 ",.02)
;;57.18
;;9002226.02101,"847,57.19 ",.01)
;;57.19
;;9002226.02101,"847,57.19 ",.02)
;;57.19
;;9002226.02101,"847,57.21 ",.01)
;;57.21
;;9002226.02101,"847,57.21 ",.02)
;;57.21
;;9002226.02101,"847,57.22 ",.01)
;;57.22
;;9002226.02101,"847,57.22 ",.02)
;;57.22
;;9002226.02101,"847,57.6 ",.01)
;;57.6
;;9002226.02101,"847,57.6 ",.02)
;;57.6
;;9002226.02101,"847,57.71 ",.01)
;;57.71
;;9002226.02101,"847,57.71 ",.02)
;;57.71
;;9002226.02101,"847,57.79 ",.01)
;;57.79
;;9002226.02101,"847,57.79 ",.02)
;;57.79
;;9002226.02101,"847,57.81 ",.01)
;;57.81
;;9002226.02101,"847,57.81 ",.02)
;;57.81
BGP03G7 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON MAY 23, 2010;
+1 ;;10.0;IHS CLINICAL REPORTING;;JUN 18, 2010
+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,"847,50.26 ",.02)
+2 ;;50.26
+3 ;;9002226.02101,"847,50.29 ",.01)
+4 ;;50.29
+5 ;;9002226.02101,"847,50.29 ",.02)
+6 ;;50.29
+7 ;;9002226.02101,"847,50.3 ",.01)
+8 ;;50.3
+9 ;;9002226.02101,"847,50.3 ",.02)
+10 ;;50.3
+11 ;;9002226.02101,"847,50.4 ",.01)
+12 ;;50.4
+13 ;;9002226.02101,"847,50.4 ",.02)
+14 ;;50.4
+15 ;;9002226.02101,"847,50.51 ",.01)
+16 ;;50.51
+17 ;;9002226.02101,"847,50.51 ",.02)
+18 ;;50.51
+19 ;;9002226.02101,"847,50.59 ",.01)
+20 ;;50.59
+21 ;;9002226.02101,"847,50.59 ",.02)
+22 ;;50.59
+23 ;;9002226.02101,"847,50.61 ",.01)
+24 ;;50.61
+25 ;;9002226.02101,"847,50.61 ",.02)
+26 ;;50.61
+27 ;;9002226.02101,"847,50.69 ",.01)
+28 ;;50.69
+29 ;;9002226.02101,"847,50.69 ",.02)
+30 ;;50.69
+31 ;;9002226.02101,"847,51.02 ",.01)
+32 ;;51.02
+33 ;;9002226.02101,"847,51.02 ",.02)
+34 ;;51.02
+35 ;;9002226.02101,"847,51.03 ",.01)
+36 ;;51.03
+37 ;;9002226.02101,"847,51.03 ",.02)
+38 ;;51.03
+39 ;;9002226.02101,"847,51.04 ",.01)
+40 ;;51.04
+41 ;;9002226.02101,"847,51.04 ",.02)
+42 ;;51.04
+43 ;;9002226.02101,"847,51.21 ",.01)
+44 ;;51.21
+45 ;;9002226.02101,"847,51.21 ",.02)
+46 ;;51.21
+47 ;;9002226.02101,"847,51.22 ",.01)
+48 ;;51.22
+49 ;;9002226.02101,"847,51.22 ",.02)
+50 ;;51.22
+51 ;;9002226.02101,"847,51.31 ",.01)
+52 ;;51.31
+53 ;;9002226.02101,"847,51.31 ",.02)
+54 ;;51.31
+55 ;;9002226.02101,"847,51.32 ",.01)
+56 ;;51.32
+57 ;;9002226.02101,"847,51.32 ",.02)
+58 ;;51.32
+59 ;;9002226.02101,"847,51.33 ",.01)
+60 ;;51.33
+61 ;;9002226.02101,"847,51.33 ",.02)
+62 ;;51.33
+63 ;;9002226.02101,"847,51.34 ",.01)
+64 ;;51.34
+65 ;;9002226.02101,"847,51.34 ",.02)
+66 ;;51.34
+67 ;;9002226.02101,"847,51.35 ",.01)
+68 ;;51.35
+69 ;;9002226.02101,"847,51.35 ",.02)
+70 ;;51.35
+71 ;;9002226.02101,"847,51.36 ",.01)
+72 ;;51.36
+73 ;;9002226.02101,"847,51.36 ",.02)
+74 ;;51.36
+75 ;;9002226.02101,"847,51.37 ",.01)
+76 ;;51.37
+77 ;;9002226.02101,"847,51.37 ",.02)
+78 ;;51.37
+79 ;;9002226.02101,"847,51.39 ",.01)
+80 ;;51.39
+81 ;;9002226.02101,"847,51.39 ",.02)
+82 ;;51.39
+83 ;;9002226.02101,"847,51.41 ",.01)
+84 ;;51.41
+85 ;;9002226.02101,"847,51.41 ",.02)
+86 ;;51.41
+87 ;;9002226.02101,"847,51.42 ",.01)
+88 ;;51.42
+89 ;;9002226.02101,"847,51.42 ",.02)
+90 ;;51.42
+91 ;;9002226.02101,"847,51.43 ",.01)
+92 ;;51.43
+93 ;;9002226.02101,"847,51.43 ",.02)
+94 ;;51.43
+95 ;;9002226.02101,"847,51.49 ",.01)
+96 ;;51.49
+97 ;;9002226.02101,"847,51.49 ",.02)
+98 ;;51.49
+99 ;;9002226.02101,"847,51.51 ",.01)
+100 ;;51.51
+101 ;;9002226.02101,"847,51.51 ",.02)
+102 ;;51.51
+103 ;;9002226.02101,"847,51.59 ",.01)
+104 ;;51.59
+105 ;;9002226.02101,"847,51.59 ",.02)
+106 ;;51.59
+107 ;;9002226.02101,"847,51.61 ",.01)
+108 ;;51.61
+109 ;;9002226.02101,"847,51.61 ",.02)
+110 ;;51.61
+111 ;;9002226.02101,"847,51.62 ",.01)
+112 ;;51.62
+113 ;;9002226.02101,"847,51.62 ",.02)
+114 ;;51.62
+115 ;;9002226.02101,"847,51.63 ",.01)
+116 ;;51.63
+117 ;;9002226.02101,"847,51.63 ",.02)
+118 ;;51.63
+119 ;;9002226.02101,"847,51.69 ",.01)
+120 ;;51.69
+121 ;;9002226.02101,"847,51.69 ",.02)
+122 ;;51.69
+123 ;;9002226.02101,"847,51.71 ",.01)
+124 ;;51.71
+125 ;;9002226.02101,"847,51.71 ",.02)
+126 ;;51.71
+127 ;;9002226.02101,"847,51.72 ",.01)
+128 ;;51.72
+129 ;;9002226.02101,"847,51.72 ",.02)
+130 ;;51.72
+131 ;;9002226.02101,"847,51.79 ",.01)
+132 ;;51.79
+133 ;;9002226.02101,"847,51.79 ",.02)
+134 ;;51.79
+135 ;;9002226.02101,"847,51.81 ",.01)
+136 ;;51.81
+137 ;;9002226.02101,"847,51.81 ",.02)
+138 ;;51.81
+139 ;;9002226.02101,"847,51.82 ",.01)
+140 ;;51.82
+141 ;;9002226.02101,"847,51.82 ",.02)
+142 ;;51.82
+143 ;;9002226.02101,"847,51.83 ",.01)
+144 ;;51.83
+145 ;;9002226.02101,"847,51.83 ",.02)
+146 ;;51.83
+147 ;;9002226.02101,"847,51.89 ",.01)
+148 ;;51.89
+149 ;;9002226.02101,"847,51.89 ",.02)
+150 ;;51.89
+151 ;;9002226.02101,"847,51.91 ",.01)
+152 ;;51.91
+153 ;;9002226.02101,"847,51.91 ",.02)
+154 ;;51.91
+155 ;;9002226.02101,"847,51.92 ",.01)
+156 ;;51.92
+157 ;;9002226.02101,"847,51.92 ",.02)
+158 ;;51.92
+159 ;;9002226.02101,"847,51.93 ",.01)
+160 ;;51.93
+161 ;;9002226.02101,"847,51.93 ",.02)
+162 ;;51.93
+163 ;;9002226.02101,"847,51.94 ",.01)
+164 ;;51.94
+165 ;;9002226.02101,"847,51.94 ",.02)
+166 ;;51.94
+167 ;;9002226.02101,"847,51.95 ",.01)
+168 ;;51.95
+169 ;;9002226.02101,"847,51.95 ",.02)
+170 ;;51.95
+171 ;;9002226.02101,"847,51.99 ",.01)
+172 ;;51.99
+173 ;;9002226.02101,"847,51.99 ",.02)
+174 ;;51.99
+175 ;;9002226.02101,"847,52.09 ",.01)
+176 ;;52.09
+177 ;;9002226.02101,"847,52.09 ",.02)
+178 ;;52.09
+179 ;;9002226.02101,"847,52.22 ",.01)
+180 ;;52.22
+181 ;;9002226.02101,"847,52.22 ",.02)
+182 ;;52.22
+183 ;;9002226.02101,"847,52.3 ",.01)
+184 ;;52.3
+185 ;;9002226.02101,"847,52.3 ",.02)
+186 ;;52.3
+187 ;;9002226.02101,"847,52.4 ",.01)
+188 ;;52.4
+189 ;;9002226.02101,"847,52.4 ",.02)
+190 ;;52.4
+191 ;;9002226.02101,"847,52.51 ",.01)
+192 ;;52.51
+193 ;;9002226.02101,"847,52.51 ",.02)
+194 ;;52.51
+195 ;;9002226.02101,"847,52.52 ",.01)
+196 ;;52.52
+197 ;;9002226.02101,"847,52.52 ",.02)
+198 ;;52.52
+199 ;;9002226.02101,"847,52.53 ",.01)
+200 ;;52.53
+201 ;;9002226.02101,"847,52.53 ",.02)
+202 ;;52.53
+203 ;;9002226.02101,"847,52.59 ",.01)
+204 ;;52.59
+205 ;;9002226.02101,"847,52.59 ",.02)
+206 ;;52.59
+207 ;;9002226.02101,"847,52.6 ",.01)
+208 ;;52.6
+209 ;;9002226.02101,"847,52.6 ",.02)
+210 ;;52.6
+211 ;;9002226.02101,"847,52.7 ",.01)
+212 ;;52.7
+213 ;;9002226.02101,"847,52.7 ",.02)
+214 ;;52.7
+215 ;;9002226.02101,"847,52.80 ",.01)
+216 ;;52.80
+217 ;;9002226.02101,"847,52.80 ",.02)
+218 ;;52.80
+219 ;;9002226.02101,"847,52.81 ",.01)
+220 ;;52.81
+221 ;;9002226.02101,"847,52.81 ",.02)
+222 ;;52.81
+223 ;;9002226.02101,"847,52.82 ",.01)
+224 ;;52.82
+225 ;;9002226.02101,"847,52.82 ",.02)
+226 ;;52.82
+227 ;;9002226.02101,"847,52.83 ",.01)
+228 ;;52.83
+229 ;;9002226.02101,"847,52.83 ",.02)
+230 ;;52.83
+231 ;;9002226.02101,"847,52.92 ",.01)
+232 ;;52.92
+233 ;;9002226.02101,"847,52.92 ",.02)
+234 ;;52.92
+235 ;;9002226.02101,"847,52.95 ",.01)
+236 ;;52.95
+237 ;;9002226.02101,"847,52.95 ",.02)
+238 ;;52.95
+239 ;;9002226.02101,"847,52.96 ",.01)
+240 ;;52.96
+241 ;;9002226.02101,"847,52.96 ",.02)
+242 ;;52.96
+243 ;;9002226.02101,"847,52.99 ",.01)
+244 ;;52.99
+245 ;;9002226.02101,"847,52.99 ",.02)
+246 ;;52.99
+247 ;;9002226.02101,"847,53.51 ",.01)
+248 ;;53.51
+249 ;;9002226.02101,"847,53.51 ",.02)
+250 ;;53.51
+251 ;;9002226.02101,"847,53.59 ",.01)
+252 ;;53.59
+253 ;;9002226.02101,"847,53.59 ",.02)
+254 ;;53.59
+255 ;;9002226.02101,"847,53.61 ",.01)
+256 ;;53.61
+257 ;;9002226.02101,"847,53.61 ",.02)
+258 ;;53.61
+259 ;;9002226.02101,"847,53.69 ",.01)
+260 ;;53.69
+261 ;;9002226.02101,"847,53.69 ",.02)
+262 ;;53.69
+263 ;;9002226.02101,"847,53.7 ",.01)
+264 ;;53.7
+265 ;;9002226.02101,"847,53.7 ",.02)
+266 ;;53.7
+267 ;;9002226.02101,"847,53.80 ",.01)
+268 ;;53.80
+269 ;;9002226.02101,"847,53.80 ",.02)
+270 ;;53.80
+271 ;;9002226.02101,"847,53.81 ",.01)
+272 ;;53.81
+273 ;;9002226.02101,"847,53.81 ",.02)
+274 ;;53.81
+275 ;;9002226.02101,"847,53.82 ",.01)
+276 ;;53.82
+277 ;;9002226.02101,"847,53.82 ",.02)
+278 ;;53.82
+279 ;;9002226.02101,"847,53.9 ",.01)
+280 ;;53.9
+281 ;;9002226.02101,"847,53.9 ",.02)
+282 ;;53.9
+283 ;;9002226.02101,"847,54.11 ",.01)
+284 ;;54.11
+285 ;;9002226.02101,"847,54.11 ",.02)
+286 ;;54.11
+287 ;;9002226.02101,"847,54.12 ",.01)
+288 ;;54.12
+289 ;;9002226.02101,"847,54.12 ",.02)
+290 ;;54.12
+291 ;;9002226.02101,"847,54.19 ",.01)
+292 ;;54.19
+293 ;;9002226.02101,"847,54.19 ",.02)
+294 ;;54.19
+295 ;;9002226.02101,"847,54.4 ",.01)
+296 ;;54.4
+297 ;;9002226.02101,"847,54.4 ",.02)
+298 ;;54.4
+299 ;;9002226.02101,"847,54.59 ",.01)
+300 ;;54.59
+301 ;;9002226.02101,"847,54.59 ",.02)
+302 ;;54.59
+303 ;;9002226.02101,"847,54.61 ",.01)
+304 ;;54.61
+305 ;;9002226.02101,"847,54.61 ",.02)
+306 ;;54.61
+307 ;;9002226.02101,"847,54.62 ",.01)
+308 ;;54.62
+309 ;;9002226.02101,"847,54.62 ",.02)
+310 ;;54.62
+311 ;;9002226.02101,"847,54.63 ",.01)
+312 ;;54.63
+313 ;;9002226.02101,"847,54.63 ",.02)
+314 ;;54.63
+315 ;;9002226.02101,"847,54.64 ",.01)
+316 ;;54.64
+317 ;;9002226.02101,"847,54.64 ",.02)
+318 ;;54.64
+319 ;;9002226.02101,"847,54.71 ",.01)
+320 ;;54.71
+321 ;;9002226.02101,"847,54.71 ",.02)
+322 ;;54.71
+323 ;;9002226.02101,"847,54.72 ",.01)
+324 ;;54.72
+325 ;;9002226.02101,"847,54.72 ",.02)
+326 ;;54.72
+327 ;;9002226.02101,"847,54.73 ",.01)
+328 ;;54.73
+329 ;;9002226.02101,"847,54.73 ",.02)
+330 ;;54.73
+331 ;;9002226.02101,"847,54.74 ",.01)
+332 ;;54.74
+333 ;;9002226.02101,"847,54.74 ",.02)
+334 ;;54.74
+335 ;;9002226.02101,"847,54.75 ",.01)
+336 ;;54.75
+337 ;;9002226.02101,"847,54.75 ",.02)
+338 ;;54.75
+339 ;;9002226.02101,"847,54.92 ",.01)
+340 ;;54.92
+341 ;;9002226.02101,"847,54.92 ",.02)
+342 ;;54.92
+343 ;;9002226.02101,"847,54.94 ",.01)
+344 ;;54.94
+345 ;;9002226.02101,"847,54.94 ",.02)
+346 ;;54.94
+347 ;;9002226.02101,"847,54.95 ",.01)
+348 ;;54.95
+349 ;;9002226.02101,"847,54.95 ",.02)
+350 ;;54.95
+351 ;;9002226.02101,"847,55.01 ",.01)
+352 ;;55.01
+353 ;;9002226.02101,"847,55.01 ",.02)
+354 ;;55.01
+355 ;;9002226.02101,"847,55.02 ",.01)
+356 ;;55.02
+357 ;;9002226.02101,"847,55.02 ",.02)
+358 ;;55.02
+359 ;;9002226.02101,"847,55.11 ",.01)
+360 ;;55.11
+361 ;;9002226.02101,"847,55.11 ",.02)
+362 ;;55.11
+363 ;;9002226.02101,"847,55.12 ",.01)
+364 ;;55.12
+365 ;;9002226.02101,"847,55.12 ",.02)
+366 ;;55.12
+367 ;;9002226.02101,"847,55.32 ",.01)
+368 ;;55.32
+369 ;;9002226.02101,"847,55.32 ",.02)
+370 ;;55.32
+371 ;;9002226.02101,"847,55.34 ",.01)
+372 ;;55.34
+373 ;;9002226.02101,"847,55.34 ",.02)
+374 ;;55.34
+375 ;;9002226.02101,"847,55.35 ",.01)
+376 ;;55.35
+377 ;;9002226.02101,"847,55.35 ",.02)
+378 ;;55.35
+379 ;;9002226.02101,"847,55.4 ",.01)
+380 ;;55.4
+381 ;;9002226.02101,"847,55.4 ",.02)
+382 ;;55.4
+383 ;;9002226.02101,"847,55.51 ",.01)
+384 ;;55.51
+385 ;;9002226.02101,"847,55.51 ",.02)
+386 ;;55.51
+387 ;;9002226.02101,"847,55.52 ",.01)
+388 ;;55.52
+389 ;;9002226.02101,"847,55.52 ",.02)
+390 ;;55.52
+391 ;;9002226.02101,"847,55.53 ",.01)
+392 ;;55.53
+393 ;;9002226.02101,"847,55.53 ",.02)
+394 ;;55.53
+395 ;;9002226.02101,"847,55.54 ",.01)
+396 ;;55.54
+397 ;;9002226.02101,"847,55.54 ",.02)
+398 ;;55.54
+399 ;;9002226.02101,"847,55.61 ",.01)
+400 ;;55.61
+401 ;;9002226.02101,"847,55.61 ",.02)
+402 ;;55.61
+403 ;;9002226.02101,"847,55.69 ",.01)
+404 ;;55.69
+405 ;;9002226.02101,"847,55.69 ",.02)
+406 ;;55.69
+407 ;;9002226.02101,"847,55.7 ",.01)
+408 ;;55.7
+409 ;;9002226.02101,"847,55.7 ",.02)
+410 ;;55.7
+411 ;;9002226.02101,"847,55.81 ",.01)
+412 ;;55.81
+413 ;;9002226.02101,"847,55.81 ",.02)
+414 ;;55.81
+415 ;;9002226.02101,"847,55.82 ",.01)
+416 ;;55.82
+417 ;;9002226.02101,"847,55.82 ",.02)
+418 ;;55.82
+419 ;;9002226.02101,"847,55.83 ",.01)
+420 ;;55.83
+421 ;;9002226.02101,"847,55.83 ",.02)
+422 ;;55.83
+423 ;;9002226.02101,"847,55.84 ",.01)
+424 ;;55.84
+425 ;;9002226.02101,"847,55.84 ",.02)
+426 ;;55.84
+427 ;;9002226.02101,"847,55.85 ",.01)
+428 ;;55.85
+429 ;;9002226.02101,"847,55.85 ",.02)
+430 ;;55.85
+431 ;;9002226.02101,"847,55.86 ",.01)
+432 ;;55.86
+433 ;;9002226.02101,"847,55.86 ",.02)
+434 ;;55.86
+435 ;;9002226.02101,"847,55.87 ",.01)
+436 ;;55.87
+437 ;;9002226.02101,"847,55.87 ",.02)
+438 ;;55.87
+439 ;;9002226.02101,"847,55.91 ",.01)
+440 ;;55.91
+441 ;;9002226.02101,"847,55.91 ",.02)
+442 ;;55.91
+443 ;;9002226.02101,"847,55.97 ",.01)
+444 ;;55.97
+445 ;;9002226.02101,"847,55.97 ",.02)
+446 ;;55.97
+447 ;;9002226.02101,"847,55.98 ",.01)
+448 ;;55.98
+449 ;;9002226.02101,"847,55.98 ",.02)
+450 ;;55.98
+451 ;;9002226.02101,"847,55.99 ",.01)
+452 ;;55.99
+453 ;;9002226.02101,"847,55.99 ",.02)
+454 ;;55.99
+455 ;;9002226.02101,"847,56.40 ",.01)
+456 ;;56.40
+457 ;;9002226.02101,"847,56.40 ",.02)
+458 ;;56.40
+459 ;;9002226.02101,"847,56.41 ",.01)
+460 ;;56.41
+461 ;;9002226.02101,"847,56.41 ",.02)
+462 ;;56.41
+463 ;;9002226.02101,"847,56.42 ",.01)
+464 ;;56.42
+465 ;;9002226.02101,"847,56.42 ",.02)
+466 ;;56.42
+467 ;;9002226.02101,"847,56.51 ",.01)
+468 ;;56.51
+469 ;;9002226.02101,"847,56.51 ",.02)
+470 ;;56.51
+471 ;;9002226.02101,"847,56.52 ",.01)
+472 ;;56.52
+473 ;;9002226.02101,"847,56.52 ",.02)
+474 ;;56.52
+475 ;;9002226.02101,"847,56.61 ",.01)
+476 ;;56.61
+477 ;;9002226.02101,"847,56.61 ",.02)
+478 ;;56.61
+479 ;;9002226.02101,"847,56.62 ",.01)
+480 ;;56.62
+481 ;;9002226.02101,"847,56.62 ",.02)
+482 ;;56.62
+483 ;;9002226.02101,"847,56.71 ",.01)
+484 ;;56.71
+485 ;;9002226.02101,"847,56.71 ",.02)
+486 ;;56.71
+487 ;;9002226.02101,"847,56.72 ",.01)
+488 ;;56.72
+489 ;;9002226.02101,"847,56.72 ",.02)
+490 ;;56.72
+491 ;;9002226.02101,"847,56.73 ",.01)
+492 ;;56.73
+493 ;;9002226.02101,"847,56.73 ",.02)
+494 ;;56.73
+495 ;;9002226.02101,"847,56.74 ",.01)
+496 ;;56.74
+497 ;;9002226.02101,"847,56.74 ",.02)
+498 ;;56.74
+499 ;;9002226.02101,"847,56.75 ",.01)
+500 ;;56.75
+501 ;;9002226.02101,"847,56.75 ",.02)
+502 ;;56.75
+503 ;;9002226.02101,"847,56.79 ",.01)
+504 ;;56.79
+505 ;;9002226.02101,"847,56.79 ",.02)
+506 ;;56.79
+507 ;;9002226.02101,"847,56.81 ",.01)
+508 ;;56.81
+509 ;;9002226.02101,"847,56.81 ",.02)
+510 ;;56.81
+511 ;;9002226.02101,"847,56.82 ",.01)
+512 ;;56.82
+513 ;;9002226.02101,"847,56.82 ",.02)
+514 ;;56.82
+515 ;;9002226.02101,"847,56.83 ",.01)
+516 ;;56.83
+517 ;;9002226.02101,"847,56.83 ",.02)
+518 ;;56.83
+519 ;;9002226.02101,"847,56.84 ",.01)
+520 ;;56.84
+521 ;;9002226.02101,"847,56.84 ",.02)
+522 ;;56.84
+523 ;;9002226.02101,"847,56.85 ",.01)
+524 ;;56.85
+525 ;;9002226.02101,"847,56.85 ",.02)
+526 ;;56.85
+527 ;;9002226.02101,"847,56.86 ",.01)
+528 ;;56.86
+529 ;;9002226.02101,"847,56.86 ",.02)
+530 ;;56.86
+531 ;;9002226.02101,"847,56.89 ",.01)
+532 ;;56.89
+533 ;;9002226.02101,"847,56.89 ",.02)
+534 ;;56.89
+535 ;;9002226.02101,"847,56.95 ",.01)
+536 ;;56.95
+537 ;;9002226.02101,"847,56.95 ",.02)
+538 ;;56.95
+539 ;;9002226.02101,"847,56.99 ",.01)
+540 ;;56.99
+541 ;;9002226.02101,"847,56.99 ",.02)
+542 ;;56.99
+543 ;;9002226.02101,"847,57.12 ",.01)
+544 ;;57.12
+545 ;;9002226.02101,"847,57.12 ",.02)
+546 ;;57.12
+547 ;;9002226.02101,"847,57.18 ",.01)
+548 ;;57.18
+549 ;;9002226.02101,"847,57.18 ",.02)
+550 ;;57.18
+551 ;;9002226.02101,"847,57.19 ",.01)
+552 ;;57.19
+553 ;;9002226.02101,"847,57.19 ",.02)
+554 ;;57.19
+555 ;;9002226.02101,"847,57.21 ",.01)
+556 ;;57.21
+557 ;;9002226.02101,"847,57.21 ",.02)
+558 ;;57.21
+559 ;;9002226.02101,"847,57.22 ",.01)
+560 ;;57.22
+561 ;;9002226.02101,"847,57.22 ",.02)
+562 ;;57.22
+563 ;;9002226.02101,"847,57.6 ",.01)
+564 ;;57.6
+565 ;;9002226.02101,"847,57.6 ",.02)
+566 ;;57.6
+567 ;;9002226.02101,"847,57.71 ",.01)
+568 ;;57.71
+569 ;;9002226.02101,"847,57.71 ",.02)
+570 ;;57.71
+571 ;;9002226.02101,"847,57.79 ",.01)
+572 ;;57.79
+573 ;;9002226.02101,"847,57.79 ",.02)
+574 ;;57.79
+575 ;;9002226.02101,"847,57.81 ",.01)
+576 ;;57.81
+577 ;;9002226.02101,"847,57.81 ",.02)
+578 ;;57.81