summaryrefslogtreecommitdiff
path: root/1397/CH8/EX8.3/8_3.sce
blob: 1be643ba7024aed7968b056feea614f8f073aebb (plain)
1
2
3
4
5
6
7
8
//clc();
clear;
//To calculate numerical aperture
n1=1.55;         //refractive index of core
n2=1.50;         //refractive index of cladding
n0=1;
NA=sqrt(n1^2-n2^2)/n0;
printf("numerical aperture is %f",NA);