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
9690c6bb
Commit
9690c6bb
authored
Nov 05, 2012
by
Uwe Schulzweida
Browse files
cgribexGetGrid: bug fix for yinc for odd ysize
parent
5bc50213
Changes
3
Hide whitespace changes
Inline
Side-by-side
ChangeLog
View file @
9690c6bb
2012-11-05 Uwe Schulzweida <Uwe.Schulzweida@zmaw.de>
* cgribexGetGrid: bug fix for yinc for odd ysize
2012-10-30 Uwe Schulzweida <Uwe.Schulzweida@zmaw.de>
* Version 1.5.8 released
...
...
src/stream_cgribex.c
View file @
9690c6bb
...
...
@@ -196,7 +196,6 @@ void cgribexGetGrid(stream_t *streamptr, int *isec2, int *isec4, grid_t *grid, i
if
(
ISEC2_FirstLon
==
0
&&
ISEC2_LastLon
>
354000
&&
ISEC2_LastLon
<
360000
)
{
double
xinc
=
360
.
/
grid
->
xsize
;
if
(
fabs
(
grid
->
xinc
-
xinc
)
>
0
.
0
)
{
grid
->
xinc
=
xinc
;
...
...
@@ -224,7 +223,8 @@ void cgribexGetGrid(stream_t *streamptr, int *isec2, int *isec4, grid_t *grid, i
/* correct yinc if necessary */
if
(
gridtype
==
GRID_LONLAT
&&
abs
(
ISEC2_FirstLat
)
==
abs
(
ISEC2_LastLat
)
&&
abs
(
ISEC2_LastLat
)
>
85000
)
{
double
yinc
=
180
.
/
grid
->
ysize
;
double
range
=
2
.
*
abs
(
ISEC2_LastLat
)
/
1000
.;
double
yinc
=
range
/
(
grid
->
ysize
-
1
);
if
(
fabs
(
grid
->
yinc
-
yinc
)
>
0
.
0
)
{
...
...
src/varscan.c
View file @
9690c6bb
...
...
@@ -680,7 +680,7 @@ int varDefGrid(int vlistID, grid_t grid, int mode)
ngrids
=
gridSize
();
if
(
ngrids
>
0
)
{
gridIndexList
=
malloc
(
ngrids
*
sizeof
(
int
));
gridIndexList
=
malloc
(
ngrids
*
sizeof
(
int
));
gridGetIndexList
(
ngrids
,
gridIndexList
);
for
(
i
=
0
;
i
<
ngrids
;
i
++
)
{
...
...
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