Routine: VENKI00F

VENKI00F ; ; 16-MAR-2007

 ;;2.6;PCC+;;NOV 12, 2007

 Q:'DIFQR(19707.12)  F I=1:2 S X=$T(Q+I) Q:X=""  S Y=$E($T(Q+I+1),4,999),X=$E(X,4,999) S:$A(Y)=126 I=I+1,Y=$E(Y,2,999)_$E($T(Q+I+1),5,999) S:$A(Y)=61 Y=$E(Y,2,999) X NO E  S @X=Y

Q Q

 ;;^UTILITY(U,$J,19707.12,863,0)

 ;;=3^Throw Ball Overhand^wcdgm863^^^^^^^^0^85^31.0^32^^1

 ;;^UTILITY(U,$J,19707.12,864,0)

 ;;=3^Throw Ball Overhand^wcdgm864^^^^^^^^0^85^32.0^33^^1

 ;;^UTILITY(U,$J,19707.12,865,0)

 ;;=3^Throw Ball Overhand^wcdgm865^^^^^^^^0^85^33.0^34^^1

 ;;^UTILITY(U,$J,19707.12,866,0)

 ;;=3^Throw Ball Overhand^wcdgm866^^^^^^^^0^85^34.0^35^^1

 ;;^UTILITY(U,$J,19707.12,867,0)

 ;;=3^Throw Ball Overhand^wcdgm867^^^^^^^^0^90^35.0^36^^1

 ;;^UTILITY(U,$J,19707.12,868,0)

 ;;=3^Throw Ball Overhand^wcdgm868^^^^^^^^1^100^36.0^37^^1

 ;;^UTILITY(U,$J,19707.12,869,0)

 ;;=3^Throw Ball Overhand^wcdgm869^^^^^^^^1^100^37.0^38^^1

 ;;^UTILITY(U,$J,19707.12,870,0)

 ;;=3^Throw Ball Overhand^wcdgm870^^^^^^^^1^100^38.0^39^^1

 ;;^UTILITY(U,$J,19707.12,871,0)

 ;;=3^Walk Backwards^wcdgm871^^^^^^^^0^25^12.5^13^^1

 ;;^UTILITY(U,$J,19707.12,872,0)

 ;;=3^Walk Backwards^wcdgm872^^^^^^^^0^40^13.0^13.5^^1

 ;;^UTILITY(U,$J,19707.12,873,0)

 ;;=3^Walk Backwards^wcdgm873^^^^^^^^0^50^13.5^14^^1

 ;;^UTILITY(U,$J,19707.12,874,0)

 ;;=3^Walk Backwards^wcdgm874^^^^^^^^0^60^14.0^14.5^^1

 ;;^UTILITY(U,$J,19707.12,875,0)

 ;;=3^Walk Backwards^wcdgm875^^^^^^^^0^65^14.5^15^^1

 ;;^UTILITY(U,$J,19707.12,876,0)

 ;;=3^Walk Backwards^wcdgm876^^^^^^^^0^70^15.0^15.5^^1

 ;;^UTILITY(U,$J,19707.12,877,0)

 ;;=3^Walk Backwards^wcdgm877^^^^^^^^0^80^15.5^16^^1

 ;;^UTILITY(U,$J,19707.12,878,0)

 ;;=3^Walk Backwards^wcdgm878^^^^^^^^0^85^16.0^16.5^^1

 ;;^UTILITY(U,$J,19707.12,879,0)

 ;;=3^Walk Backwards^wcdgm879^^^^^^^^0^90^16.5^17^^1

 ;;^UTILITY(U,$J,19707.12,880,0)

 ;;=3^Walk Backwards^wcdgm880^^^^^^^^1^100^17.0^17.5^^1

 ;;^UTILITY(U,$J,19707.12,881,0)

 ;;=3^Walk Backwards^wcdgm881^^^^^^^^1^100^17.5^18^^1

 ;;^UTILITY(U,$J,19707.12,882,0)

 ;;=3^Walk Backwards^wcdgm882^^^^^^^^1^100^18.0^18.5^^1

 ;;^UTILITY(U,$J,19707.12,883,0)

 ;;=3^Walk Backwards^wcdgm883^^^^^^^^1^100^19.0^20^^1

 ;;^UTILITY(U,$J,19707.12,884,0)

 ;;=3^Walk Backwards^wcdgm884^^^^^^^^1^100^20.0^21^^1

 ;;^UTILITY(U,$J,19707.12,885,0)

 ;;=3^Walk Up Steps^wcdgm885^^^^^^^^1^25^14.0^14.5^^1

 ;;^UTILITY(U,$J,19707.12,886,0)

 ;;=3^Walk Up Steps^wcdgm886^^^^^^^^1^30^14.5^15^^1

 ;;^UTILITY(U,$J,19707.12,887,0)

 ;;=3^Walk Up Steps^wcdgm887^^^^^^^^0^35^15.0^15.5^^1

 ;;^UTILITY(U,$J,19707.12,888,0)

 ;;=3^Walk Up Steps^wcdgm888^^^^^^^^0^40^15.5^16^^1

 ;;^UTILITY(U,$J,19707.12,889,0)

 ;;=3^Walk Up Steps^wcdgm889^^^^^^^^0^45^16.0^16.5^^1

 ;;^UTILITY(U,$J,19707.12,890,0)

 ;;=3^Walk Up Steps^wcdgm890^^^^^^^^0^50^16.5^17^^1

 ;;^UTILITY(U,$J,19707.12,891,0)

 ;;=3^Walk Up Steps^wcdgm891^^^^^^^^0^60^17.0^17.5^^1

 ;;^UTILITY(U,$J,19707.12,892,0)

 ;;=3^Walk Up Steps^wcdgm892^^^^^^^^0^65^17.5^18^^1

 ;;^UTILITY(U,$J,19707.12,893,0)

 ;;=3^Walk Up Steps^wcdgm893^^^^^^^^0^70^18.0^18.5^^1

 ;;^UTILITY(U,$J,19707.12,894,0)

 ;;=3^Walk Up Steps^wcdgm894^^^^^^^^0^75^19.0^20^^1

 ;;^UTILITY(U,$J,19707.12,895,0)

 ;;=3^Walk Up Steps^wcdgm895^^^^^^^^0^80^20.0^21^^1

 ;;^UTILITY(U,$J,19707.12,896,0)

 ;;=3^Walk Up Steps^wcdgm896^^^^^^^^0^90^21.0^22^^1

 ;;^UTILITY(U,$J,19707.12,897,0)

 ;;=3^Walk Up Steps^wcdgm897^^^^^^^^0^100^22.0^23^^1

 ;;^UTILITY(U,$J,19707.12,898,0)

 ;;=3^Walk Up Steps^wcdgm898^^^^^^^^0^100^23.0^24^^1

 ;;^UTILITY(U,$J,19707.12,899,0)

 ;;=3^Walk Well^wcdgm899^^^^^^^^0^30^11.5^12^^1

 ;;^UTILITY(U,$J,19707.12,900,0)

 ;;=3^Walk Well^wcdgm900^^^^^^^^0^40^12.0^12.5^^1

 ;;^UTILITY(U,$J,19707.12,901,0)

 ;;=3^Walk Well^wcdgm901^^^^^^^^0^50^12.5^13^^1

 ;;^UTILITY(U,$J,19707.12,902,0)

 ;;=3^Walk Well^wcdgm902^^^^^^^^0^60^13.0^13.5^^1

 ;;^UTILITY(U,$J,19707.12,903,0)

 ;;=3^Walk Well^wcdgm903^^^^^^^^0^65^13.5^14^^1

 ;;^UTILITY(U,$J,19707.12,904,0)

 ;;=3^Walk Well^wcdgm904^^^^^^^^0^80^14.0^14.5^^1

 ;;^UTILITY(U,$J,19707.12,905,0)

 ;;=3^Walk Well^wcdgm905^^^^^^^^0^85^14.5^15^^1

 ;;^UTILITY(U,$J,19707.12,906,0)

 ;;=3^Walk Well^wcdgm906^^^^^^^^0^90^15.0^15.5^^1

 ;;^UTILITY(U,$J,19707.12,907,0)

 ;;=3^Walk Well^wcdgm907^^^^^^^^0^100^15.5^16^^1

 ;;^UTILITY(U,$J,19707.12,908,0)

 ;;=3^Walk Well^wcdgm908^^^^^^^^1^100^16.0^16.5^^1

 ;;^UTILITY(U,$J,19707.12,909,0)

 ;;=3^Walk Well^wcdgm909^^^^^^^^1^100^16.5^17^^1

 ;;^UTILITY(U,$J,19707.12,910,0)

 ;;=4^"Ooo/Ahh"^wcdl910^^^^^^^^0^25^.5^1^^1

 ;;^UTILITY(U,$J,19707.12,911,0)

 ;;=4^"Ooo/Ahh"^wcdl911^^^^^^^^0^40^1.0^1.5^^1

 ;;^UTILITY(U,$J,19707.12,912,0)

 ;;=4^"Ooo/Ahh"^wcdl912^^^^^^^^0^60^1.5^2^^1

 ;;^UTILITY(U,$J,19707.12,913,0)

 ;;=4^"Ooo/Ahh"^wcdl913^^^^^^^^0^75^2.0^2.5^^1

 ;;^UTILITY(U,$J,19707.12,914,0)

 ;;=4^"Ooo/Ahh"^wcdl914^^^^^^^^0^80^2.5^3^^1

 ;;^UTILITY(U,$J,19707.12,915,0)

 ;;=4^"Ooo/Ahh"^wcdl915^^^^^^^^0^100^3.0^3.5^^1

 ;;^UTILITY(U,$J,19707.12,916,0)

 ;;=4^2 Words^wcdl916^^^^^^^^0^30^11.0^11.5^^1

 ;;^UTILITY(U,$J,19707.12,917,0)

 ;;=4^2 Words^wcdl917^^^^^^^^0^35^11.5^12^^1

 ;;^UTILITY(U,$J,19707.12,918,0)

 ;;=4^2 Words^wcdl918^^^^^^^^0^40^12.0^12.5^^1

 ;;^UTILITY(U,$J,19707.12,919,0)

 ;;=4^2 Words^wcdl919^^^^^^^^0^50^12.5^13^^1

 ;;^UTILITY(U,$J,19707.12,920,0)

 ;;=4^2 Words^wcdl920^^^^^^^^0^55^13.0^13.5^^1

 ;;^UTILITY(U,$J,19707.12,921,0)

 ;;=4^2 Words^wcdl921^^^^^^^^0^60^13.5^14^^1

 ;;^UTILITY(U,$J,19707.12,922,0)

 ;;=4^2 Words^wcdl922^^^^^^^^0^65^14.0^14.5^^1

 ;;^UTILITY(U,$J,19707.12,923,0)

 ;;=4^2 Words^wcdl923^^^^^^^^0^75^14.5^15^^1

 ;;^UTILITY(U,$J,19707.12,924,0)

 ;;=4^2 Words^wcdl924^^^^^^^^0^80^15.0^15.5^^1

 ;;^UTILITY(U,$J,19707.12,925,0)

 ;;=4^2 Words^wcdl925^^^^^^^^0^80^15.5^16^^1

 ;;^UTILITY(U,$J,19707.12,926,0)

 ;;=4^2 Words^wcdl926^^^^^^^^0^85^16.0^16.5^^1

 ;;^UTILITY(U,$J,19707.12,927,0)

 ;;=4^2 Words^wcdl927^^^^^^^^0^90^16.5^17^^1

 ;;^UTILITY(U,$J,19707.12,928,0)

 ;;=4^2 Words^wcdl928^^^^^^^^1^100^17.0^17.5^^1

 ;;^UTILITY(U,$J,19707.12,929,0)

 ;;=4^2 Words^wcdl929^^^^^^^^1^100^17.5^18^^1

 ;;^UTILITY(U,$J,19707.12,930,0)

 ;;=4^2 Words^wcdl930^^^^^^^^1^100^18.0^18.5^^1

 ;;^UTILITY(U,$J,19707.12,931,0)

 ;;=4^3 Words^wcdl931^^^^^^^^0^25^11.5^12^^1

 ;;^UTILITY(U,$J,19707.12,932,0)

 ;;=4^3 Words^wcdl932^^^^^^^^0^30^12.0^12.5^^1

 ;;^UTILITY(U,$J,19707.12,933,0)

 ;;=4^3 Words^wcdl933^^^^^^^^0^35^12.5^13^^1

 ;;^UTILITY(U,$J,19707.12,934,0)

 ;;=4^3 Words^wcdl934^^^^^^^^0^40^13.0^13.5^^1

 ;;^UTILITY(U,$J,19707.12,935,0)

 ;;=4^3 Words^wcdl935^^^^^^^^0^50^13.5^14^^1

 ;;^UTILITY(U,$J,19707.12,936,0)

 ;;=4^3 Words^wcdl936^^^^^^^^0^55^14.0^14.5^^1

 ;;^UTILITY(U,$J,19707.12,937,0)

 ;;=4^3 Words^wcdl937^^^^^^^^0^60^14.5^15^^1

 ;;^UTILITY(U,$J,19707.12,938,0)

 ;;=4^3 Words^wcdl938^^^^^^^^0^65^15.0^15.5^^1

 ;;^UTILITY(U,$J,19707.12,939,0)

 ;;=4^3 Words^wcdl939^^^^^^^^0^70^15.5^16^^1

 ;;^UTILITY(U,$J,19707.12,940,0)

 ;;=4^3 Words^wcdl940^^^^^^^^0^75^16.0^16.5^^1

 ;;^UTILITY(U,$J,19707.12,941,0)

 ;;=4^3 Words^wcdl941^^^^^^^^0^80^16.5^17^^1

 ;;^UTILITY(U,$J,19707.12,942,0)

 ;;=4^3 Words^wcdl942^^^^^^^^0^80^17.0^17.5^^1

 ;;^UTILITY(U,$J,19707.12,943,0)

 ;;=4^3 Words^wcdl943^^^^^^^^0^85^17.5^18^^1

 ;;^UTILITY(U,$J,19707.12,944,0)

 ;;=4^3 Words^wcdl944^^^^^^^^0^90^18.0^18.5^^1

 ;;^UTILITY(U,$J,19707.12,945,0)

 ;;=4^3 Words^wcdl945^^^^^^^^1^100^19.0^20^^1

 ;;^UTILITY(U,$J,19707.12,946,0)

 ;;=4^3 Words^wcdl946^^^^^^^^1^100^20.0^21^^1

 ;;^UTILITY(U,$J,19707.12,947,0)

 ;;=4^3 Words^wcdl947^^^^^^^^1^100^21.0^22^^1

 ;;^UTILITY(U,$J,19707.12,948,0)

 ;;=4^6 Words^wcdl948^^^^^^^^0^25^13.5^14^^1

 ;;^UTILITY(U,$J,19707.12,949,0)

 ;;=4^6 Words^wcdl949^^^^^^^^0^30^14.0^14.5^^1

 ;;^UTILITY(U,$J,19707.12,950,0)

 ;;=4^6 Words^wcdl950^^^^^^^^0^30^14.5^15^^1

 ;;^UTILITY(U,$J,19707.12,951,0)

 ;;=4^6 Words^wcdl951^^^^^^^^0^40^15.0^15.5^^1

 ;;^UTILITY(U,$J,19707.12,952,0)

 ;;=4^6 Words^wcdl952^^^^^^^^0^40^15.5^16^^1

 ;;^UTILITY(U,$J,19707.12,953,0)

 ;;=4^6 Words^wcdl953^^^^^^^^0^45^16.0^16.5^^1

 ;;^UTILITY(U,$J,19707.12,954,0)

 ;;=4^6 Words^wcdl954^^^^^^^^0^50^16.5^17^^1

 ;;^UTILITY(U,$J,19707.12,955,0)

 ;;=4^6 Words^wcdl955^^^^^^^^0^60^17.0^17.5^^1

