From f35ea80659b6a49d1bb2ce1d7d002583f3f40947 Mon Sep 17 00:00:00 2001
From: prashantsinalkar
Date: Tue, 10 Oct 2017 12:38:01 +0530
Subject: updated the code

---
 32/CH16/EX16.10/16_10.sce | 65 ++++++++++++++++++++++++-----------------------
 1 file changed, 33 insertions(+), 32 deletions(-)

(limited to '32/CH16')

diff --git a/32/CH16/EX16.10/16_10.sce b/32/CH16/EX16.10/16_10.sce
index b0b0942e5..5fd56b277 100755
--- a/32/CH16/EX16.10/16_10.sce
+++ b/32/CH16/EX16.10/16_10.sce
@@ -1,33 +1,34 @@
-//pathname=get_absolute_file_path('16.10.sce')
-//filename=pathname+filesep()+'16.10-data.sci'
-//exec(filename)
-//Barometer reading(in cm):
-h=75.6
-//Density of mercury(in kg/cm^3):
-d=0.013591
-//Diameter of orifice(in m):
-d1=15*10^(-3)
-//Coefficient of discharge:
-r1=0.65
-//Acceleration due to gravity(in m/s^2):
-g=9.81
-//Atmospheric temperature(in K):
-T=25+273
-//Manometer reading(in cm):
-h1=13
-//Cross-sectional area of orifice(in m^2):
-A=%pi*d1^2/4
-//Atmospheric pressure(in kPa):
-p=h*d*g*10
-//Specific volume at atmospheric conditions(in m^3/kg):
-v=(R*T)/p
-//Density of air(in kg/m^3):
-da=1/v
-//Pressure difference across orifice(in kPa):
-pd=h1*d*g*10
-//Height of air column(in m):
-ha=pd*10^3/(da*g)
-//Free air delivery(in m^3/min):
-f=r1*A*sqrt(2*g*ha)*60
-printf("\n RESULT \n")
+//pathname=get_absolute_file_path('16.10.sce')
+//filename=pathname+filesep()+'16.10-data.sci'
+//exec(filename)
+R = 0.287;
+//Barometer reading(in cm):
+h=75.6
+//Density of mercury(in kg/cm^3):
+d=0.013591
+//Diameter of orifice(in m):
+d1=15*10^(-3)
+//Coefficient of discharge:
+r1=0.65
+//Acceleration due to gravity(in m/s^2):
+g=9.81
+//Atmospheric temperature(in K):
+T=25+273
+//Manometer reading(in cm):
+h1=13
+//Cross-sectional area of orifice(in m^2):
+A=%pi*d1^2/4
+//Atmospheric pressure(in kPa):
+p=h*d*g*10
+//Specific volume at atmospheric conditions(in m^3/kg):
+v=(R*T)/p
+//Density of air(in kg/m^3):
+da=1/v
+//Pressure difference across orifice(in kPa):
+pd=h1*d*g*10
+//Height of air column(in m):
+ha=pd*10^3/(da*g)
+//Free air delivery(in m^3/min):
+f=r1*A*sqrt(2*g*ha)*60
+printf("\n RESULT \n")
 printf("\nFree air delivery = %f m^3/min",f)
\ No newline at end of file
-- 
cgit