A sphere with three ocean waves in differing shades of blue. Next to the sphere, there is the bolded text "Ocean Color". Under that, there are two acronyms, separated by a vertical pipe: OB.DAAC (Ocean Biology Distributed Active Archive Center) and OBPG (Ocean Biology Processing Group).
Lorem
ipsum
dolor
sit
amet
Toggle navigation
Ocean Color Science Software
Jump to content
ocssw
V2022
web
ocssw
ocssw_src
include
ViirsGeo
Vcst_earth_radius.h
Go to the documentation of this file.
1
/*******************************************************************************
2
*
3
* NAME: Vcst_earth_radius
4
*
5
* DESCRIPTION: Computes the radius of the earth, in kilometers, from the
6
* geodetic latitude.
7
*
8
* USAGE: radius = earth_radius_D(rlat);
9
*
10
* PARAMETER TYPE I/O DESCRIPTION
11
* ----------- ----------- --- --------------------------------
12
* radius double O radius of earth in kilometers
13
* rlat double I geodetic latitude, radians, positive north
14
* ----------- ----------- --- --------------------------------
15
*
16
*
17
* DESCRIPTION: Computes the radius of the earth, in kilometers, from the
18
* geocentric latitude.
19
*
20
* USAGE: radius = Vcst_earth_radius_C(clat);
21
*
22
* PARAMETER TYPE I/O DESCRIPTION
23
* ----------- ----------- --- --------------------------------
24
* radius double O radius of earth in kilometers
25
* clat double I geocentric latitude, radians, positive north
26
* ----------- ----------- --- --------------------------------
27
*
28
* REFERENCES: USAF, Orbit Analyst Manuals, 1978
29
* The main reference for the WGS84 geoid is NIMA Physical Geodesy
30
* web page: 164.214.2.59/GandG/wgs-84/egm96.htm
31
*
32
* LIMITATIONS: Because this function is called millions of times, there is no
33
* error checking. Therefore, it is the responsibility of the calling program
34
* to ensure legal input values: -pio2 < rlat < pio2
35
*
36
* NOTES (MISCELLANEOUS) SECTION:
37
*
38
*******************************************************************************/
39
40
#ifndef _EARTH_RADIUS_H
41
#define _EARTH_RADIUS_H
42
43
44
#ifdef __cplusplus
45
extern
"C"
{
46
#endif
47
48
double
earth_radius_D
(
double
rlat);
49
50
double
earth_radius_C
(
double
clat);
51
52
#ifdef __cplusplus
53
}
54
#endif
55
56
#endif
57
earth_radius_C
double earth_radius_C(double clat)
earth_radius_D
double earth_radius_D(double rlat)
