path: root/1397/CH8/EX8.5/8_5.sce

//clc();
clear;
//To calculate critical angle
n1=1.53;         //refractive index of core
n2=1.42;         //refractive index of cladding
thetac=asind(n2/n1);
printf("critical angle is %f degrees",thetac);