blob: d99a4bfbc80b500f1c4794994600489ebe5fe203 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
|
// Chapter 11 example 5
//------------------------------------------------------------------------------
clc;
clear;
// Given data
h = 13622; // ht of circular orbit from earth's surface
Re = 6378; // Radius of earth in km
// Calculations
R = Re+h; // Radius of circular orbit
pimax = 180 - (2*acos(Re/R))*(180/%pi); // Maximum shadow angle
eclipmax_time = (pimax/360)*24; // maximum daily eclipse duration
// output
mprintf('maximum shadow angle = %3.1f°\n Maximum daily eclipse duration = %3.2f hours',pimax,eclipmax_time);
//------------------------------------------------------------------------------
|
