blob: 2497c94dec895e83e1feb4e238bf6a7fa93577c5 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
|
//Chapter 5 : Fibre Optics
clear;
//Variable declaration
n1=1.6 //core refractive index
NA=0.2 //Numerical aperture
//Calculations
NA=(n1**2-NA**2)**0.5
//Result
mprintf("Refractive index of cladding= %f",NA)
|