diff options
Diffstat (limited to '2414/CH17/EX17.2/Ex17_2.sce')
| -rwxr-xr-x | 2414/CH17/EX17.2/Ex17_2.sce | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/2414/CH17/EX17.2/Ex17_2.sce b/2414/CH17/EX17.2/Ex17_2.sce new file mode 100755 index 000000000..19e0b3381 --- /dev/null +++ b/2414/CH17/EX17.2/Ex17_2.sce @@ -0,0 +1,9 @@ +clc;
+close();
+clear();
+//page no 548
+//prob no. 17.2
+L=37; //latitude in degree
+R=6400; H=36000; //from the text
+del=atan(R*sin(L*%pi/180)/(H+R*(1-cos(L*%pi/180)))) //Declination angle
+mprintf('The ange is %.2f degree\n',del*180/%pi);
|