summaryrefslogtreecommitdiff
path: root/3768/CH12/EX12.1/Ex12_1.sce
blob: 66a17932dfcd0c3083700c46a104901ef8bd05b1 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
//Example number 12.1, Page number 263

clc;clear;
close;

//Variable declaration
NA=0.39;    //numerical aperture
delta=0.05;     //refractive index of cladding
//Calculation
n1=NA/sqrt(2*delta);      //refractive index of core
//Result
printf("refractive index of core is %.3f",n1)