summaryrefslogtreecommitdiff
path: root/2409/CH2/EX2.15/Ex2_15.sce
diff options
context:
space:
mode:
Diffstat (limited to '2409/CH2/EX2.15/Ex2_15.sce')
-rwxr-xr-x2409/CH2/EX2.15/Ex2_15.sce13
1 files changed, 13 insertions, 0 deletions
diff --git a/2409/CH2/EX2.15/Ex2_15.sce b/2409/CH2/EX2.15/Ex2_15.sce
new file mode 100755
index 000000000..fb68a7e94
--- /dev/null
+++ b/2409/CH2/EX2.15/Ex2_15.sce
@@ -0,0 +1,13 @@
+
+//Variable Declaration
+
+v=204.81 //True anomaly(degrees) from Example 2.14
+r=7257 //Magnitude of radius vector(km) from Example 2.14
+
+//Calculation
+
+rP=r*cos(v*%pi/180) //P coordinate of radius vector(km)
+rQ=r*sin(v*%pi/180) //Q coordinate of radius vector(km)
+
+//Result
+printf("r in the perifocal coordinate system is %.2f Pkm %.2f Qkm",rP,rQ)