Commit 3b31cfbc authored by Uwe Schulzweida's avatar Uwe Schulzweida
Browse files

Removed unused variables.

parent 0e1773db
......@@ -33,7 +33,7 @@
void *Arithlat(void *argument)
{
int gridtype;
int gridID, gridID0 = -1;
int gridID0 = -1;
int nrecs;
int varID, levelID;
int nmiss;
......
......@@ -32,13 +32,13 @@ struct polygon {
struct geo boundary[6];
};
const double pid5 = 0.2*M_PI;
const double pid180 = 180.0/M_PI;
static const double pid5 = 0.2*M_PI;
//const double pid180 = 180.0/M_PI;
const int ispokes[12] = { 1,0,-1,-1,0,1,0,1,1,0,-1,-1,};
static const int ispokes[12] = { 1,0,-1,-1,0,1,0,1,1,0,-1,-1,};
const int pentagon = 5;
const int hexagon = 6;
static const int pentagon = 5;
static const int hexagon = 6;
/*****************************************************************************/
......
......@@ -11,22 +11,19 @@
#include "cdo_int.h"
#include "hetaeta.h"
const double ap0 = 100000.0;
const double apr = 101325.0; /* reference pressure */
const double aipr = 1.0/101325.0;
static const double apr = 101325.0; /* reference pressure */
static const double aipr = 1.0/101325.0;
const double p_firef = 40000.0; /* pressure of reference geopotential */
static const double p_firef = 40000.0; /* pressure of reference geopotential */
const double epsilon = 0.622;
const double rair = 287.04;
const double cpair = 1004.6;
static const double epsilon = 0.622;
static const double rair = 287.04;
static const double cpair = 1004.6;
const double eta_pbl = 0.8; /* upper limit of BPL eta coordiante */
const double g = 9.81;
static const double eta_pbl = 0.8; /* upper limit of BPL eta coordiante */
#if defined(OUTPUT)
FILE *old, *new;
static FILE *old, *new;
#endif
......
Supports Markdown
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