summaryrefslogtreecommitdiff
path: root/2219/CH11/EX11.9
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /2219/CH11/EX11.9
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '2219/CH11/EX11.9')
-rwxr-xr-x2219/CH11/EX11.9/Ex11_9.sce18
1 files changed, 18 insertions, 0 deletions
diff --git a/2219/CH11/EX11.9/Ex11_9.sce b/2219/CH11/EX11.9/Ex11_9.sce
new file mode 100755
index 000000000..2d708715b
--- /dev/null
+++ b/2219/CH11/EX11.9/Ex11_9.sce
@@ -0,0 +1,18 @@
+// Chapter 11 example 9
+//------------------------------------------------------------------------------
+clc;
+clear;
+// Given data
+farth = 30000; // farthest point in satellite elliptic eccentric orbit
+closest = 200; // closest point in satellite elliptic eccentric orbit
+Re = 6370; // Radius of earth in km
+
+// Calculations
+Apogee = farth + Re; // Apogee in km
+Perigee = closest + Re; // perigee in km
+a = (Apogee + Perigee)/(2); // semi-major axis
+e = (Apogee - Perigee)/(2*a); // orbit eccentricity
+
+// Output
+mprintf('Apogee = %d km\n Perigee = %d km\n orbit eccentricity = %3.3f',Apogee,Perigee,e);
+//------------------------------------------------------------------------------