Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
Menu
Open sidebar
mpim-sw
libcdi
Commits
13cfaf91
Commit
13cfaf91
authored
Nov 30, 2006
by
Uwe Schulzweida
Browse files
usvs_to_uv: update for zbeta
parent
034e96cf
Changes
2
Hide whitespace changes
Inline
Side-by-side
ChangeLog
View file @
13cfaf91
2006-11-
??
Uwe Schulzweida <Uwe.Schulzweida@zmaw.de>
2006-11-
30
Uwe Schulzweida <Uwe.Schulzweida@zmaw.de>
* using GRIB library version 1.0.4
* cdfInqContents: use grid_mapping not for curvilinear grids
* add env IGNORE_ATT_COORDINATES to ignore attribute coordinates
* splitBasetime: convert timeunit string to lower case
* usvs_to_uv: update for zbeta [from: Klaus Wyser]
* new function: vlistInqVarSzip
* new function: streamNvals
* Version 1.0.4 released
...
...
src/grid_rot.c
View file @
13cfaf91
...
...
@@ -179,8 +179,7 @@ void usvs_to_uv(double us, double vs, double phi, double rla,
*/
zbeta
=
fabs
(
acos
(
zarg
));
/* if ( -(rla - (pollamd-180.0)) < 0 ) zbeta = -zbeta;*/
/* if ( -(rla - (pollamd-180.0)) < 0 && !(rla > pollamd && rla < 180) ) zbeta = -zbeta;*/
if
(
rla
>
pollamd
-
180
&&
rla
<=
pollamd
)
zbeta
=
-
zbeta
;
if
(
(
-
(
rla
-
(
pollamd
-
180
.
0
))
<
0
)
&&
(
-
(
rla
-
(
pollamd
-
180
.
0
))
>=
-
180
)
)
zbeta
=
-
zbeta
;
/* us - wind transformieren */
*
u
=
us
*
cos
(
zbeta
)
-
vs
*
sin
(
zbeta
);
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment