X7.714锟�
锟�yBK{Instructions: Enter the cylinder diameter, temperature, and pressure drop across the orifice plate below. Then hit solve. You can Retestsection, which is the Reynolds number based on the heat pipe diameter and the air velocity in the test section.}
{Enter the heat pipe diameter here, in meters. The number initially given here is not the correct number.}
cylinderdiameter=0.05
{Enter inlet air temperature in degrees C here}
T1=20
{Enter the pressure drop across the orifice plate in inches of water here}
deltaPinwater=0.5
{orifice plate equations}
mdot=pi/4*orificed^2*C*epsilon*(2*deltaP*densityair/(1-beta^4))^0.5 {This equation calculates the mass flow rate of air through the orifice plate.}
epsilon=1 {This is a compressibility factor -- it's 1 since we have very low-speed flow and compressibility effects are negligible}
C=0.5959+0.0312*beta^2.1-0.184*beta^8+0.039*beta^4/(1-beta)-0.01584*beta^3+91.71*beta^2.5*Red^(-0.75)
{This is a correlation supplied by ASME that allows the mass flow rate to be found very accurately for different size orifice plates}
beta=orificed/D {orifice diameter divided by pipe diameter}
mdot=Vpipe*Apipe*densityair
{find Re and V in test section}
Vpipe=Red*viscosity/D/densityair {velocity in the pipe}
Vtestsection=Vpipe*Apipe/Atestsection {velocity in the test section}
Retestsection=Vtestsection*densityair*cylinderdiameter/viscosity {Reynolds number in the test section based on cylinder diameter}
D=0.202717 {pipe diameter in meters}
orificed=0.0508 {diameter of hole in orifice plate}
Atestsection=0.064516 {Atestsection=100 in2 This is the test section cross-sectional area.}
Apipe=pi*D^2/4 {Pipe cross-sectional area}
{Air Property data}
densityair=DENSITY(AirH2O,T=T1,P=P1,r=rh1)
viscosity=VISCOSITY(AirH2O,T=T1,P=P1,r=rh1)
{room pressure in kPa, assuming 1 bar}
P1=101.9
{relative humidity ; it has a negligible effect, so we didn't measure it}
rh1=0.40
deltaPinwater=deltaP*0.004015 {this converts inches of water to Pa}
{$ID$ #91: Educational version distributed by McGraw-Hill}(,h锟絋5锟斤拷锟�?锟絠l锟�锟�7锟斤拷?锟斤拷锟�6A_p锟斤拷?d锟斤拷?OpD锟斤拷h颧锟斤拷OpD锟斤拷h颧锟絪锟�锟�锟� 锟�锟�锟�锟斤拷?OpD锟斤拷h颧锟斤拷OpD锟斤拷h颧锟絪锟�(锟�2锟�U@锟斤拷?OpD锟斤拷h颧锟斤拷OpD锟斤拷h颧锟絪">?>j=|锟斤拷?OpD锟斤拷h颧锟斤拷OpD锟斤拷h颧锟絪锟�|锟�锟�锟�h锟�锟� 锟斤拷?OpD锟斤拷h颧锟斤拷OpD锟斤拷h颧锟絪r;锟� @锟�Xp锟斤拷?OpD锟斤拷h颧锟斤拷OpD锟斤拷h颧锟絪锟�锟�1锟�6锟� [锟�锟斤拷?OpD锟斤拷h颧锟斤拷OpD锟斤拷h颧锟絪1锟�锟�]锟�锟�锟�锟�锟斤拷?OpD锟斤拷h颧锟斤拷OpD锟斤拷h颧锟絪M 锟�t 锟�锟� 锟�锟� 锟�锟斤拷?OpD锟斤拷h颧锟斤拷OpD锟斤拷h颧锟絪锟�
锟�k锟�锟�锟�锟�锟斤拷?OpD锟斤拷h颧锟斤拷OpD锟斤拷h颧锟絪锟�锟�锟�锟�锟�锟�锟�锟�锟斤拷?OpD锟斤拷h颧锟斤拷OpD锟斤拷h颧锟絪f
*o
|锟�
锟�锟�
%锟斤拷?OpD锟斤拷h颧锟斤拷OpD锟斤拷h颧锟絪rB锟�T锟�g9锟斤拷?OpD锟斤拷h颧锟斤拷OpD锟斤拷h颧锟絪锟�锟�锟�锟�锟�1锟�锟斤拷?OpD锟斤拷h颧锟斤拷OpD锟斤拷h颧锟絪锟斤拷?OpD锟斤拷h颧锟斤拷OpD锟斤拷h颧锟絪锟斤拷?OpD锟斤拷h颧锟斤拷OpD锟斤拷h颧锟絪锟斤拷?OpD锟斤拷h颧锟斤拷OpD锟斤拷h颧锟絪锟斤拷?OpD锟斤拷h颧锟斤拷OpD锟斤拷h颧锟絪锟斤拷?OpD锟斤拷h颧锟斤拷OpD锟斤拷h颧锟絪锟斤拷?OpD锟斤拷h颧锟斤拷OpD锟斤拷h颧锟絪锟斤拷?OpD锟斤拷h颧锟斤拷OpD锟斤拷h颧锟絪锟斤拷?OpD锟斤拷h颧锟斤拷OpD锟斤拷h颧锟絪锟斤拷?OpD锟斤拷h颧锟斤拷OpD锟斤拷h颧锟絪锟斤拷?OpD锟斤拷h颧锟斤拷OpD锟斤拷h颧锟絪锟斤拷?OpD锟斤拷h颧锟斤拷OpD锟斤拷h颧锟絪锟斤拷?OpD锟斤拷h颧锟斤拷OpD锟斤拷h颧锟絪mdot<锟�锟斤拷)锟�锟斤拷锟�?OpD锟斤拷h颧锟斤拷OpD锟斤拷h颧锟絪-锟�D锟�锟�锟斤拷锟�锟�/锟�锟斤拷锟�锟絗$锟�5x_锟�锟斤拷锟�?锟斤拷?锟竭�锟斤拷?OpD锟斤拷h颧锟斤拷OpD锟斤拷h颧锟絪锟斤拷p锟斤拷4锟斤拷 0'锟�C锟�锟�锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷<锟�锟絚{锟斤拷锟斤拷锟斤拷?OpD锟斤拷h颧锟斤拷OpD锟斤拷h颧锟絪- `[锟絗A锟�epsilon锟斤拷|锟斤拷锟斤拷?锟斤拷?OpD锟斤拷h颧锟斤拷OpD锟斤拷h颧锟絪锟斤拷锟�deltaPnt.ColorclBlackFont.锟斤拷锟�
锟斤拷锟�@B`锟斤拷"锟斤拷锟斤拷?OpD锟斤拷h颧锟斤拷OpD锟斤拷h颧锟絪锟斤拷sBoldOldCreateOrder Positio锟�
densityairdthMHeightTabOr<锟�锟斤拷揖锟�,锟斤拷锟斤拷?OpD锟斤拷h颧锟斤拷OpD锟斤拷h颧锟絪kg/m^3锟� IsControl TBitBtn 锟�betaCbetaBET<锟�锟秸�EVE;锟斤拷?OpD锟斤拷h颧锟斤拷OpD锟斤拷h颧锟絪-mTabOrderTRadioButtonSI锟�Red:betaBET<锟�锟�锟斤拷@OpD锟斤拷h颧锟斤拷OpD锟斤拷h颧锟絪^p^锟�9 can be licensed fro锟�orificedrificeda2U0*锟�锟斤拷? k锟絳'aY锟斤拷?OpD锟斤拷h颧锟斤拷OpD锟斤拷h颧锟絪锟斤拷D锟�VpipeVpipVPI<锟�锟斤拷锟絰锟斤拷-n锟斤拷?OpD锟斤拷h颧锟斤拷OpD锟斤拷h颧锟絪-锟斤拷p^锟斤拷锟�Heighth锟斤拷锟� viscosityscosit <锟�锟�5
锟斤拷4F锟斤拷?OpD锟斤拷h颧锟斤拷OpD锟斤拷h颧锟絪kg/m-s膾B0锟斤拷
"K锟�Vtestsectionsection<锟�锟斤拷w锟斤拷锟杰烇拷@OpD锟斤拷h颧锟斤拷OpD锟斤拷h颧锟絪-锟絗锟�D锟�XHB锟�
Retestsectionsectio<锟�锟�锟�
@OpD锟斤拷h颧锟斤拷OpD锟斤拷h颧锟絪 -ection=Vtestsection*densityai锟�L^锟�densitya
<锟�锟絘2U0*锟�锟斤拷?OpD锟斤拷h颧锟斤拷OpD锟斤拷h颧锟絪DENSITYAIRp^p^`锟�AtestsectionSECTIONd锟斤拷d锟斤拷锟絬艑锟斤拷 锟斤拷?锟�(A锟紾锟斤拷锟�?OpD锟斤拷h颧锟斤拷OpD锟斤拷h颧锟絪锟斤拷
锟�锟�T1锟�d锟斤拷锟�锟�锟�"锟�@锟�@OpD锟斤拷h颧锟斤拷OpD锟斤拷h颧锟絪锟斤拷锟�nMF锟絔锟斤拷?锟斤拷锟�=锟斤拷锟斤拷锟�P1锟�锟�0锟�锟�锟�锟斤拷锟斤拷锟斤拷锟斤拷@锟�@OpD锟斤拷h颧锟斤拷OpD锟斤拷h颧锟絪锟斤拷锟�`锟斤拷锟�锟斤拷锟�D锟�rh12锟斤拷锟斤拷锟�锟斤拷锟斤拷锟斤拷锟斤拷锟�?3333333锟斤拷?OpD锟斤拷h颧锟斤拷OpD锟斤拷h颧锟絪锟斤拷锟�锟斤拷锟�锟�锟�锟斤拷锟斤拷锟�mdot2锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟�<锟�锟斤拷)锟�锟斤拷锟�?OpD锟斤拷h颧锟斤拷OpD锟斤拷h颧锟絪P^p^锟�h8锟斤拷锟�Apipe2锟斤拷锟�锟斤拷锟�锟� t锟�3锟斤拷?锟斤拷KTo
l锟斤拷?OpD锟斤拷h颧锟斤拷OpD锟斤拷h颧锟絪锟斤拷锟�锟斤拷锟�锟�
deltaPinwater锟�锟統锟�锟斤拷?锟斤拷?OpD锟斤拷h颧锟斤拷OpD锟斤拷h颧锟絪锟斤拷-
, 锟斤拷锟�锟�dppitotpipetotp<锟�锟�锟斤拷?OpD锟斤拷h颧锟斤拷OpD锟斤拷h颧锟絪entFontTLabelBlockVLef锟�dppitottestsectionsecti #<锟�锟�锟斤拷?OpD锟斤拷h颧锟斤拷OpD锟斤拷h颧锟絪77锟�37锟�33ps39锟絯锟�37锟�7锟�3339锟�锟�dppitotpipewaterpewater #<锟�锟�锟斤拷?OpD锟斤拷h颧锟斤拷OpD锟斤拷h颧锟絪锟�dppitottestsectionwateronwa$<锟�锟�锟斤拷?OpD锟斤拷h颧锟斤拷OpD锟斤拷h颧锟絪th锟�HeightCaptionStop锟�dppitottestsectests<锟�锟�锟斤拷?OpD锟斤拷h颧锟斤拷OpD锟斤拷h颧锟絪=Vtestsection^2/2*densityair锟�dppitottestsecwaterecwa #<锟�锟�锟斤拷?OpD锟斤拷h颧锟斤拷OpD锟斤拷h颧锟絪^D锟斤拷锟�锟斤拷锟斤拷锟斤拷锟�deltaPmicrotectorotecto #<锟�锟�锟斤拷?OpD锟斤拷h颧锟斤拷OpD锟斤拷h颧锟絪_锟斤拷锟斤拷F锟斤拷锟斤拷锟斤拷锟斤拷!锟�cylinderdiameterDH"锟斤拷锟斤拷锟斤拷锟斤拷锟�?锟斤拷?OpD锟斤拷h颧锟斤拷OpD锟斤拷h颧锟絪锟斤拷wu锟斤拷锟絪锟斤拷锟�[锟�锟�,e锟絏锟斤拷锟�?锟� ("锟�(4Lx5[((b锟�Kr((x锟�a锟�((>M锟�
9锟� Calculate锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷锟斤拷;锟絆锟斤拷n锟斤拷锟�;锟絆锟斤拷n锟斤拷?
祝p=
祝锟�?;锟絆锟斤拷n锟斤拷?#锟紾G锟脚э拷?
ColorA=000000
ColorB=FF0000
ColorC=0000FF
ColorD=408000
ColorE=800080
ColorF=004080
ColorG=00FFFF
ColorH=00FF00
ColorI=008080
ColorJ=FFFF80
ColorK=808080
ColorL=FF80FF
ColorM=C0C0C0
ColorN=800000
ColorO=808040
ColorP=4080FF=