VENKI00F  ; ; 16-MAR-2007

 +1       ;;2.6;PCC+;;NOV 12, 2007

 +2        IF 'DIFQR(19707.12)

               QUIT

           FOR I=1:2

               SET X=$TEXT(Q+I)

               IF X=""

                   QUIT

               SET Y=$EXTRACT($TEXT(Q+I+1),4,999)

               SET X=$EXTRACT(X,4,999)

               IF $ASCII(Y)=126

                   SET I=I+1

                   SET Y=$EXTRACT(Y,2,999)_$EXTRACT($TEXT(Q+I+1),5,999)

               IF $ASCII(Y)=61

                   SET Y=$EXTRACT(Y,2,999)

               XECUTE NO

              IF '$TEST

                   SET @X=Y

Q          QUIT

 +1       ;;^UTILITY(U,$J,19707.12,863,0)

 +2       ;;=3^Throw Ball Overhand^wcdgm863^^^^^^^^0^85^31.0^32^^1

 +3       ;;^UTILITY(U,$J,19707.12,864,0)

 +4       ;;=3^Throw Ball Overhand^wcdgm864^^^^^^^^0^85^32.0^33^^1

 +5       ;;^UTILITY(U,$J,19707.12,865,0)

 +6       ;;=3^Throw Ball Overhand^wcdgm865^^^^^^^^0^85^33.0^34^^1

 +7       ;;^UTILITY(U,$J,19707.12,866,0)

 +8       ;;=3^Throw Ball Overhand^wcdgm866^^^^^^^^0^85^34.0^35^^1

 +9       ;;^UTILITY(U,$J,19707.12,867,0)

 +10      ;;=3^Throw Ball Overhand^wcdgm867^^^^^^^^0^90^35.0^36^^1

 +11      ;;^UTILITY(U,$J,19707.12,868,0)

 +12      ;;=3^Throw Ball Overhand^wcdgm868^^^^^^^^1^100^36.0^37^^1

 +13      ;;^UTILITY(U,$J,19707.12,869,0)

 +14      ;;=3^Throw Ball Overhand^wcdgm869^^^^^^^^1^100^37.0^38^^1

 +15      ;;^UTILITY(U,$J,19707.12,870,0)

 +16      ;;=3^Throw Ball Overhand^wcdgm870^^^^^^^^1^100^38.0^39^^1

 +17      ;;^UTILITY(U,$J,19707.12,871,0)

 +18      ;;=3^Walk Backwards^wcdgm871^^^^^^^^0^25^12.5^13^^1

 +19      ;;^UTILITY(U,$J,19707.12,872,0)

 +20      ;;=3^Walk Backwards^wcdgm872^^^^^^^^0^40^13.0^13.5^^1

 +21      ;;^UTILITY(U,$J,19707.12,873,0)

 +22      ;;=3^Walk Backwards^wcdgm873^^^^^^^^0^50^13.5^14^^1

 +23      ;;^UTILITY(U,$J,19707.12,874,0)

 +24      ;;=3^Walk Backwards^wcdgm874^^^^^^^^0^60^14.0^14.5^^1

 +25      ;;^UTILITY(U,$J,19707.12,875,0)

 +26      ;;=3^Walk Backwards^wcdgm875^^^^^^^^0^65^14.5^15^^1

 +27      ;;^UTILITY(U,$J,19707.12,876,0)

 +28      ;;=3^Walk Backwards^wcdgm876^^^^^^^^0^70^15.0^15.5^^1

 +29      ;;^UTILITY(U,$J,19707.12,877,0)

 +30      ;;=3^Walk Backwards^wcdgm877^^^^^^^^0^80^15.5^16^^1

 +31      ;;^UTILITY(U,$J,19707.12,878,0)

 +32      ;;=3^Walk Backwards^wcdgm878^^^^^^^^0^85^16.0^16.5^^1

 +33      ;;^UTILITY(U,$J,19707.12,879,0)

 +34      ;;=3^Walk Backwards^wcdgm879^^^^^^^^0^90^16.5^17^^1

 +35      ;;^UTILITY(U,$J,19707.12,880,0)

 +36      ;;=3^Walk Backwards^wcdgm880^^^^^^^^1^100^17.0^17.5^^1

 +37      ;;^UTILITY(U,$J,19707.12,881,0)

 +38      ;;=3^Walk Backwards^wcdgm881^^^^^^^^1^100^17.5^18^^1

 +39      ;;^UTILITY(U,$J,19707.12,882,0)

 +40      ;;=3^Walk Backwards^wcdgm882^^^^^^^^1^100^18.0^18.5^^1

 +41      ;;^UTILITY(U,$J,19707.12,883,0)

 +42      ;;=3^Walk Backwards^wcdgm883^^^^^^^^1^100^19.0^20^^1

 +43      ;;^UTILITY(U,$J,19707.12,884,0)

 +44      ;;=3^Walk Backwards^wcdgm884^^^^^^^^1^100^20.0^21^^1

 +45      ;;^UTILITY(U,$J,19707.12,885,0)

 +46      ;;=3^Walk Up Steps^wcdgm885^^^^^^^^1^25^14.0^14.5^^1

 +47      ;;^UTILITY(U,$J,19707.12,886,0)

 +48      ;;=3^Walk Up Steps^wcdgm886^^^^^^^^1^30^14.5^15^^1

 +49      ;;^UTILITY(U,$J,19707.12,887,0)

 +50      ;;=3^Walk Up Steps^wcdgm887^^^^^^^^0^35^15.0^15.5^^1

 +51      ;;^UTILITY(U,$J,19707.12,888,0)

 +52      ;;=3^Walk Up Steps^wcdgm888^^^^^^^^0^40^15.5^16^^1

 +53      ;;^UTILITY(U,$J,19707.12,889,0)

 +54      ;;=3^Walk Up Steps^wcdgm889^^^^^^^^0^45^16.0^16.5^^1

 +55      ;;^UTILITY(U,$J,19707.12,890,0)

 +56      ;;=3^Walk Up Steps^wcdgm890^^^^^^^^0^50^16.5^17^^1

 +57      ;;^UTILITY(U,$J,19707.12,891,0)

 +58      ;;=3^Walk Up Steps^wcdgm891^^^^^^^^0^60^17.0^17.5^^1

 +59      ;;^UTILITY(U,$J,19707.12,892,0)

 +60      ;;=3^Walk Up Steps^wcdgm892^^^^^^^^0^65^17.5^18^^1

 +61      ;;^UTILITY(U,$J,19707.12,893,0)

 +62      ;;=3^Walk Up Steps^wcdgm893^^^^^^^^0^70^18.0^18.5^^1

 +63      ;;^UTILITY(U,$J,19707.12,894,0)

 +64      ;;=3^Walk Up Steps^wcdgm894^^^^^^^^0^75^19.0^20^^1

 +65      ;;^UTILITY(U,$J,19707.12,895,0)

 +66      ;;=3^Walk Up Steps^wcdgm895^^^^^^^^0^80^20.0^21^^1

 +67      ;;^UTILITY(U,$J,19707.12,896,0)

 +68      ;;=3^Walk Up Steps^wcdgm896^^^^^^^^0^90^21.0^22^^1

 +69      ;;^UTILITY(U,$J,19707.12,897,0)

 +70      ;;=3^Walk Up Steps^wcdgm897^^^^^^^^0^100^22.0^23^^1

 +71      ;;^UTILITY(U,$J,19707.12,898,0)

 +72      ;;=3^Walk Up Steps^wcdgm898^^^^^^^^0^100^23.0^24^^1

 +73      ;;^UTILITY(U,$J,19707.12,899,0)

 +74      ;;=3^Walk Well^wcdgm899^^^^^^^^0^30^11.5^12^^1

 +75      ;;^UTILITY(U,$J,19707.12,900,0)

 +76      ;;=3^Walk Well^wcdgm900^^^^^^^^0^40^12.0^12.5^^1

 +77      ;;^UTILITY(U,$J,19707.12,901,0)

 +78      ;;=3^Walk Well^wcdgm901^^^^^^^^0^50^12.5^13^^1

 +79      ;;^UTILITY(U,$J,19707.12,902,0)

 +80      ;;=3^Walk Well^wcdgm902^^^^^^^^0^60^13.0^13.5^^1

 +81      ;;^UTILITY(U,$J,19707.12,903,0)

 +82      ;;=3^Walk Well^wcdgm903^^^^^^^^0^65^13.5^14^^1

 +83      ;;^UTILITY(U,$J,19707.12,904,0)

 +84      ;;=3^Walk Well^wcdgm904^^^^^^^^0^80^14.0^14.5^^1

 +85      ;;^UTILITY(U,$J,19707.12,905,0)

 +86      ;;=3^Walk Well^wcdgm905^^^^^^^^0^85^14.5^15^^1

 +87      ;;^UTILITY(U,$J,19707.12,906,0)

 +88      ;;=3^Walk Well^wcdgm906^^^^^^^^0^90^15.0^15.5^^1

 +89      ;;^UTILITY(U,$J,19707.12,907,0)

 +90      ;;=3^Walk Well^wcdgm907^^^^^^^^0^100^15.5^16^^1

 +91      ;;^UTILITY(U,$J,19707.12,908,0)

 +92      ;;=3^Walk Well^wcdgm908^^^^^^^^1^100^16.0^16.5^^1

 +93      ;;^UTILITY(U,$J,19707.12,909,0)

 +94      ;;=3^Walk Well^wcdgm909^^^^^^^^1^100^16.5^17^^1

 +95      ;;^UTILITY(U,$J,19707.12,910,0)

 +96      ;;=4^"Ooo/Ahh"^wcdl910^^^^^^^^0^25^.5^1^^1

 +97      ;;^UTILITY(U,$J,19707.12,911,0)

 +98      ;;=4^"Ooo/Ahh"^wcdl911^^^^^^^^0^40^1.0^1.5^^1

 +99      ;;^UTILITY(U,$J,19707.12,912,0)

 +100     ;;=4^"Ooo/Ahh"^wcdl912^^^^^^^^0^60^1.5^2^^1

 +101     ;;^UTILITY(U,$J,19707.12,913,0)

 +102     ;;=4^"Ooo/Ahh"^wcdl913^^^^^^^^0^75^2.0^2.5^^1

 +103     ;;^UTILITY(U,$J,19707.12,914,0)

 +104     ;;=4^"Ooo/Ahh"^wcdl914^^^^^^^^0^80^2.5^3^^1

 +105     ;;^UTILITY(U,$J,19707.12,915,0)

 +106     ;;=4^"Ooo/Ahh"^wcdl915^^^^^^^^0^100^3.0^3.5^^1

 +107     ;;^UTILITY(U,$J,19707.12,916,0)

 +108     ;;=4^2 Words^wcdl916^^^^^^^^0^30^11.0^11.5^^1

 +109     ;;^UTILITY(U,$J,19707.12,917,0)

 +110     ;;=4^2 Words^wcdl917^^^^^^^^0^35^11.5^12^^1

 +111     ;;^UTILITY(U,$J,19707.12,918,0)

 +112     ;;=4^2 Words^wcdl918^^^^^^^^0^40^12.0^12.5^^1

 +113     ;;^UTILITY(U,$J,19707.12,919,0)

 +114     ;;=4^2 Words^wcdl919^^^^^^^^0^50^12.5^13^^1

 +115     ;;^UTILITY(U,$J,19707.12,920,0)

 +116     ;;=4^2 Words^wcdl920^^^^^^^^0^55^13.0^13.5^^1

 +117     ;;^UTILITY(U,$J,19707.12,921,0)

 +118     ;;=4^2 Words^wcdl921^^^^^^^^0^60^13.5^14^^1

 +119     ;;^UTILITY(U,$J,19707.12,922,0)

 +120     ;;=4^2 Words^wcdl922^^^^^^^^0^65^14.0^14.5^^1

 +121     ;;^UTILITY(U,$J,19707.12,923,0)

 +122     ;;=4^2 Words^wcdl923^^^^^^^^0^75^14.5^15^^1

 +123     ;;^UTILITY(U,$J,19707.12,924,0)

 +124     ;;=4^2 Words^wcdl924^^^^^^^^0^80^15.0^15.5^^1

 +125     ;;^UTILITY(U,$J,19707.12,925,0)

 +126     ;;=4^2 Words^wcdl925^^^^^^^^0^80^15.5^16^^1

 +127     ;;^UTILITY(U,$J,19707.12,926,0)

 +128     ;;=4^2 Words^wcdl926^^^^^^^^0^85^16.0^16.5^^1

 +129     ;;^UTILITY(U,$J,19707.12,927,0)

 +130     ;;=4^2 Words^wcdl927^^^^^^^^0^90^16.5^17^^1

 +131     ;;^UTILITY(U,$J,19707.12,928,0)

 +132     ;;=4^2 Words^wcdl928^^^^^^^^1^100^17.0^17.5^^1

 +133     ;;^UTILITY(U,$J,19707.12,929,0)

 +134     ;;=4^2 Words^wcdl929^^^^^^^^1^100^17.5^18^^1

 +135     ;;^UTILITY(U,$J,19707.12,930,0)

 +136     ;;=4^2 Words^wcdl930^^^^^^^^1^100^18.0^18.5^^1

 +137     ;;^UTILITY(U,$J,19707.12,931,0)

 +138     ;;=4^3 Words^wcdl931^^^^^^^^0^25^11.5^12^^1

 +139     ;;^UTILITY(U,$J,19707.12,932,0)

 +140     ;;=4^3 Words^wcdl932^^^^^^^^0^30^12.0^12.5^^1

 +141     ;;^UTILITY(U,$J,19707.12,933,0)

 +142     ;;=4^3 Words^wcdl933^^^^^^^^0^35^12.5^13^^1

 +143     ;;^UTILITY(U,$J,19707.12,934,0)

 +144     ;;=4^3 Words^wcdl934^^^^^^^^0^40^13.0^13.5^^1

 +145     ;;^UTILITY(U,$J,19707.12,935,0)

 +146     ;;=4^3 Words^wcdl935^^^^^^^^0^50^13.5^14^^1

 +147     ;;^UTILITY(U,$J,19707.12,936,0)

 +148     ;;=4^3 Words^wcdl936^^^^^^^^0^55^14.0^14.5^^1

 +149     ;;^UTILITY(U,$J,19707.12,937,0)

 +150     ;;=4^3 Words^wcdl937^^^^^^^^0^60^14.5^15^^1

 +151     ;;^UTILITY(U,$J,19707.12,938,0)

 +152     ;;=4^3 Words^wcdl938^^^^^^^^0^65^15.0^15.5^^1

 +153     ;;^UTILITY(U,$J,19707.12,939,0)

 +154     ;;=4^3 Words^wcdl939^^^^^^^^0^70^15.5^16^^1

 +155     ;;^UTILITY(U,$J,19707.12,940,0)

 +156     ;;=4^3 Words^wcdl940^^^^^^^^0^75^16.0^16.5^^1

 +157     ;;^UTILITY(U,$J,19707.12,941,0)

 +158     ;;=4^3 Words^wcdl941^^^^^^^^0^80^16.5^17^^1

 +159     ;;^UTILITY(U,$J,19707.12,942,0)

 +160     ;;=4^3 Words^wcdl942^^^^^^^^0^80^17.0^17.5^^1

 +161     ;;^UTILITY(U,$J,19707.12,943,0)

 +162     ;;=4^3 Words^wcdl943^^^^^^^^0^85^17.5^18^^1

 +163     ;;^UTILITY(U,$J,19707.12,944,0)

 +164     ;;=4^3 Words^wcdl944^^^^^^^^0^90^18.0^18.5^^1

 +165     ;;^UTILITY(U,$J,19707.12,945,0)

 +166     ;;=4^3 Words^wcdl945^^^^^^^^1^100^19.0^20^^1

 +167     ;;^UTILITY(U,$J,19707.12,946,0)

 +168     ;;=4^3 Words^wcdl946^^^^^^^^1^100^20.0^21^^1

 +169     ;;^UTILITY(U,$J,19707.12,947,0)

 +170     ;;=4^3 Words^wcdl947^^^^^^^^1^100^21.0^22^^1

 +171     ;;^UTILITY(U,$J,19707.12,948,0)

 +172     ;;=4^6 Words^wcdl948^^^^^^^^0^25^13.5^14^^1

 +173     ;;^UTILITY(U,$J,19707.12,949,0)

 +174     ;;=4^6 Words^wcdl949^^^^^^^^0^30^14.0^14.5^^1

 +175     ;;^UTILITY(U,$J,19707.12,950,0)

 +176     ;;=4^6 Words^wcdl950^^^^^^^^0^30^14.5^15^^1

 +177     ;;^UTILITY(U,$J,19707.12,951,0)

 +178     ;;=4^6 Words^wcdl951^^^^^^^^0^40^15.0^15.5^^1

 +179     ;;^UTILITY(U,$J,19707.12,952,0)

 +180     ;;=4^6 Words^wcdl952^^^^^^^^0^40^15.5^16^^1

 +181     ;;^UTILITY(U,$J,19707.12,953,0)

 +182     ;;=4^6 Words^wcdl953^^^^^^^^0^45^16.0^16.5^^1

 +183     ;;^UTILITY(U,$J,19707.12,954,0)

 +184     ;;=4^6 Words^wcdl954^^^^^^^^0^50^16.5^17^^1

 +185     ;;^UTILITY(U,$J,19707.12,955,0)

 +186     ;;=4^6 Words^wcdl955^^^^^^^^0^60^17.0^17.5^^1

VENKI00F.m