summaryrefslogtreecommitdiff
path: root/3710/CH10/EX10.1/Ex10_1.sce
diff options
context:
space:
mode:
Diffstat (limited to '3710/CH10/EX10.1/Ex10_1.sce')
-rw-r--r--3710/CH10/EX10.1/Ex10_1.sce12
1 files changed, 12 insertions, 0 deletions
diff --git a/3710/CH10/EX10.1/Ex10_1.sce b/3710/CH10/EX10.1/Ex10_1.sce
new file mode 100644
index 000000000..9499d67e7
--- /dev/null
+++ b/3710/CH10/EX10.1/Ex10_1.sce
@@ -0,0 +1,12 @@
+//Example 10.1, Page Number 497
+//Sensor Periodicity
+clc;
+d=50*(10**-6) //Core Diameter in meters
+n2=1.48 //Core refractive index
+n1=1.46 //Cladding refractive index
+a=d/2//in meters
+
+n=(n2-n1)/n2;
+
+delta=(2*%pi*a)/(sqrt(2*n)); //delta is the microbending sensor periodicity
+disp(delta,"The Microbending Sensor Periodicity in m is:");