diff options
Diffstat (limited to 'nrlmsise-00.c')
| -rw-r--r-- | nrlmsise-00.c | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/nrlmsise-00.c b/nrlmsise-00.c index 17413d0..af48e19 100644 --- a/nrlmsise-00.c +++ b/nrlmsise-00.c @@ -1061,6 +1061,8 @@ void gtd7(struct nrlmsise_input *input, struct nrlmsise_flags *flags, struct nrl void gtd7d(struct nrlmsise_input *input, struct nrlmsise_flags *flags, struct nrlmsise_output *output) { gtd7(input, flags, output); output->d[5] = 1.66E-24 * (4.0 * output->d[0] + 16.0 * output->d[1] + 28.0 * output->d[2] + 32.0 * output->d[3] + 40.0 * output->d[4] + output->d[6] + 14.0 * output->d[7] + 16.0 * output->d[8]); + if (flags->sw[0]) + output->d[5]=output->d[5]/1000; } |