summaryrefslogtreecommitdiff
path: root/1172/CH1/EX1.29/Example1_29.sce
blob: 3c3dcd310b18ab398bae6d706d2aa7790c9c6024 (plain)
1
2
3
4
5
6
7
8
9
10
clc
// Given That
theta = 60 // angle between plane of vibration of incident beam with optic axis

//Sample Problem 29 Page No. 859
printf("\n # Problem 29 # \n ")
printf("Standard formula used is \n I = A^2*cos^2(theta) \n")
ratio = (tan(theta*%pi /180))^2    // ratio of extraordinary and aordinary intensites
printf("Ratio of extraordinary and ordinary intensites is %f .", ratio)