diff options
Diffstat (limited to '3020/CH12/EX12.8/ex12_8.sce')
-rwxr-xr-x | 3020/CH12/EX12.8/ex12_8.sce | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/3020/CH12/EX12.8/ex12_8.sce b/3020/CH12/EX12.8/ex12_8.sce new file mode 100755 index 000000000..3f7f545c4 --- /dev/null +++ b/3020/CH12/EX12.8/ex12_8.sce @@ -0,0 +1,8 @@ +clc;
+clear all;
+delta = 0.015; // Relative refractive index
+NA = 0.27;// Numerical Aperture
+n1 = NA/(sqrt(2*delta)); //The refractive index of core
+n2 = n1*(1-delta); // The refractice index of cladding
+disp('',n1,'The refractive index of core is')
+disp('',n2,'The refractive index of cladding is')
|