diff options
Diffstat (limited to '3840/CH11/EX11.8/Ex11_8.sce')
| -rw-r--r-- | 3840/CH11/EX11.8/Ex11_8.sce | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/3840/CH11/EX11.8/Ex11_8.sce b/3840/CH11/EX11.8/Ex11_8.sce new file mode 100644 index 000000000..8b7d46ee7 --- /dev/null +++ b/3840/CH11/EX11.8/Ex11_8.sce @@ -0,0 +1,17 @@ +clear +// +// +// + +//Variable declaration +NA=0.33 //numerical aperture +delta=0.02 //refractive index of cladding + +//Calculation +x=1-delta +n1=sqrt(NA**2/(1-x**2)) //refractive index of core +n2=x*n1 //refractive index of cladding + +//Result +printf("\n refractive index of core is %0.4f ",n1) +printf("\n refractive index of cladding is %0.3f ",n2) |