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�T5���?�il��7��?���6A_p��?d��?OpD��hȧ��OpD��hȧ�s��� �����?OpD��hȧ��OpD��hȧ�s�(�2�U@��?OpD��hȧ��OpD��hȧ�s">?>j=|��?OpD��hȧ��OpD��hȧ�s�|���h�� ��?OpD��hȧ��OpD��hȧ�sr;� @�Xp��?OpD��hȧ��OpD��hȧ�s��1�6� [���?OpD��hȧ��OpD��hȧ�s1��]������?OpD��hȧ��OpD��hȧ�sM �t �� �� ���?OpD��hȧ��OpD��hȧ�s� � k� �� ���?OpD��hȧ��OpD��hȧ�s� � � � � � � ���?OpD��hȧ��OpD��hȧ�sf *o |� �� %��?OpD��hȧ��OpD��hȧ�srB�T�g9��?OpD��hȧ��OpD��hȧ�s�����1���?OpD��hȧ��OpD��hȧ�s��?OpD��hȧ��OpD��hȧ�s��?OpD��hȧ��OpD��hȧ�s��?OpD��hȧ��OpD��hȧ�s��?OpD��hȧ��OpD��hȧ�s��?OpD��hȧ��OpD��hȧ�s��?OpD��hȧ��OpD��hȧ�s��?OpD��hȧ��OpD��hȧ�s��?OpD��hȧ��OpD��hȧ�s��?OpD��hȧ��OpD��hȧ�s��?OpD��hȧ��OpD��hȧ�s��?OpD��hȧ��OpD��hȧ�s��?OpD��hȧ��OpD��hȧ�smdot<� ��)����?OpD��hȧ��OpD��hȧ�s-�D������/�����`$�5x_� ���?��?�߾��?OpD��hȧ��OpD��hȧ�s��p��4�� 0'�C��������������������<� �c{������?OpD��hȧ��OpD��hȧ�s- `[�`A�epsilon��|����?��?OpD��hȧ��OpD��hȧ�s���deltaPnt.ColorclBlack Font.��� ���@B`��"����?OpD��hȧ��OpD��hȧ�s��sBoldOldCreateOrder Positio� densityairdthMHeightTabOr<� ��Ҿ�,����?OpD��hȧ��OpD��hȧ�skg/m^3� IsControl TBitBtn �betaCbetaBET<� �՟EVE;��?OpD��hȧ��OpD��hȧ�s-mTabOrder TRadioButtonSI�Red:betaBET<� ��� @OpD��hȧ��OpD��hȧ�s^p^�9 can be licensed fro�orificedrificeda2U0*���? k�{'aY��?OpD��hȧ��OpD��hȧ�s��D�VpipeVpipVPI<� ���x��-n��?OpD��hȧ��OpD��hȧ�s-��p^���Heighth��� viscosityscosit <� �5 ��4F��?OpD��hȧ��OpD��hȧ�skg/m-sĒB0�� "K� Vtestsectionsection<� ��w���ܞ�@OpD��hȧ��OpD��hȧ�s-�`�D�XHB� Retestsectionsectio<� �� @OpD��hȧ��OpD��hȧ�s -ection=Vtestsection*densityai�L^�densitya <� �a2U0*���?OpD��hȧ��OpD��hȧ�sDENSITYAIRp^p^`� AtestsectionSECTIONd��d���uŌ�� ��?�(A�G���?OpD��hȧ��OpD��hȧ�s�� ��T1�d�����"�@�@OpD��hȧ��OpD��hȧ�s���nMF�]��?���=�����P1��0�����������@�@OpD��hȧ��OpD��hȧ�s���`������D�rh12��������������?3333333��?OpD��hȧ��OpD��hȧ�s�������������mdot2�������������<� ��)����?OpD��hȧ��OpD��hȧ�sP^p^�h8���Apipe2������� t�3��?��KTo l��?OpD��hȧ��OpD��hȧ�s������� deltaPinwater��y���?��?OpD��hȧ��OpD��hȧ�s��- , ���� dppitotpipetotp <� ���?OpD��hȧ��OpD��hȧ�sentFontTLabelBlockVLef�dppitottestsectionsecti #<� ���?OpD��hȧ��OpD��hȧ�s77�37�33ps39�w�37�7�3339��dppitotpipewaterpewater #<� ���?OpD��hȧ��OpD��hȧ�s�dppitottestsectionwateronwa$<� ���?OpD��hȧ��OpD��hȧ�sth�HeightCaptionStop�dppitottestsectests<� ���?OpD��hȧ��OpD��hȧ�s=Vtestsection^2/2*densityair�dppitottestsecwaterecwa #<� ���?OpD��hȧ��OpD��hȧ�s^D����������deltaPmicrotectorotecto #<� ���?OpD��hȧ��OpD��hȧ�s_����F��������!�cylinderdiameterDH"���������?��?OpD��hȧ��OpD��hȧ�s��wu���s���[��,e�X���?� ("�(4Lx5[((b�Kr((x�a�((>M� 9� Calculate����������������������������������������������������������������������������������������������������������������������������;�O��n���;�O��n��? ףp= ף�?;�O��n��?#�GG�ŧ�? 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=