diff options
Diffstat (limited to '3875/CH5/EX5.5/Ex5_5.sce')
| -rw-r--r-- | 3875/CH5/EX5.5/Ex5_5.sce | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/3875/CH5/EX5.5/Ex5_5.sce b/3875/CH5/EX5.5/Ex5_5.sce new file mode 100644 index 000000000..e3e2a9cac --- /dev/null +++ b/3875/CH5/EX5.5/Ex5_5.sce @@ -0,0 +1,16 @@ +clc;
+clear;
+lambda1=5016*10^-8 //wavelength in cm
+lambda2=5048*10^-8 //wavelength in cm
+N=15000 //lines per inch
+k=2
+
+//calculation
+e=2.54/N //in cm
+theta1_degrees= floor(asin((2*lambda1)/e)*(180/%pi)) //degrees part of angle
+theta1_minutes=ceil((asin((2*lambda1)/e)*(180/%pi)-theta1_degrees)*60) //minutes part of angle
+theta2_degrees = floor(asin((2*lambda2)/e)*(180/%pi)) //degrees part of angle
+theta2_minutes=ceil((asin((2*lambda2)/e)*(180/%pi)-theta2_degrees)*60) //minutes part of angle
+
+
+printf("Angle of separation = %d degrees %d minutes",(theta2_degrees-theta1_degrees),(theta2_minutes-theta1_minutes))
|