summaryrefslogtreecommitdiff
path: root/3557/CH16/EX16.7/Ex16_7.sce
blob: 7021fe1471f7a1de42daf24ad5c1ca7ec8b783c1 (plain)
1
2
3
4
5
6
7
//Example 16.7//

ncladding=1.460;//index of refraction for cladding
ncore=1.470;// index of refraction for glass-fiber core
thethac=asind(ncladding/ncore)
mprintf("The value of ncore taken while calculating is ncore=1.479 but in the question the value of ncore is given n=1.470")
mprintf("\nthethac = %f degree ",thethac)