diff options
Diffstat (limited to 'nrlmsise-00.c')
| -rw-r--r-- | nrlmsise-00.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/nrlmsise-00.c b/nrlmsise-00.c index ab5624e..77f423a 100644 --- a/nrlmsise-00.c +++ b/nrlmsise-00.c @@ -1361,7 +1361,7 @@ void gts7(struct nrlmsise_input *input, struct nrlmsise_flags *flags, struct nrl /**** AR DENSITY ****/ /* Density variation factor at Zlb */ - g40= flags->sw[20]*globe7(pd[5],input,flags); + g40= flags->sw[21]*globe7(pd[5],input,flags); /* Diffusive density at Zlb */ db40 = pdm[4][0]*exp(g40)*pd[5][0]; /* Diffusive density at Alt */ |