summaryrefslogtreecommitdiff
path: root/3768/CH12/EX12.5/Ex12_5.sce
blob: 4035f5170d8cb1147e1a5e59331a2c5f8f78a96d (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
//Example number 12.5, Page number 265

clc;clear;
close;

//Variable declaration
n1=1.53;          //Core refractive index
n2=1.42;          //Cladding refractive index
//Calculation
thetac=asin(n2/n1);     //critical angle(radian)
thetac=thetac*180/%pi;    //critical angle(degrees)
//Resul"
printf("critical angle is %.2f degree",thetac)