summaryrefslogtreecommitdiff
path: root/3472/CH42/EX42.7/Example42_7.sce
diff options
context:
space:
mode:
authorprashantsinalkar2017-10-10 12:27:19 +0530
committerprashantsinalkar2017-10-10 12:27:19 +0530
commit7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch)
treedbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /3472/CH42/EX42.7/Example42_7.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 '3472/CH42/EX42.7/Example42_7.sce')
-rw-r--r--3472/CH42/EX42.7/Example42_7.sce39
1 files changed, 39 insertions, 0 deletions
diff --git a/3472/CH42/EX42.7/Example42_7.sce b/3472/CH42/EX42.7/Example42_7.sce
new file mode 100644
index 000000000..749f4853e
--- /dev/null
+++ b/3472/CH42/EX42.7/Example42_7.sce
@@ -0,0 +1,39 @@
+// A Texbook on POWER SYSTEM ENGINEERING
+// A.Chakrabarti, M.L.Soni, P.V.Gupta, U.S.Bhatnagar
+// DHANPAT RAI & Co.
+// SECOND EDITION
+
+// PART IV : UTILIZATION AND TRACTION
+// CHAPTER 4: ILLUMINATION
+
+// EXAMPLE : 4.7 :
+// Page number 755
+clear ; clc ; close ; // Clear the work space and console
+
+// Given data
+d = 9.15 // Lamp space(m)
+h = 4.575 // Height(m)
+P = 100.0 // Power(candle)
+
+// Calculations
+theta_3_max = 0 // θ(°)
+cos_theta_3_max_cubic = cosd(theta_3_max)**3
+theta_4_max = atand(2) // θ(°)
+cos_theta_4_max_cubic = cosd(theta_4_max)**3
+theta_5_max = atand(4) // θ(°)
+cos_theta_5_max_cubic = cosd(theta_5_max)**3
+theta_6_max = atand(6) // θ(°)
+cos_theta_6_max_cubic = cosd(theta_6_max)**3
+I_max = P/h**2*(cos_theta_3_max_cubic+2*cos_theta_4_max_cubic+2*cos_theta_5_max_cubic+2*cos_theta_6_max_cubic) // Max illumination(lux)
+theta_4_min = atand(1) // θ(°)
+cos_theta_4_min_cubic = cosd(theta_4_min)**3
+theta_5_min = atand(3) // θ(°)
+cos_theta_5_min_cubic = cosd(theta_5_min)**3
+theta_6_min = atand(5) // θ(°)
+cos_theta_6_min_cubic = cosd(theta_6_min)**3
+I_min = P/h**2*2*(cos_theta_4_min_cubic+cos_theta_5_min_cubic+cos_theta_6_min_cubic) // Minimum illumination(lux)
+
+// Results
+disp("PART IV - EXAMPLE : 4.7 : SOLUTION :-")
+printf("\nMaximum illumination on the floor along the centre line = %.2f lux", I_max)
+printf("\nMinimum illumination on the floor along the centre line = %.2f lux", I_min)