blob: 9823f2724c6c35bb96a29cd08e294c56fe2a043e (
plain)
1
2
3
4
5
6
7
|
clc;
clear all;
delta = 0.02; // Relative refractive index
n1 = 1.48; // Refractive index of the core
r = 1-delta; // r = (n2/n1)
thetac = asind(r); // Critical Angle
disp('Degrees',thetac,'The critical angle of fiber is')
|
