FHINI044 ; ; 11-OCT-1995
;;5.0;Dietetics;;Oct 11, 1995
Q:'DIFQR(112) 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,99) S:$A(Y)=61 Y=$E(Y,2,999) X NO E S @X=Y
Q Q
;;^UTILITY(U,$J,112,1344,4)
;;=^^.062^.291^.177^.096^.196^.097
;;^UTILITY(U,$J,112,1344,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1345,0)
;;=MUSHROOMS, COMMON, RAW^11-260^cups^70^97^N
;;^UTILITY(U,$J,112,1345,1)
;;=2.09^.42^4.65^25^91.81^^^5^1.24^10^104^370^4^.73^.492^.112^^0^3.5^.102
;;^UTILITY(U,$J,112,1345,2)
;;=.449^4.116^2.2^.097^21.1^0^.166^.001^0^.056^.007^.17^0^.89^^^1.2
;;^UTILITY(U,$J,112,1345,3)
;;=.047^.094^.083^.128^.211^.04^.005^.081^.045^.096^.103^.056^.156^.191^.357^.093^.147^.094
;;^UTILITY(U,$J,112,1345,4)
;;=.001^.005^.002^.028^^.009^.007^^.02^12.3
;;^UTILITY(U,$J,112,1345,20)
;;=USDA Std. Reference, Release 10;HCF Nutrition Research Foundation, Inc, 1990
;;^UTILITY(U,$J,112,1346,0)
;;=MUSHROOMS, COMMON, CND^11-264^cups^156^100^N
;;^UTILITY(U,$J,112,1346,1)
;;=1.87^.29^4.96^24^91.08^^^11^.79^15^66^129^425^.72^.235^.086^^0^0^.085
;;^UTILITY(U,$J,112,1346,2)
;;=.021^1.593^.811^.061^12.3^0^.111^.001^0^.038^.005^.113^0^1.67^^^2.4
;;^UTILITY(U,$J,112,1346,3)
;;=.044^.088^.077^.118^.196^.037^.005^.076^.042^.089^.096^.052^.145^.178^.331^.086^.137^.087
;;^UTILITY(U,$J,112,1346,4)
;;=.001^.003^.001^.019^^.006^.005^^^4.1
;;^UTILITY(U,$J,112,1346,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1348,0)
;;=MUSKELLUNGE, (PIKE, GAMEFISH), RAW^1357-0^oz.^28.3^^N
;;^UTILITY(U,$J,112,1348,1)
;;=20.2^2.5^0^109^76.3^^^28^.6^^227^753^111^^^^^100^3^.21
;;^UTILITY(U,$J,112,1348,2)
;;=.25^7.7^^^^^0^^55^1
;;^UTILITY(U,$J,112,1348,20)
;;=USDA Std. Reference, Release 8
;;^UTILITY(U,$J,112,1349,0)
;;=MUSSELS, BLUE, COOKED, MOIST HEAT^15-165^oz.^28.3^100^N
;;^UTILITY(U,$J,112,1349,1)
;;=23.8^4.48^7.39^172^61.15^^^33^6.72^37^285^268^369^2.67^.149^6.8^^304^13.6^.3
;;^UTILITY(U,$J,112,1349,2)
;;=.42^3^.95^.1^75.6^24^.036^.04^56^.85^1.014^1.212^91^3.18^^^0
;;^UTILITY(U,$J,112,1349,3)
;;=.267^1.025^1.036^1.676^1.779^.537^.312^.853^.762^1.04^1.737^.457^1.44^2.297^3.238^1.489^.971^1.067
;;^UTILITY(U,$J,112,1349,4)
;;=^^.118^.588^.276^.136^.41^.14
;;^UTILITY(U,$J,112,1349,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1350,0)
;;=MUSTARD GREENS, RAW^11-270^cups^56^93^N
;;^UTILITY(U,$J,112,1350,1)
;;=2.7^.2^4.9^26^90.8^^^103^1.46^32^43^354^25^.2^.147^.48^^5300^70^.08
;;^UTILITY(U,$J,112,1350,2)
;;=.11^.8^.21^.18^187.4^0^.02^.018^0^.01^.092^.038^530^1.4^^^2
;;^UTILITY(U,$J,112,1350,3)
;;=.03^.072^.098^.083^.123^.025^.04^.072^.143^.105^.197^.048
;;^UTILITY(U,$J,112,1350,4)
;;=^^0^.005^0^.002^.015^^170
;;^UTILITY(U,$J,112,1350,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1351,0)
;;=MUSTARD GREENS, CKD WO/SALT^11-271^cups^140^100^N
;;^UTILITY(U,$J,112,1351,1)
;;=2.26^.24^2.1^15^94.46^^^74^.7^15^41^202^16^.11^.084^.274^^3031^25.3^.041
;;^UTILITY(U,$J,112,1351,2)
;;=.063^.433^.12^.098^73.4^0^.024^.022^0^.012^.11^.046^303^.94^^^2
;;^UTILITY(U,$J,112,1351,3)
;;=.025^.06^.082^.069^.103^.021^.034^.06^.119^.088^.165^.04
;;^UTILITY(U,$J,112,1351,4)
;;=^^0^.006^.001^.002^.018
;;^UTILITY(U,$J,112,1351,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1352,0)
;;=MUSTARD GREENS, CKD W/SALT^11-799^cups^140^100^N
;;^UTILITY(U,$J,112,1352,1)
;;=2.26^.24^2.1^15^94.46^^^74^.7^15^41^202^252^.11^.084^.274^^3031^25.3^.041
;;^UTILITY(U,$J,112,1352,2)
;;=.063^.433^.12^.098^73.4^0^.024^.022^0^.012^.11^.046^303^.94
;;^UTILITY(U,$J,112,1352,3)
;;=.025^.06^.082^.069^.103^.021^.034^.06^.119^.088^.165^.04
;;^UTILITY(U,$J,112,1352,4)
;;=^^0^.006^.001^.002^.018
;;^UTILITY(U,$J,112,1352,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1353,0)
;;=MUSTARD GREENS, FRZ, CKD WO/SALT^11-273^cups^150^100^N
;;^UTILITY(U,$J,112,1353,1)
;;=2.27^.25^3.12^19^93.8^^^101^1.12^13^24^139^25^.2^.058^.294^^4470^13.8^.04
;;^UTILITY(U,$J,112,1353,2)
;;=.053^.258^.016^.108^69.5^0^.024^.022^0^.013^.113^.047^447^.57
;;^UTILITY(U,$J,112,1353,3)
;;=.025^.06^.083^.07^.103^.021^.034^.06^.12^.088^.166^.041
;;^UTILITY(U,$J,112,1353,4)
;;=^^0^.006^.001^.002^.018
;;^UTILITY(U,$J,112,1353,20)
;;=USDA Std. Reference, Release 10
;;^UTILITY(U,$J,112,1354,0)
;;=MUSTARD GREENS, FRZ, CKD W/SALT^11-800^cups^150^100^N
;;^UTILITY(U,$J,112,1354,1)
;;=2.27^.25^3.12^19^93.8^^^101^1.12^13^24^139^261^.2^.058^.294^^4470^13.8^.04
;;^UTILITY(U,$J,112,1354,2)
;;=.053^.258^.016^.108^69.5^0^.024^.022^0^.013^.113^.047^447^.57
;;^UTILITY(U,$J,112,1354,3)
;;=.025^.06^.083^.07^.103^.021^.034^.06^.12^.088^.166^.041
;;^UTILITY(U,$J,112,1354,4)
;;=^^0^.006^.001^.002^.018
;;^UTILITY(U,$J,112,1354,20)
;;=USDA Std. Reference, Release 10
FHINI044 ; ; 11-OCT-1995
+1 ;;5.0;Dietetics;;Oct 11, 1995
+2 IF 'DIFQR(112)
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,99)
IF $ASCII(Y)=61
SET Y=$EXTRACT(Y,2,999)
XECUTE NO
IF '$TEST
SET @X=Y
Q QUIT
+1 ;;^UTILITY(U,$J,112,1344,4)
+2 ;;=^^.062^.291^.177^.096^.196^.097
+3 ;;^UTILITY(U,$J,112,1344,20)
+4 ;;=USDA Std. Reference, Release 10
+5 ;;^UTILITY(U,$J,112,1345,0)
+6 ;;=MUSHROOMS, COMMON, RAW^11-260^cups^70^97^N
+7 ;;^UTILITY(U,$J,112,1345,1)
+8 ;;=2.09^.42^4.65^25^91.81^^^5^1.24^10^104^370^4^.73^.492^.112^^0^3.5^.102
+9 ;;^UTILITY(U,$J,112,1345,2)
+10 ;;=.449^4.116^2.2^.097^21.1^0^.166^.001^0^.056^.007^.17^0^.89^^^1.2
+11 ;;^UTILITY(U,$J,112,1345,3)
+12 ;;=.047^.094^.083^.128^.211^.04^.005^.081^.045^.096^.103^.056^.156^.191^.357^.093^.147^.094
+13 ;;^UTILITY(U,$J,112,1345,4)
+14 ;;=.001^.005^.002^.028^^.009^.007^^.02^12.3
+15 ;;^UTILITY(U,$J,112,1345,20)
+16 ;;=USDA Std. Reference, Release 10;HCF Nutrition Research Foundation, Inc, 1990
+17 ;;^UTILITY(U,$J,112,1346,0)
+18 ;;=MUSHROOMS, COMMON, CND^11-264^cups^156^100^N
+19 ;;^UTILITY(U,$J,112,1346,1)
+20 ;;=1.87^.29^4.96^24^91.08^^^11^.79^15^66^129^425^.72^.235^.086^^0^0^.085
+21 ;;^UTILITY(U,$J,112,1346,2)
+22 ;;=.021^1.593^.811^.061^12.3^0^.111^.001^0^.038^.005^.113^0^1.67^^^2.4
+23 ;;^UTILITY(U,$J,112,1346,3)
+24 ;;=.044^.088^.077^.118^.196^.037^.005^.076^.042^.089^.096^.052^.145^.178^.331^.086^.137^.087
+25 ;;^UTILITY(U,$J,112,1346,4)
+26 ;;=.001^.003^.001^.019^^.006^.005^^^4.1
+27 ;;^UTILITY(U,$J,112,1346,20)
+28 ;;=USDA Std. Reference, Release 10
+29 ;;^UTILITY(U,$J,112,1348,0)
+30 ;;=MUSKELLUNGE, (PIKE, GAMEFISH), RAW^1357-0^oz.^28.3^^N
+31 ;;^UTILITY(U,$J,112,1348,1)
+32 ;;=20.2^2.5^0^109^76.3^^^28^.6^^227^753^111^^^^^100^3^.21
+33 ;;^UTILITY(U,$J,112,1348,2)
+34 ;;=.25^7.7^^^^^0^^55^1
+35 ;;^UTILITY(U,$J,112,1348,20)
+36 ;;=USDA Std. Reference, Release 8
+37 ;;^UTILITY(U,$J,112,1349,0)
+38 ;;=MUSSELS, BLUE, COOKED, MOIST HEAT^15-165^oz.^28.3^100^N
+39 ;;^UTILITY(U,$J,112,1349,1)
+40 ;;=23.8^4.48^7.39^172^61.15^^^33^6.72^37^285^268^369^2.67^.149^6.8^^304^13.6^.3
+41 ;;^UTILITY(U,$J,112,1349,2)
+42 ;;=.42^3^.95^.1^75.6^24^.036^.04^56^.85^1.014^1.212^91^3.18^^^0
+43 ;;^UTILITY(U,$J,112,1349,3)
+44 ;;=.267^1.025^1.036^1.676^1.779^.537^.312^.853^.762^1.04^1.737^.457^1.44^2.297^3.238^1.489^.971^1.067
+45 ;;^UTILITY(U,$J,112,1349,4)
+46 ;;=^^.118^.588^.276^.136^.41^.14
+47 ;;^UTILITY(U,$J,112,1349,20)
+48 ;;=USDA Std. Reference, Release 10
+49 ;;^UTILITY(U,$J,112,1350,0)
+50 ;;=MUSTARD GREENS, RAW^11-270^cups^56^93^N
+51 ;;^UTILITY(U,$J,112,1350,1)
+52 ;;=2.7^.2^4.9^26^90.8^^^103^1.46^32^43^354^25^.2^.147^.48^^5300^70^.08
+53 ;;^UTILITY(U,$J,112,1350,2)
+54 ;;=.11^.8^.21^.18^187.4^0^.02^.018^0^.01^.092^.038^530^1.4^^^2
+55 ;;^UTILITY(U,$J,112,1350,3)
+56 ;;=.03^.072^.098^.083^.123^.025^.04^.072^.143^.105^.197^.048
+57 ;;^UTILITY(U,$J,112,1350,4)
+58 ;;=^^0^.005^0^.002^.015^^170
+59 ;;^UTILITY(U,$J,112,1350,20)
+60 ;;=USDA Std. Reference, Release 10
+61 ;;^UTILITY(U,$J,112,1351,0)
+62 ;;=MUSTARD GREENS, CKD WO/SALT^11-271^cups^140^100^N
+63 ;;^UTILITY(U,$J,112,1351,1)
+64 ;;=2.26^.24^2.1^15^94.46^^^74^.7^15^41^202^16^.11^.084^.274^^3031^25.3^.041
+65 ;;^UTILITY(U,$J,112,1351,2)
+66 ;;=.063^.433^.12^.098^73.4^0^.024^.022^0^.012^.11^.046^303^.94^^^2
+67 ;;^UTILITY(U,$J,112,1351,3)
+68 ;;=.025^.06^.082^.069^.103^.021^.034^.06^.119^.088^.165^.04
+69 ;;^UTILITY(U,$J,112,1351,4)
+70 ;;=^^0^.006^.001^.002^.018
+71 ;;^UTILITY(U,$J,112,1351,20)
+72 ;;=USDA Std. Reference, Release 10
+73 ;;^UTILITY(U,$J,112,1352,0)
+74 ;;=MUSTARD GREENS, CKD W/SALT^11-799^cups^140^100^N
+75 ;;^UTILITY(U,$J,112,1352,1)
+76 ;;=2.26^.24^2.1^15^94.46^^^74^.7^15^41^202^252^.11^.084^.274^^3031^25.3^.041
+77 ;;^UTILITY(U,$J,112,1352,2)
+78 ;;=.063^.433^.12^.098^73.4^0^.024^.022^0^.012^.11^.046^303^.94
+79 ;;^UTILITY(U,$J,112,1352,3)
+80 ;;=.025^.06^.082^.069^.103^.021^.034^.06^.119^.088^.165^.04
+81 ;;^UTILITY(U,$J,112,1352,4)
+82 ;;=^^0^.006^.001^.002^.018
+83 ;;^UTILITY(U,$J,112,1352,20)
+84 ;;=USDA Std. Reference, Release 10
+85 ;;^UTILITY(U,$J,112,1353,0)
+86 ;;=MUSTARD GREENS, FRZ, CKD WO/SALT^11-273^cups^150^100^N
+87 ;;^UTILITY(U,$J,112,1353,1)
+88 ;;=2.27^.25^3.12^19^93.8^^^101^1.12^13^24^139^25^.2^.058^.294^^4470^13.8^.04
+89 ;;^UTILITY(U,$J,112,1353,2)
+90 ;;=.053^.258^.016^.108^69.5^0^.024^.022^0^.013^.113^.047^447^.57
+91 ;;^UTILITY(U,$J,112,1353,3)
+92 ;;=.025^.06^.083^.07^.103^.021^.034^.06^.12^.088^.166^.041
+93 ;;^UTILITY(U,$J,112,1353,4)
+94 ;;=^^0^.006^.001^.002^.018
+95 ;;^UTILITY(U,$J,112,1353,20)
+96 ;;=USDA Std. Reference, Release 10
+97 ;;^UTILITY(U,$J,112,1354,0)
+98 ;;=MUSTARD GREENS, FRZ, CKD W/SALT^11-800^cups^150^100^N
+99 ;;^UTILITY(U,$J,112,1354,1)
+100 ;;=2.27^.25^3.12^19^93.8^^^101^1.12^13^24^139^261^.2^.058^.294^^4470^13.8^.04
+101 ;;^UTILITY(U,$J,112,1354,2)
+102 ;;=.053^.258^.016^.108^69.5^0^.024^.022^0^.013^.113^.047^447^.57
+103 ;;^UTILITY(U,$J,112,1354,3)
+104 ;;=.025^.06^.083^.07^.103^.021^.034^.06^.12^.088^.166^.041
+105 ;;^UTILITY(U,$J,112,1354,4)
+106 ;;=^^0^.006^.001^.002^.018
+107 ;;^UTILITY(U,$J,112,1354,20)
+108 ;;=USDA Std. Reference, Release 10
