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
935f770f
Commit
935f770f
authored
Aug 11, 2016
by
Uwe Schulzweida
Browse files
Renamed function gridDefProjParamRLL() to gridDefParamRLL().
parent
da8c2ee1
Changes
6
Hide whitespace changes
Inline
Side-by-side
src/cdi.h
View file @
935f770f
...
...
@@ -853,7 +853,7 @@ int gridIsCircular(int gridID);
int
gridIsRotated
(
int
gridID
);
void
gridInqParamRLL
(
int
gridID
,
double
*
xpole
,
double
*
ypole
,
double
*
angle
);
void
gridDefP
rojP
aramRLL
(
int
gridID
,
double
xpole
,
double
ypole
,
double
angle
);
void
gridDefParamRLL
(
int
gridID
,
double
xpole
,
double
ypole
,
double
angle
);
void
gridDefXpole
(
int
gridID
,
double
xpole
);
double
gridInqXpole
(
int
gridID
);
...
...
src/cdiFortran.c
View file @
935f770f
...
...
@@ -356,7 +356,7 @@ FCALLSCFUN1 (DOUBLE, gridInqYinc, GRIDINQYINC, gridinqyinc, INT)
FCALLSCFUN1
(
INT
,
gridIsCircular
,
GRIDISCIRCULAR
,
gridiscircular
,
INT
)
FCALLSCFUN1
(
INT
,
gridIsRotated
,
GRIDISROTATED
,
gridisrotated
,
INT
)
FCALLSCSUB4
(
gridInqParamRLL
,
GRIDINQPROJPARAMRLL
,
gridinqprojparamrll
,
INT
,
PDOUBLE
,
PDOUBLE
,
PDOUBLE
)
FCALLSCSUB4
(
gridDefP
rojP
aramRLL
,
GRIDDEFPROJPARAMRLL
,
griddefprojparamrll
,
INT
,
DOUBLE
,
DOUBLE
,
DOUBLE
)
FCALLSCSUB4
(
gridDefParamRLL
,
GRIDDEFPROJPARAMRLL
,
griddefprojparamrll
,
INT
,
DOUBLE
,
DOUBLE
,
DOUBLE
)
FCALLSCSUB2
(
gridDefXpole
,
GRIDDEFXPOLE
,
griddefxpole
,
INT
,
DOUBLE
)
FCALLSCFUN1
(
DOUBLE
,
gridInqXpole
,
GRIDINQXPOLE
,
gridinqxpole
,
INT
)
FCALLSCSUB2
(
gridDefYpole
,
GRIDDEFYPOLE
,
griddefypole
,
INT
,
DOUBLE
)
...
...
src/grid.c
View file @
935f770f
...
...
@@ -1834,7 +1834,7 @@ void gridInqParamRLL(int gridID, double *xpole, double *ypole, double *angle)
}
void
gridDefP
rojP
aramRLL
(
int
gridID
,
double
xpole
,
double
ypole
,
double
angle
)
void
gridDefParamRLL
(
int
gridID
,
double
xpole
,
double
ypole
,
double
angle
)
{
cdiGridDefKeyStr
(
gridID
,
CDI_KEY_MAPNAME
,
CDI_MAX_NAME
,
"rotated_pole"
);
...
...
src/stream_cgribex.c
View file @
935f770f
...
...
@@ -385,7 +385,7 @@ void cgribexAddRecord(stream_t * streamptr, int param, int *isec1, int *isec2, d
double
xpole
=
ISEC2_LonSP
*
0
.
001
-
180
;
double
ypole
=
-
ISEC2_LatSP
*
0
.
001
;
double
angle
=
-
FSEC2_RotAngle
;
gridDefP
rojP
aramRLL
(
gridID
,
xpole
,
ypole
,
angle
);
gridDefParamRLL
(
gridID
,
xpole
,
ypole
,
angle
);
}
}
else
...
...
src/stream_gribapi.c
View file @
935f770f
...
...
@@ -475,7 +475,7 @@ void gribapiAddRecord(stream_t * streamptr, int param, grib_handle *gh,
if
(
fabs
(
ypole
)
>
0
)
ypole
=
-
ypole
;
// change from south to north pole
if
(
fabs
(
angle
)
>
0
)
angle
=
-
angle
;
gridDefP
rojP
aramRLL
(
gridID
,
xpole
,
ypole
,
angle
);
gridDefParamRLL
(
gridID
,
xpole
,
ypole
,
angle
);
}
int
zaxistype
=
gribapiGetZaxisType
(
gribEditionNumber
(
gh
),
leveltype1
);
...
...
src/stream_ieg.c
View file @
935f770f
...
...
@@ -672,7 +672,7 @@ void iegAddRecord(stream_t *streamptr, int param, int *pdb, int *gdb, double *vc
struct
addIfNewRes
gridAdded
=
cdiVlistAddGridIfNew
(
vlistID
,
grid
,
0
);
int
gridID
=
gridAdded
.
Id
;
if
(
!
gridAdded
.
isNew
)
Free
(
grid
);
else
if
(
gridtype
==
GRID_PROJECTION
)
gridDefP
rojP
aramRLL
(
gridID
,
xpole
,
ypole
,
0
);
else
if
(
gridtype
==
GRID_PROJECTION
)
gridDefParamRLL
(
gridID
,
xpole
,
ypole
,
0
);
int
leveltype
=
iegGetZaxisType
(
IEG_P_LevelType
(
pdb
));
if
(
leveltype
==
ZAXIS_HYBRID
)
...
...
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