summaryrefslogtreecommitdiff
path: root/3535/CH7/EX7.3/Ex7_3.sce
diff options
context:
space:
mode:
Diffstat (limited to '3535/CH7/EX7.3/Ex7_3.sce')
-rw-r--r--3535/CH7/EX7.3/Ex7_3.sce7
1 files changed, 7 insertions, 0 deletions
diff --git a/3535/CH7/EX7.3/Ex7_3.sce b/3535/CH7/EX7.3/Ex7_3.sce
new file mode 100644
index 000000000..0c5a178f7
--- /dev/null
+++ b/3535/CH7/EX7.3/Ex7_3.sce
@@ -0,0 +1,7 @@
+//Chapter 7, Example 7.3, Page 180
+clc
+clear
+// Absorption coefficient
+AbsC = 0.03343*((2*0.99985*0.333)+(2*0.00015*0.000506)+(0.99756*0.000190)+(0.00039*0.239)+(0.000160*0.00205))
+printf(" Absorption coefficient = %f cm^-1",AbsC)
+//Answers may vary due to round off error