summaryrefslogtreecommitdiff
path: root/1271/CH3/EX3.9/example3_9.sce
blob: 386fa8edb53a6b04f58ce3e7fe5b7bf948a0b424 (plain)
1
2
3
4
5
6
7
8
clc 
// Given that
r = 3 / 4 // ratio of intensity of transmitted light to the intensity of incident light
// Sample Problem 9 on page no. 3.26
printf("\n # PROBLEM 9 # \n")
theta = acos(sqrt(r)) * (180 / %pi) // calculation for angle between the nicol prisms
printf("\n Standard formula used \n theta = acos(sqrt(r)) * (180 / pi). \n") 
printf("\n Angle between the nicol prisms = %f degree",theta)