.MCAD 304020000 1 79 220 0
.CMD PLOTFORMAT
0 0 1 1 1 0 0 1 1 
0 0 1 1 1 0 0 1 1 
0 1 0 0 1 1 NO-TRACE-STRING
0 2 1 0 1 1 NO-TRACE-STRING
0 3 2 0 1 1 NO-TRACE-STRING
0 4 3 0 1 1 NO-TRACE-STRING
0 1 4 0 1 1 NO-TRACE-STRING
0 2 5 0 1 1 NO-TRACE-STRING
0 3 6 0 1 1 NO-TRACE-STRING
0 4 0 0 1 1 NO-TRACE-STRING
0 1 1 0 1 1 NO-TRACE-STRING
0 2 2 0 1 1 NO-TRACE-STRING
0 3 3 0 1 1 NO-TRACE-STRING
0 4 4 0 1 1 NO-TRACE-STRING
0 1 5 0 1 1 NO-TRACE-STRING
0 2 6 0 1 1 NO-TRACE-STRING
0 3 0 0 1 1 NO-TRACE-STRING
0 4 1 0 1 1 NO-TRACE-STRING
0 1 1 21 15 0 0 3 
.CMD FORMAT  rd=d ct=10 im=i et=3 zt=15 pr=3 mass length time charge temperature tr=0 vm=0
.CMD SET ORIGIN 0
.CMD SET TOL 0.001000000000000
.CMD SET PRNCOLWIDTH 17
.CMD SET PRNPRECISION 16
.CMD PRINT_SETUP 1.000000 1.000000 0.750000 0.500000 1
.CMD HEADER_FOOTER 1 1 *empty* Film^Coefficient^Temperature^and^Flow^Corrections *empty* 0 1 |F |P |D^|T
.CMD HEADER_FOOTER_FONT fontID=14 family=Arial points=10 bold=0 italic=0 underline=0 colrid=1733265238
.CMD HEADER_FOOTER_FONT fontID=15 family=Arial points=10 bold=0 italic=0 underline=0 colrid=1733265238
.CMD DEFAULT_TEXT_PARPROPS 0 0 0
.CMD DEFINE_FONTSTYLE_NAME fontID=0 name=Variables
.CMD DEFINE_FONTSTYLE_NAME fontID=1 name=Constants
.CMD DEFINE_FONTSTYLE_NAME fontID=2 name=Text
.CMD DEFINE_FONTSTYLE_NAME fontID=4 name=User^1
.CMD DEFINE_FONTSTYLE_NAME fontID=5 name=User^2
.CMD DEFINE_FONTSTYLE_NAME fontID=6 name=User^3
.CMD DEFINE_FONTSTYLE_NAME fontID=7 name=User^4
.CMD DEFINE_FONTSTYLE_NAME fontID=8 name=User^5
.CMD DEFINE_FONTSTYLE_NAME fontID=9 name=User^6
.CMD DEFINE_FONTSTYLE_NAME fontID=10 name=User^7
.CMD DEFINE_FONTSTYLE fontID=0 family=Times^New^Roman points=10 bold=0 italic=0 underline=0 colrid=-1
.CMD DEFINE_FONTSTYLE fontID=1 family=Times^New^Roman points=10 bold=0 italic=0 underline=0 colrid=-1
.CMD DEFINE_FONTSTYLE fontID=2 family=Arial points=10 bold=0 italic=0 underline=0 colrid=-1
.CMD DEFINE_FONTSTYLE fontID=4 family=Math^Ext points=10 bold=0 italic=0 underline=0 colrid=-1
.CMD DEFINE_FONTSTYLE fontID=5 family=Courier^New points=10 bold=0 italic=0 underline=0 colrid=-1
.CMD DEFINE_FONTSTYLE fontID=6 family=System points=10 bold=0 italic=0 underline=0 colrid=-1
.CMD DEFINE_FONTSTYLE fontID=7 family=Script points=10 bold=0 italic=0 underline=0 colrid=-1
.CMD DEFINE_FONTSTYLE fontID=8 family=Roman points=10 bold=0 italic=0 underline=0 colrid=-1
.CMD DEFINE_FONTSTYLE fontID=9 family=Modern points=10 bold=0 italic=0 underline=0 colrid=-1
.CMD DEFINE_FONTSTYLE fontID=10 family=Times^New^Roman points=10 bold=0 italic=0 underline=0 colrid=-1
.CMD UNITS U=1
.CMD DIMENSIONS_ANALYSIS 0 0
.CMD COLORTAB_ENTRY 0 0 0
.CMD COLORTAB_ENTRY 128 0 0
.CMD COLORTAB_ENTRY 0 128 0
.CMD COLORTAB_ENTRY 128 128 0
.CMD COLORTAB_ENTRY 0 0 128
.CMD COLORTAB_ENTRY 128 0 128
.CMD COLORTAB_ENTRY 0 128 128
.CMD COLORTAB_ENTRY 128 128 128
.CMD COLORTAB_ENTRY 192 192 192
.CMD COLORTAB_ENTRY 255 0 0
.CMD COLORTAB_ENTRY 0 255 0
.CMD COLORTAB_ENTRY 255 255 0
.CMD COLORTAB_ENTRY 0 0 255
.CMD COLORTAB_ENTRY 255 0 255
.CMD COLORTAB_ENTRY 0 255 255
.CMD COLORTAB_ENTRY 255 255 255
.TXT 5 1 2 0 0
Cg a73.000000,73.000000,88
{\rtf\ansi \deff0{\colortbl;\red0\green128\blue128;\red128\green0\blue0;}{
\fonttbl{\f0\fcharset0\fnil Arial;}}\plain\cf1\fs20 \pard {\cf2 
Appendix C to EPRI Draft Heat Exchanger Performance Guidelines for 
Service Water Systems}}
.TXT 5 0 108 0 0
Cg a73.000000,73.000000,43
{\rtf\ansi \deff0{\colortbl;\red0\green128\blue128;\red0\green0\blue128;}{
\fonttbl{\f0\fcharset0\fnil Arial;}}\plain\cf1\fs20 \pard {\cf2 
Include additional MathCad Unit Definitions}}
.INC 1 4 106 0 0
http://www.3-cities.com/~tyroneb/mathcad/units.mcd
.ATT
.LINK http://www.3-cities.com/~tyroneb/mathcad/units.mcd
.ATT_END
.TXT 6 -4 107 0 0
Cg a73.000000,73.000000,38
{\rtf\ansi \deff0{\colortbl;\red0\green128\blue128;\red128\green0\blue0;}{
\fonttbl{\f0\fcharset0\fnil Arial;}}\plain\cf1\fs20 \pard {\cf2 
Include functions for Water Properties}}
.INC 2 4 105 0 0
http://www.3-cities.com/~tyroneb/mathcad/WaterProperites.mcd
.ATT
.LINK http://www.3-cities.com/~tyroneb/mathcad/WaterProperites.mcd
.ATT_END
.TXT 7 -4 120 0 0
Cg a73.000000,73.000000,21
{\rtf\ansi \deff0{\colortbl;\red0\green128\blue128;\red128\green0\blue0;}{
\fonttbl{\f0\fcharset0\fnil Arial;}}\plain\cf1\fs20 \pard {\cf2 
Reference Temperature}}
.EQN 4 6 121 0 0
{0:T.ref}NAME:{0:FtoR}NAME(100*{0:ºF}NAME)
.EQN 0 17 125 0 0
{0:T.ref}NAME={0}?{0:ºR}NAME
.TXT 5 -23 136 0 0
Cg a73.000000,73.000000,15
{\rtf\ansi \deff0{\colortbl;\red0\green128\blue128;\red128\green0\blue0;}{
\fonttbl{\f0\fcharset0\fnil Arial;}}\plain\cf1\fs20 \pard {\cf2 Plot 
Parameters}}
.EQN 4 6 141 0 0
{0:n}NAME:1;18
.EQN 5 0 140 0 0
({0:T.test}NAME)[({0:n}NAME):{0:FtoR}NAME(({0:n}NAME*10)+30)
.TXT 5 -6 153 0 0
Cg a73.000000,73.000000,52
{\rtf\ansi \deff0{\colortbl;\red0\green128\blue128;\red128\green0\blue0;}{
\fonttbl{\f0\fcharset0\fnil Arial;}}\plain\cf1\fs20 \pard {\cf2 Inside 
film coefficient flow correction factor (K}{\cf2\dn fi}{\cf2 )}}
.EQN 7 6 155 0 0
{0:K.fi}NAME({0:w}NAME,{0:w.d}NAME):((({0:w}NAME)/({0:w.d}NAME)))^(0.8)
.TXT 6 -6 156 0 0
Cg a73.000000,73.000000,53
{\rtf\ansi \deff0{\colortbl;\red0\green128\blue128;\red128\green0\blue0;}{
\fonttbl{\f0\fcharset0\fnil Arial;}}\plain\cf1\fs20 \pard {\cf2 
Outside film coefficient flow correction factor (K}{\cf2\dn fo}{\cf2 )}}
.EQN 7 6 157 0 0
{0:K.fo}NAME({0:w}NAME,{0:w.d}NAME):((({0:w}NAME)/({0:w.d}NAME)))^(0.6)
.TXT 4 -6 150 0 0
C x1,1,0,0
.TXT 3 0 137 0 0
Cg a73.000000,73.000000,59
{\rtf\ansi \deff0{\colortbl;\red0\green128\blue128;\red128\green0\blue0;}{
\fonttbl{\f0\fcharset0\fnil Arial;}}\plain\cf1\fs20 \pard {\cf2 Inside 
film coefficient temperature correction factor (K}{\cf2\dn ti}{\cf2 )}}
.EQN 8 6 170 0 0
{0:K.ti}NAME({0:T}NAME):((({0:fk.w}NAME({0:T}NAME))^(0.67))/(({0:f\m}NAME({0:T}NAME))^(0.47)))/((({0:fk.w}NAME({0:T.ref}NAME))^(0.67))/(({0:f\m}NAME({0:T.ref}NAME))^(0.47)))
.EQN 8 -4 171 0 0
2&.6&(_n_u_l_l_&_n_u_l_l_)&{0:K.ti}NAME(({0:T.test}NAME)[({0:n}NAME))@&&(_n_u_l_l_&_n_u_l_l_)&{0:n}NAME*10+30
0 1 1 1 1 0 0 1 1 degF
0 1 1 1 0 7 0 1 1 Kti
0 1 0 0 1 1 NO-TRACE-STRING
0 2 1 0 1 1 NO-TRACE-STRING
0 3 2 0 1 1 NO-TRACE-STRING
0 4 3 0 1 1 NO-TRACE-STRING
0 1 4 0 1 1 NO-TRACE-STRING
0 2 5 0 1 1 NO-TRACE-STRING
0 3 6 0 1 1 NO-TRACE-STRING
0 4 0 0 1 1 NO-TRACE-STRING
0 1 1 0 1 1 NO-TRACE-STRING
0 2 2 0 1 1 NO-TRACE-STRING
0 3 3 0 1 1 NO-TRACE-STRING
0 4 4 0 1 1 NO-TRACE-STRING
0 1 5 0 1 1 NO-TRACE-STRING
0 2 6 0 1 1 NO-TRACE-STRING
0 3 0 0 1 1 NO-TRACE-STRING
0 4 1 0 1 1 NO-TRACE-STRING
1 1 1 54 22 10 0 3 Water Temperature Correction Factor Kti
.TXT 32 -1 172 0 0
Cg a73.000000,73.000000,60
{\rtf\ansi \deff0{\colortbl;\red0\green128\blue128;\red128\green0\blue0;}{
\fonttbl{\f0\fcharset0\fnil Arial;}}\plain\cf1\fs20 \pard {\cf2 
Outside film coefficient temperature correction factor (K}{\cf2\dn to}{
\cf2 )}}
.EQN 9 6 173 0 0
{0:K.to}NAME({0:T}NAME):((({0:fk.w}NAME({0:T}NAME))^(0.67))/(({0:f\m}NAME({0:T}NAME))^(0.27)))/((({0:fk.w}NAME({0:T.ref}NAME))^(0.67))/(({0:f\m}NAME({0:T.ref}NAME))^(0.27)))
.EQN 8 -4 175 0 0
1.4&.6&(_n_u_l_l_&_n_u_l_l_)&{0:K.to}NAME(({0:T.test}NAME)[({0:n}NAME))@&&(_n_u_l_l_&_n_u_l_l_)&{0:n}NAME*10+30
0 1 1 1 1 0 0 1 1 degF
0 1 1 1 0 4 0 1 1 Kto
0 1 0 0 1 1 NO-TRACE-STRING
0 2 1 0 1 1 NO-TRACE-STRING
0 3 2 0 1 1 NO-TRACE-STRING
0 4 3 0 1 1 NO-TRACE-STRING
0 1 4 0 1 1 NO-TRACE-STRING
0 2 5 0 1 1 NO-TRACE-STRING
0 3 6 0 1 1 NO-TRACE-STRING
0 4 0 0 1 1 NO-TRACE-STRING
0 1 1 0 1 1 NO-TRACE-STRING
0 2 2 0 1 1 NO-TRACE-STRING
0 3 3 0 1 1 NO-TRACE-STRING
0 4 4 0 1 1 NO-TRACE-STRING
0 1 5 0 1 1 NO-TRACE-STRING
0 2 6 0 1 1 NO-TRACE-STRING
0 3 0 0 1 1 NO-TRACE-STRING
0 4 1 0 1 1 NO-TRACE-STRING
1 1 1 54 22 10 0 3 Water Temperature Correction Factor Kto
.TXT 30 -3 176 0 0
C x1,1,0,0
.TXT 2 1 160 0 0
Cg a72.000000,72.000000,34
{\rtf\ansi \deff0{\colortbl;\red0\green128\blue128;\red128\green0\blue0;}{
\fonttbl{\f0\fcharset0\fnil Arial;}}\plain\cf1\fs20 \pard {\cf2 Inside 
film coefficient correction}}
.EQN 7 3 163 0 0
{0:h.ic}NAME({0:h.id}NAME,{0:T.t}NAME,{0:T.d}NAME,{0:w.t}NAME,{0:w.d}NAME):{0:h.id}NAME*({0:K.ti}NAME({0:T.t}NAME)*{0:K.fi}NAME({0:w.t}NAME,{0:w.d}NAME))/({0:K.ti}NAME({0:T.d}NAME))
.TXT 7 -3 162 0 0
Cg a72.000000,72.000000,35
{\rtf\ansi \deff0{\colortbl;\red0\green128\blue128;\red128\green0\blue0;}{
\fonttbl{\f0\fcharset0\fnil Arial;}}\plain\cf1\fs20 \pard {\cf2 
Outside film coefficient correction}}
.EQN 7 3 164 0 0
{0:h.oc}NAME({0:h.od}NAME,{0:T.t}NAME,{0:T.d}NAME,{0:w.t}NAME,{0:w.d}NAME):{0:h.od}NAME*({0:K.to}NAME({0:T.t}NAME)*{0:K.fo}NAME({0:w.t}NAME,{0:w.d}NAME))/({0:K.to}NAME({0:T.d}NAME))
.TXT 5 -4 214 0 0
Cg a108.000000,108.000000,33
{\rtf\ansi \deff0{\colortbl;\red0\green128\blue128;\red0\green0\blue128;}{
\fonttbl{\f0\fcharset0\fnil Arial;}}\plain\cf1\fs20 \pard {\cf2 Dual 
Pass Correction Factor (F}{\cf2\dn 2p}{\cf2 )}}
.TXT 6 5 215 0 0
Cg a81.000000,81.000000,23
{\rtf\ansi \deff0{\colortbl;\red0\green128\blue128;\red0\green0\blue128;}{
\fonttbl{\f0\fcharset0\fnil Arial;}}\plain\cf1\fs20 \pard {\cf2 
Temperature ratio (R}{\cf2\dn 2p}{\cf2 )}}
.EQN 5 4 216 0 0
{0:R.2p}NAME({0:Th.i}NAME,{0:Th.o}NAME,{0:Tc.i}NAME,{0:Tc.o}NAME):({0:Th.i}NAME-{0:Th.o}NAME)/({0:Tc.i}NAME-{0:Tc.o}NAME)
.TXT 6 -3 217 0 0
Cg a80.000000,80.000000,28
{\rtf\ansi \deff0{\colortbl;\red0\green128\blue128;\red0\green0\blue128;}{
\fonttbl{\f0\fcharset0\fnil Arial;}}\plain\cf1\fs20 \pard {\cf2 
Temperature efficiency (P}{\cf2\dn 2p}{\cf2 )}}
.EQN 6 3 218 0 0
{0:P.2p}NAME({0:Th.i}NAME,{0:Tc.i}NAME,{0:Tc.o}NAME):({0:Tc.o}NAME-{0:Tc.i}NAME)/({0:Th.i}NAME-{0:Tc.i}NAME)
.EQN 10 -3 219 0 0
{0:F}NAME÷((\(({0:R}NAME)^(2)+1))/({0:R}NAME-1)*{0:log}NAME((1-{0:P}NAME)/(1-{0:P}NAME*{0:R}NAME)))/({0:log}NAME(((2)/({0:P}NAME)-1-{0:R}NAME+\(({0:R}NAME)^(2)+1))/(((2)/({0:P}NAME)-1-{0:R}NAME-\(({0:R}NAME)^(2)-1)))))
.EQN 27 -1 220 0 0
{0:F.2p}NAME({0:Th.i}NAME,{0:Th.o}NAME,{0:Tc.i}NAME,{0:Tc.o}NAME):((\(((({0:Th.i}NAME-{0:Th.o}NAME)/({0:Tc.i}NAME-{0:Tc.o}NAME)))^(2)+1))/(({0:Th.i}NAME-{0:Th.o}NAME)/({0:Tc.i}NAME-{0:Tc.o}NAME)-1)*{0:log}NAME((1-({0:Tc.o}NAME-{0:Tc.i}NAME)/({0:Th.i}NAME-
{0:Tc.i}NAME))/(1-({0:Tc.o}NAME-{0:Tc.i}NAME)/({0:Th.i}NAME-{0:Tc.i}NAME)*({0:Th.i}NAME-{0:Th.o}NAME)/({0:Tc.i}NAME-{0:Tc.o}NAME))))/({0:log}NAME(((2)/(({0:Tc.o}NAME-{0:Tc.i}NAME)/({0:Th.i}NAME-{0:Tc.i}NAME))-1-({0:Th.i}NAME-{0:Th.o}NAME)/({0:Tc.i}NAME-
{0:Tc.o}NAME)+\(((({0:Th.i}NAME-{0:Th.o}NAME)/({0:Tc.i}NAME-{0:Tc.o}NAME)))^(2)+1))/((2)/(({0:Tc.o}NAME-{0:Tc.i}NAME)/({0:Th.i}NAME-{0:Tc.i}NAME))-1-({0:Th.i}NAME-{0:Th.o}NAME)/({0:Tc.i}NAME-{0:Tc.o}NAME)-\(((({0:Th.i}NAME-{0:Th.o}NAME)/({0:Tc.i}NAME-
{0:Tc.o}NAME)))^(2)-1))))