initial commit / add all books

9 files changed, 193 insertions, 0 deletions

diff --git a/3821/CH9/EX9.1/Example9_1.sce b/3821/CH9/EX9.1/Example9_1.sce
new file mode 100644
index 000000000..0ed0b5c20
--- /dev/null
+++ b/3821/CH9/EX9.1/Example9_1.sce
@@ -0,0 +1,23 @@
+///Chapter 9 Law Of Thermodynamics

+///Example 9.1 Page No:165

+/// Find Work interaction during the 4th processes 

+///Input data

+clc;

+clear;

+Qab=720;   //Heat transfer of 1st processes in KJ 

+Qbc=-80;   //Heat transfer of 2nd processes in KJ

+Qcd=40;    //Heat transfer of 3rd processes in KJ

+Qda=-640;  //Heat transfer of 4th processes in KJ

+Wab=-90;   //Work transfer of 1st processes in KJ

+Wbc=-50;   //Work transfer of 2nd processes in KJ

+Wcd=130;   //Work transfer of 3rd processes in KJ

+

+

+///Calculation

+///From the 1st law of thermodynamic for close system undergoing a cycle.

+

+//Work interaction during the 4th processes 

+Wda=((Qab+Qbc+Qcd+Qda)-(Wab+Wbc+Wcd)); 

+

+///Output

