From b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b Mon Sep 17 00:00:00 2001 From: priyanka Date: Wed, 24 Jun 2015 15:03:17 +0530 Subject: initial commit / add all books --- 2024/CH6/EX6.1/6_1.sce | 12 ++++++++++++ 2024/CH6/EX6.10/6_10.sce | 20 ++++++++++++++++++++ 2024/CH6/EX6.11/6_11.sce | 11 +++++++++++ 2024/CH6/EX6.2/6_2.sce | 9 +++++++++ 2024/CH6/EX6.3/6_3.sce | 16 ++++++++++++++++ 2024/CH6/EX6.4/6_4.sce | 11 +++++++++++ 2024/CH6/EX6.5/6_5.sce | 14 ++++++++++++++ 2024/CH6/EX6.6/6_6.sce | 17 +++++++++++++++++ 2024/CH6/EX6.7/6_7.sce | 16 ++++++++++++++++ 2024/CH6/EX6.8/6_8.sce | 12 ++++++++++++ 10 files changed, 138 insertions(+) create mode 100755 2024/CH6/EX6.1/6_1.sce create mode 100755 2024/CH6/EX6.10/6_10.sce create mode 100755 2024/CH6/EX6.11/6_11.sce create mode 100755 2024/CH6/EX6.2/6_2.sce create mode 100755 2024/CH6/EX6.3/6_3.sce create mode 100755 2024/CH6/EX6.4/6_4.sce create mode 100755 2024/CH6/EX6.5/6_5.sce create mode 100755 2024/CH6/EX6.6/6_6.sce create mode 100755 2024/CH6/EX6.7/6_7.sce create mode 100755 2024/CH6/EX6.8/6_8.sce (limited to '2024/CH6') diff --git a/2024/CH6/EX6.1/6_1.sce b/2024/CH6/EX6.1/6_1.sce new file mode 100755 index 000000000..5ce26c65c --- /dev/null +++ b/2024/CH6/EX6.1/6_1.sce @@ -0,0 +1,12 @@ +clc +//Initialization of variables +m=1 //lbm +T=32+460 //R +//calculations +disp("From steam tables") +hf=0 +p=0.08854 //psi +vf=0.01602 //ft^3 +u = hf- p*vf*144/778.16 +//results +printf("Internal energy = %.7f Btu/lbm",u) diff --git a/2024/CH6/EX6.10/6_10.sce b/2024/CH6/EX6.10/6_10.sce new file mode 100755 index 000000000..cefa1ca84 --- /dev/null +++ b/2024/CH6/EX6.10/6_10.sce @@ -0,0 +1,20 @@ +clc +//Initialization of variables +h1=1220.4 //Btu/lbm +s1=1.6050 //Btu/lbm R +s2=1.6050 //Btu/lbm R +p2=3 //psia +sf=0.2008 //Btu/lbm R +hf=109.37 +sfg=1.6855 //Btu/lbm R +hfg=1013.2 //Btu/lbm +eta=0.7 +//calculations +x= (s2-sf)/sfg +h2=hf+ x*hfg +Wrev= h1-h2 +w=eta*Wrev +//results +printf("Work done = %d Btu/lbm",Wrev) +printf("\n Work done in case 2 = %.1f Btu/lbm",w) +//The asnwer is a bit different due to rounding off error int he textbook diff --git a/2024/CH6/EX6.11/6_11.sce b/2024/CH6/EX6.11/6_11.sce new file mode 100755 index 000000000..afb0fb846 --- /dev/null +++ b/2024/CH6/EX6.11/6_11.sce @@ -0,0 +1,11 @@ +clc +//Initialization of variables +disp("From steam tables,") +hb=1192.8 //Btu/lbm +ha=hb +hf=330.51 //Btu/lbm +hfg=863.6 //Btu/lbm +//calculations +x=(ha-hf)/hfg +//results +printf("Quality of wet steam = %.1f percent",x*100) diff --git a/2024/CH6/EX6.2/6_2.sce b/2024/CH6/EX6.2/6_2.sce new file mode 100755 index 000000000..d9bd766a8 --- /dev/null +++ b/2024/CH6/EX6.2/6_2.sce @@ -0,0 +1,9 @@ +clc +//Initialization of variables +T=35+459.6 //R +//calculations +disp("From steam tables,") +hfg=1074.1 //Btu/lbm +ds=hfg/T +//results +printf("Change in entropy = %.4f Btu/lbm R",ds) diff --git a/2024/CH6/EX6.3/6_3.sce b/2024/CH6/EX6.3/6_3.sce new file mode 100755 index 000000000..54cc97882 --- /dev/null +++ b/2024/CH6/EX6.3/6_3.sce @@ -0,0 +1,16 @@ +clc +//Initialization of variables +p=3 //psi +x=0.35 +//calculations +printf("From steam tables,") +p=3 //psi +vf=0.01630 //ft^3/lbm +vg=118.71 //ft^3/lbm +hf=109.37 //Btu/lbm +hfg=1013.2 //Btu/lbm +vx=vf+x*(vg-vf) +hx=hf+x*(hfg) +//results +printf("specific volume = %.1f ft^3/lbm",vx) +printf("\n specific enthalpy = %.1f Btu/lbm",hx) diff --git a/2024/CH6/EX6.4/6_4.sce b/2024/CH6/EX6.4/6_4.sce new file mode 100755 index 000000000..d1c332846 --- /dev/null +++ b/2024/CH6/EX6.4/6_4.sce @@ -0,0 +1,11 @@ +clc +//Initialization of variables +disp("From steam tables,") +T1=355.21 //F +T2=500 //F +hg=1193.4 //Btu/lbm +h=1274.8 //Btu/lbm +//calculations +Qrev=h-hg +//results +printf("Heat transferred = %.1f Btu/lbm",Qrev) diff --git a/2024/CH6/EX6.5/6_5.sce b/2024/CH6/EX6.5/6_5.sce new file mode 100755 index 000000000..97cce0617 --- /dev/null +++ b/2024/CH6/EX6.5/6_5.sce @@ -0,0 +1,14 @@ +clc +//Initialization of variables +Qrev=81.4 //Btu/lbm +T1=355.21 //F +T2=500 //F +cp=0.562 +//calculations +cp=Qrev/(T2-T1) +ds=cp*(log((460+T2)/(460+T1))) +s1=1.5728 +s2=s1+ds +//results +printf("Change in entropy = %.4f Btu/lbm F",ds) +printf("\n Final entropy = %.4f Btu/lbm F",s2) diff --git a/2024/CH6/EX6.6/6_6.sce b/2024/CH6/EX6.6/6_6.sce new file mode 100755 index 000000000..2a9c9a18f --- /dev/null +++ b/2024/CH6/EX6.6/6_6.sce @@ -0,0 +1,17 @@ +clc +//Initialization of variables +m=1 //lbm +P1=144 //psia +P2=150 //psia +t1=360 //F +J=778.16 +//calculations +disp("From steam tables,") +v1=3.160 //ft^3/lbm +h1=1196.5 //Btu/lbm +u1=h1-P1*v1*144/J +h2=1211.4 //Btu/lbm +u2=h2 - P2*144*v1/J +Qrev=u2-u1 +//results +printf("Heat transferred = %.1f Btu/lbm",Qrev) diff --git a/2024/CH6/EX6.7/6_7.sce b/2024/CH6/EX6.7/6_7.sce new file mode 100755 index 000000000..5311e762b --- /dev/null +++ b/2024/CH6/EX6.7/6_7.sce @@ -0,0 +1,16 @@ +clc +//Initialization of variables +sf=0.12948 +dt=0.32 //F +t1=100 //F +x=0.6 +//calculations +t2=t1+dt +hf=67.97 +ht=2.7 +hp=0.3 +h2=hf+ht+hp +Wrev=hf-h2 +Wact=Wrev/x +//results +printf("Actual work done = %.1f Btu/lbm",Wact) diff --git a/2024/CH6/EX6.8/6_8.sce b/2024/CH6/EX6.8/6_8.sce new file mode 100755 index 000000000..7ffa8f462 --- /dev/null +++ b/2024/CH6/EX6.8/6_8.sce @@ -0,0 +1,12 @@ +clc +//Initialization of variables +p1=1000 //psia +t1=100.32 //F +h1=70.97 //Btu/lbm +p2=1000 //psia +t2=544.61 //F +h2=1191.8 //Btu/lbm +//calculations +Qrev=h2-h1 +//results +printf("Heat transferred = %.1f Btu/lbm",Qrev) -- cgit