summaryrefslogtreecommitdiff
path: root/3828/CH1/EX1.7/Ex1_7.sce
diff options
context:
space:
mode:
Diffstat (limited to '3828/CH1/EX1.7/Ex1_7.sce')
-rw-r--r--3828/CH1/EX1.7/Ex1_7.sce17
1 files changed, 17 insertions, 0 deletions
diff --git a/3828/CH1/EX1.7/Ex1_7.sce b/3828/CH1/EX1.7/Ex1_7.sce
new file mode 100644
index 000000000..11449f9b5
--- /dev/null
+++ b/3828/CH1/EX1.7/Ex1_7.sce
@@ -0,0 +1,17 @@
+//Chapter 1 : Wave Optics
+
+clear;
+
+//Variable declaration
+lamda=5890*10**-10 //wavelength
+myu=1.33 //refractive index of glass
+n=1 //first minimum
+r=45 //angle in degrees
+cos_r=0.707
+
+//Calculations
+t=(n*lamda)/(2*myu*cos_r)/10**-7
+
+//Result
+mprintf("Thickness of the film t= %.3f*10**-4 mm",t)
+