summaryrefslogtreecommitdiff
path: root/3768/CH12/EX12.9/Ex12_9.sce
blob: 7dbb272b9149a30670ea8ebaa2e9302fc08c7ee5 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
//Example number 12.9, Page number 266

clc;clear;
close;

//Variable declaration
n2=1.3;          //Cladding refractive index
delta=0.140;    //fractional index change
//Calculation
n1=n2/(1-delta);     //Core refractive index
//Result
printf("refractive index of core is %.2f",n1)