Commit 935f770f authored by Uwe Schulzweida's avatar Uwe Schulzweida
Browse files

Renamed function gridDefProjParamRLL() to gridDefParamRLL().

parent da8c2ee1
...@@ -853,7 +853,7 @@ int gridIsCircular(int gridID); ...@@ -853,7 +853,7 @@ int gridIsCircular(int gridID);
int gridIsRotated(int gridID); int gridIsRotated(int gridID);
void gridInqParamRLL(int gridID, double *xpole, double *ypole, double *angle); void gridInqParamRLL(int gridID, double *xpole, double *ypole, double *angle);
void gridDefProjParamRLL(int gridID, double xpole, double ypole, double angle); void gridDefParamRLL(int gridID, double xpole, double ypole, double angle);
void gridDefXpole(int gridID, double xpole); void gridDefXpole(int gridID, double xpole);
double gridInqXpole(int gridID); double gridInqXpole(int gridID);
......
...@@ -356,7 +356,7 @@ FCALLSCFUN1 (DOUBLE, gridInqYinc, GRIDINQYINC, gridinqyinc, INT) ...@@ -356,7 +356,7 @@ FCALLSCFUN1 (DOUBLE, gridInqYinc, GRIDINQYINC, gridinqyinc, INT)
FCALLSCFUN1 (INT, gridIsCircular, GRIDISCIRCULAR, gridiscircular, INT) FCALLSCFUN1 (INT, gridIsCircular, GRIDISCIRCULAR, gridiscircular, INT)
FCALLSCFUN1 (INT, gridIsRotated, GRIDISROTATED, gridisrotated, INT) FCALLSCFUN1 (INT, gridIsRotated, GRIDISROTATED, gridisrotated, INT)
FCALLSCSUB4 (gridInqParamRLL, GRIDINQPROJPARAMRLL, gridinqprojparamrll, INT, PDOUBLE, PDOUBLE, PDOUBLE) FCALLSCSUB4 (gridInqParamRLL, GRIDINQPROJPARAMRLL, gridinqprojparamrll, INT, PDOUBLE, PDOUBLE, PDOUBLE)
FCALLSCSUB4 (gridDefProjParamRLL, GRIDDEFPROJPARAMRLL, griddefprojparamrll, INT, DOUBLE, DOUBLE, DOUBLE) FCALLSCSUB4 (gridDefParamRLL, GRIDDEFPROJPARAMRLL, griddefprojparamrll, INT, DOUBLE, DOUBLE, DOUBLE)
FCALLSCSUB2 (gridDefXpole, GRIDDEFXPOLE, griddefxpole, INT, DOUBLE) FCALLSCSUB2 (gridDefXpole, GRIDDEFXPOLE, griddefxpole, INT, DOUBLE)
FCALLSCFUN1 (DOUBLE, gridInqXpole, GRIDINQXPOLE, gridinqxpole, INT) FCALLSCFUN1 (DOUBLE, gridInqXpole, GRIDINQXPOLE, gridinqxpole, INT)
FCALLSCSUB2 (gridDefYpole, GRIDDEFYPOLE, griddefypole, INT, DOUBLE) FCALLSCSUB2 (gridDefYpole, GRIDDEFYPOLE, griddefypole, INT, DOUBLE)
......
...@@ -1834,7 +1834,7 @@ void gridInqParamRLL(int gridID, double *xpole, double *ypole, double *angle) ...@@ -1834,7 +1834,7 @@ void gridInqParamRLL(int gridID, double *xpole, double *ypole, double *angle)
} }
void gridDefProjParamRLL(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"); cdiGridDefKeyStr(gridID, CDI_KEY_MAPNAME, CDI_MAX_NAME, "rotated_pole");
......
...@@ -385,7 +385,7 @@ void cgribexAddRecord(stream_t * streamptr, int param, int *isec1, int *isec2, d ...@@ -385,7 +385,7 @@ void cgribexAddRecord(stream_t * streamptr, int param, int *isec1, int *isec2, d
double xpole = ISEC2_LonSP*0.001 - 180; double xpole = ISEC2_LonSP*0.001 - 180;
double ypole = - ISEC2_LatSP*0.001; double ypole = - ISEC2_LatSP*0.001;
double angle = - FSEC2_RotAngle; double angle = - FSEC2_RotAngle;
gridDefProjParamRLL(gridID, xpole, ypole, angle); gridDefParamRLL(gridID, xpole, ypole, angle);
} }
} }
else else
......
...@@ -475,7 +475,7 @@ void gribapiAddRecord(stream_t * streamptr, int param, grib_handle *gh, ...@@ -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(ypole) > 0 ) ypole = -ypole; // change from south to north pole
if ( fabs(angle) > 0 ) angle = -angle; if ( fabs(angle) > 0 ) angle = -angle;
gridDefProjParamRLL(gridID, xpole, ypole, angle); gridDefParamRLL(gridID, xpole, ypole, angle);
} }
int zaxistype = gribapiGetZaxisType(gribEditionNumber(gh), leveltype1); int zaxistype = gribapiGetZaxisType(gribEditionNumber(gh), leveltype1);
......
...@@ -672,7 +672,7 @@ void iegAddRecord(stream_t *streamptr, int param, int *pdb, int *gdb, double *vc ...@@ -672,7 +672,7 @@ void iegAddRecord(stream_t *streamptr, int param, int *pdb, int *gdb, double *vc
struct addIfNewRes gridAdded = cdiVlistAddGridIfNew(vlistID, grid, 0); struct addIfNewRes gridAdded = cdiVlistAddGridIfNew(vlistID, grid, 0);
int gridID = gridAdded.Id; int gridID = gridAdded.Id;
if ( !gridAdded.isNew ) Free(grid); if ( !gridAdded.isNew ) Free(grid);
else if ( gridtype == GRID_PROJECTION ) gridDefProjParamRLL(gridID, xpole, ypole, 0); else if ( gridtype == GRID_PROJECTION ) gridDefParamRLL(gridID, xpole, ypole, 0);
int leveltype = iegGetZaxisType(IEG_P_LevelType(pdb)); int leveltype = iegGetZaxisType(IEG_P_LevelType(pdb));
if ( leveltype == ZAXIS_HYBRID ) if ( leveltype == ZAXIS_HYBRID )
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment