Commit d703640f authored by Uwe Schulzweida's avatar Uwe Schulzweida
Browse files

added env CDO_RECOPT

parent 6b2dd992
......@@ -63,6 +63,7 @@ const char Filetypes[][9] = {
int CDI_Debug = 0; /* If set to 1, debugging */
int CDI_Recopt = 0;
int cdiGribApiDebug = 0;
int cdiDefaultLeveltype = -1;
......@@ -289,6 +290,9 @@ void cdiInitialize(void)
value = cdiGetenvInt("CDI_GRIBAPI_DEBUG");
if ( value >= 0 ) cdiGribApiDebug = (int) value;
value = cdiGetenvInt("CDI_RECOPT");
if ( value >= 0 ) CDI_Recopt = (int) value;
value = cdiGetenvInt("CDI_REGULARGRID");
if ( value >= 0 ) cdiDataUnreduced = (int) value;
......
......@@ -243,6 +243,7 @@ stream_t;
extern int CDI_Debug; /* If set to 1, debuggig (default 0) */
extern int CDI_Recopt;
extern int cdiGribApiDebug;
extern double cdiDefaultMissval;
extern int cdiDefaultInstID;
......
......@@ -2104,6 +2104,7 @@ int streamInqFileID(int streamID)
return (streamptr->fileID);
}
void cdiDefAccesstype(int streamID, int type)
{
stream_t *streamptr = reshGetVal(streamID, &streamOps);
......@@ -2120,9 +2121,7 @@ void cdiDefAccesstype(int streamID, int type)
int cdiInqAccesstype(int streamID)
{
stream_t *streamptr;
streamptr = ( stream_t *) reshGetVal ( streamID, &streamOps );
stream_t *streamptr = (stream_t *) reshGetVal ( streamID, &streamOps );
return (streamptr->accesstype);
}
......
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