+printf('Work interaction during the 4th processes= %f KJ \n",Wda);

diff --git a/3821/CH9/EX9.2/Example9_2.sce b/3821/CH9/EX9.2/Example9_2.sce
new file mode 100644
index 000000000..b2d948472
--- /dev/null
+++ b/3821/CH9/EX9.2/Example9_2.sce
@@ -0,0 +1,21 @@
+///Chapter 9 Law Of Thermodynamics

+///Example 9.2 Page No:166

+///Find Quantity of heat transferred 

+///Input data

+clc;

+clear;

+                      //During compression

+W1=-9200;              //Stroke work done by the piston in Nm

+Nm1=-9.2;              //Nm of work done

+Q1=-50;                //Heat rejected during copression in KJ

+                      //During expansion

+W2=8400;               //Stroke work done by the piston in Nm

+Nm2=8.4;               //Nm of work done

+

+///Calculation;

+                      //Quantity of heat transferred

+Q2=-((Nm1+Nm2)+Q1);    //-sign for indicate heat is transferred

+

+

+///Output

+printf('Quantity of heat transferred= %f KJ \n',Q2);

diff --git a/3821/CH9/EX9.3/Example9_3.sce b/3821/CH9/EX9.3/Example9_3.sce
new file mode 100644
index 000000000..220b60b4c
--- /dev/null
+++ b/3821/CH9/EX9.3/Example9_3.sce
@@ -0,0 +1,18 @@
+///Chapter 9 Law Of Thermodynamics

+///Example 9.3 Page No:166

+/// Find Magnitude and direction of the third heat interation

+///input data

+clc;

+clear;

+W1=-20;                  //Work interaction to the fluid in KJ

+W2=42;                   //Work interaction from the fluid in KJ

+Q1=85;                   //Heat interaction to the fluid in KJ

+Q2=85;                   //Heat interaction to the fluid in KJ

+Q3=-50;                  //Heat interaction from the fluid in KJ

+

+///Calculation

+W3=((Q1+Q2+Q3)-(W1+W2)); //Magnitude and direction of the third heat interation

+

+

+///Output

+printf('Magnitude and direction of the third heat interation=%f KJ \n',W3);

diff --git a/3821/CH9/EX9.4/Example9_4.sce b/3821/CH9/EX9.4/Example9_4.sce
new file mode 100644
index 000000000..351e4568f
--- /dev/null
+++ b/3821/CH9/EX9.4/Example9_4.sce
@@ -0,0 +1,14 @@
+///Chapter 9 Law Of Thermodynamics

+///Example 9.4 Page No:168

+/// Find Work done and compression process of heat

+///Input data

+clc;

+clear;

+Q1=-2100;         //Non flow process losses heat in KJ

+deltaU=420;      //Gain heat

+

+///Calculation

+W=Q1-deltaU;      //Work done and compression process in KJ

+

+///Output

+printf('Work done and compression process= %f KJ \n',W);

diff --git a/3821/CH9/EX9.5/Example9_5.sce b/3821/CH9/EX9.5/Example9_5.sce
new file mode 100644
index 000000000..6945e2832
--- /dev/null
+++ b/3821/CH9/EX9.5/Example9_5.sce
@@ -0,0 +1,14 @@
+///Chapter 9 Law Of Thermodynamics

+//Example 9.5 Page No:168

+/// Find Change in interval energy

+///Input data

+clc;

+clear;

+W=-2000;      //Work input of panddle wheel in KJ

+Q1=-6000;     //Heat transferred to the surrounding from tank

+

+//Calculation

+deltaU=Q1-W;   //Change in interval energy

+

+///Output

+printf('change in interval energy drop= %f  KJ \n',deltaU);

diff --git a/3821/CH9/EX9.6/Example9_6.sce b/3821/CH9/EX9.6/Example9_6.sce
new file mode 100644
index 000000000..a7dd3c363
--- /dev/null
+++ b/3821/CH9/EX9.6/Example9_6.sce
@@ -0,0 +1,16 @@
+///Chapter 9 Law Of Thermodynamics

+///Example 9.6 Page No:169

+/// Find Heat transferred during the process

+///Input data

+clc;

+clear;

+U1=520;       //internal energy in KJ/Kg

+U2=350;       //internal energy in KJ/Kg

+W=-80;        //work done by the air in the cylinder KJ/kg

+

+///Calculation

+deltaU=U2-U1;

+Q1=deltaU+W;   //Heat transferred during the process

+

+///Output

+printf('Heat transferred during the process= %f KJ \n',Q1);

diff --git a/3821/CH9/EX9.7/Example9_7.sce b/3821/CH9/EX9.7/Example9_7.sce
new file mode 100644
index 000000000..48409f141
--- /dev/null
+++ b/3821/CH9/EX9.7/Example9_7.sce
@@ -0,0 +1,17 @@
+///Chapter 9 Law Of Thermodynamics

+////Example 9.7 Page No:169

+///Find Steam flow rate

+///Input data

+clc;

+clear;

+W1=800;              //Power of turbine shaft Kw

+W2=-5;               //Work pump to feed in Kw  

+Q1=2700;             //Heat for steam generation KJ/Kg

+Q2=-1800;            //Condenser rejected heat KJ/Kg

+

+//Calculation

+m=((W1+W2)/(Q1+Q2)); //Steam flow rate in Kg/h

+

+

+//Output

+printf('Steam flow rate= %f Kg/s \n",m);

diff --git a/3821/CH9/EX9.8/Example9_8.sce b/3821/CH9/EX9.8/Example9_8.sce
new file mode 100644
index 000000000..530a739ba
--- /dev/null
+++ b/3821/CH9/EX9.8/Example9_8.sce
@@ -0,0 +1,38 @@
+///Chapter 9 Law Of Thermodynamics

+///Example 9.8 Page No:170

+/// Find DeltaUab

+///input data

+clc;

+clear;

+///Data consistent with first law pf thermodynamics

+Qabcd=-22;                    //In KJ

+N=150;                        //In Cycles/min

+Qab=17580;                    //In KJ/min

+Qbc=0; 

+Qcd=-3660;                    //In KJ/min

+Wab=-8160;                    //In KJ/min

+Wbc=4170;                    //In KJ/min 

+DeltaUcd=-21630;              //In KJ/min

+

+

+///Calculation

+DeltaUab=Qab-Wab;              //In KJ/min

+DeltaUbc=Qbc-Wbc;              //In KJ/min 

+Wcd=Qcd-DeltaUcd;              //In KJ/min

+Qabcd1=-220*150;               //In KJ/min

+Qda=((Qabcd1)-(Qab+Qbc+Qcd));  //In KJ/min

+Wda=((Qabcd1)-(Wab+Wbc+Wcd));     //In KJ/min

+DeltaUabcd=0;

+DeltaUda=((DeltaUabcd)-(DeltaUab+DeltaUbc+DeltaUcd)); //In KJ/min

+NWO=Qabcd1/60;                   //In KW

+

+///Output

+printf('DeltaUab= %f Kj/min \n ',DeltaUab);

+printf('DeltaUbc= %f KJ/min \n ',DeltaUbc);

+printf('Wcd=%f KJ/min \n ',Wcd);

+printf('Qabcd1= %f KJ/min \n ',Qabcd1);

+printf('Qda= %f KJ/min \n ',Qda);

+printf('Wda= %f KJ/min \n ',Wda);

+printf('DeltaUabcd= %f KJ/min \n ',DeltaUabcd);

+printf('DeltaUda= %f KJ/min \n',DeltaUda);

+printf('NWO= %f Kw \n',NWO);

diff --git a/3821/CH9/EX9.9/Example9_9.sce b/3821/CH9/EX9.9/Example9_9.sce
new file mode 100644
index 000000000..d68b5a2c6
--- /dev/null
+++ b/3821/CH9/EX9.9/Example9_9.sce
@@ -0,0 +1,32 @@
+///Chapter 9 Law Of Thermodynamics

+///Example 9.9 Page No:171

+///Find Net heat transfer in 1st cycle

+///Input data

+clc;

+clear;

+Qab=-6500;  //Heat transferred in 1st process KJ/min

+Qbc=0;      //Heat transferred in 2nd process 

+Qcd=-10200; //Heat transferred in 3rd process KJ/min

+Qda=32600;  //Heat transferred in 4th process KJ/min

+Wab=-1050;  //Heat transferred in 1st process KJ

+Wbc=-3450;  //Heat transferred in 2nd process KJ

+Wcd=20400;  //Heat transferred in 3rd process KJ

+Wda=0;      //Heat transferred in 4th process

+

+///Calculator

+dQ=Qab+Qbc+Qcd+Qda; //Net heat transfer in 1st cycle

+dW=Wab+Wbc+Wcd+Wda; //Net work done in 1st cycle

+dW1=dW/60;          //Net work done in 1st cycle

+DeltaUab=Qab-Wab;   //ab process

+DeltaUbc=Qbc-Wbc;   //bc processes

+DeltaUcd=Qcd-Wcd;   //cd processes

+DeltaUda=Qda-Wda;   //dc processes

+

+///Output

+printf('Net heat transfer in 1st cycle= %f KJ/min \n',dQ);

+printf('Net work done in 1st cycle= %f KJ/min \n',dW);

+printf('Net work done in 1st cycle=%f KW \n ',dW1);

+printf('ab process= %f KJ/min \n',DeltaUab);

+printf('bc processes= %f KJ/min \n ',DeltaUbc);

+printf('cd processes= %f KJ/min \n ',DeltaUcd);

+printf('dc processes= %f KJ/min \n',DeltaUda);