summaryrefslogtreecommitdiff
path: root/1397/CH8/EX8.4/8_4.sce
blob: 0f8fea7bb275e0a07efe55b06373589fda048b9a (plain)
1
2
3
4
5
6
7
8
//clc();
clear;
//To calculate angle of acceptance
n1=1.563;         //refractive index of core
n2=1.498;         //refractive index of cladding
NA=sqrt(n1^2-n2^2);
theta0=asind(NA);
printf("angle of acceptance is %f degrees",theta0);