summaryrefslogtreecommitdiff
path: root/3772/CH15/EX15.3/Ex15_3.sce
diff options
context:
space:
mode:
authorprashantsinalkar2017-10-10 12:27:19 +0530
committerprashantsinalkar2017-10-10 12:27:19 +0530
commit7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch)
treedbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /3772/CH15/EX15.3/Ex15_3.sce
parentb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff)
downloadScilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip
initial commit / add all books
Diffstat (limited to '3772/CH15/EX15.3/Ex15_3.sce')
-rw-r--r--3772/CH15/EX15.3/Ex15_3.sce21
1 files changed, 21 insertions, 0 deletions
diff --git a/3772/CH15/EX15.3/Ex15_3.sce b/3772/CH15/EX15.3/Ex15_3.sce
new file mode 100644
index 000000000..645fcad89
--- /dev/null
+++ b/3772/CH15/EX15.3/Ex15_3.sce
@@ -0,0 +1,21 @@
+// Problem no 15.3,Page no.352
+
+clc;clear;
+close;
+
+p=2*10**6 //MPa //Steam Pressure
+t=0.02 //m //thickness of boiler plate
+sigma_t=120*10**6 //MPa //Tensile stress
+sigma_l=120*10**6 //MPa //Longitudinal stress
+rho=0.90 //% //Efficiency of Longitudinal joint
+rho_e=0.40 //% //Efficiency of circumferential joint
+
+//Calculations
+
+D_1=sigma_t*2*t*rho*p**-1 //Diameter of boiler
+D_2=sigma_l*4*t*rho_e*p**-1 //Diameter of boiler
+
+//Max diameter of boiler is equal to minimum value of diameter
+
+//Result
+printf("Maximum diameter of boiler is %.2f",D_2);printf(" m")