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);
int gridIsRotated(int gridID);
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);
double gridInqXpole(int gridID);
......
......@@ -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 (gridDefProjParamRLL, 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)
......
......@@ -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");
......
......@@ -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;
gridDefProjParamRLL(gridID, xpole, ypole, angle);
gridDefParamRLL(gridID, xpole, ypole, angle);
}
}
else
......
......@@ -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;
gridDefProjParamRLL(gridID, xpole, ypole, angle);
gridDefParamRLL(gridID, xpole, ypole, angle);
}
int zaxistype = gribapiGetZaxisType(gribEditionNumber(gh), leveltype1);
......
......@@ -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 ) gridDefProjParamRLL(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 )
......
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