summaryrefslogtreecommitdiff
path: root/3537/CH1/EX1.46/Ex1_46.sce
diff options
context:
space:
mode:
Diffstat (limited to '3537/CH1/EX1.46/Ex1_46.sce')
-rw-r--r--3537/CH1/EX1.46/Ex1_46.sce11
1 files changed, 11 insertions, 0 deletions
diff --git a/3537/CH1/EX1.46/Ex1_46.sce b/3537/CH1/EX1.46/Ex1_46.sce
new file mode 100644
index 000000000..340e1c019
--- /dev/null
+++ b/3537/CH1/EX1.46/Ex1_46.sce
@@ -0,0 +1,11 @@
+//Example 1_46
+clc();
+clear;
+//To find the least thickness of the glass plate
+lemda=6000 //units in angstroam
+lemda=6000*10^-8 //units in cm
+u=1.5
+r=50 //units in degree
+n=1 //n=1 for least thickness
+t=(n*lemda)/(2*u*cos(r*%pi/180))
+printf("Least Thickness of the glass plate is %.7f cm",t)