Skip to content
GitLab
Menu
Projects
Groups
Snippets
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
Menu
Open sidebar
mpim-sw
cdo
Commits
bbb55def
Commit
bbb55def
authored
Oct 21, 2020
by
Uwe Schulzweida
Browse files
Changed constexpr to const.
parent
c0607b96
Pipeline
#4823
passed with stages
in 16 minutes and 35 seconds
Changes
1
Pipelines
1
Hide whitespace changes
Inline
Side-by-side
src/afterburnerlib.cc
View file @
bbb55def
...
...
@@ -281,7 +281,7 @@ sh2rh(int AnalysisData, double *sphum, double *rhum, double *t, int lev, int dim
/* ***************************************************** */
constexpr
double
RGAMW
=
(
C_RCW
-
C_RCPV
)
/
C_RV
;
constexpr
double
RBETW
=
C_RLVTT
/
C_RV
+
RGAMW
*
C_RTT
;
const
expr
double
RALPW
=
std
::
log
(
C_RESTT
)
+
RBETW
/
C_RTT
+
RGAMW
*
std
::
log
(
C_RTT
);
const
double
RALPW
=
std
::
log
(
C_RESTT
)
+
RBETW
/
C_RTT
+
RGAMW
*
std
::
log
(
C_RTT
);
/* ***************************************************** */
/* Define constants for calculation in presence of ice */
...
...
@@ -300,7 +300,7 @@ sh2rh(int AnalysisData, double *sphum, double *rhum, double *t, int lev, int dim
/***************************************************/
constexpr
double
RGAM
=
RGAMW
;
constexpr
double
RBET
=
RBETW
;
const
expr
double
RALP
=
RALPW
;
const
double
RALP
=
RALPW
;
for
(
lp
=
0
;
lp
<
lev
;
lp
++
)
{
for
(
i
=
0
;
i
<
dimgpout
;
i
++
)
...
...
@@ -334,7 +334,7 @@ rh2sh(double *sphum, double *rhum, double *t, int lev, int dimgpout, const doubl
/* ***************************************************** */
constexpr
double
RGAMW
=
(
C_RCW
-
C_RCPV
)
/
C_RV
;
constexpr
double
RBETW
=
C_RLVTT
/
C_RV
+
RGAMW
*
C_RTT
;
const
expr
double
RALPW
=
std
::
log
(
C_RESTT
)
+
RBETW
/
C_RTT
+
RGAMW
*
std
::
log
(
C_RTT
);
const
double
RALPW
=
std
::
log
(
C_RESTT
)
+
RBETW
/
C_RTT
+
RGAMW
*
std
::
log
(
C_RTT
);
/* ***************************************************** */
/* Define constants for calculation in presence of ice */
...
...
@@ -351,7 +351,7 @@ rh2sh(double *sphum, double *rhum, double *t, int lev, int dimgpout, const doubl
constexpr
double
RGAM
=
RGAMW
;
constexpr
double
RBET
=
RBETW
;
const
expr
double
RALP
=
RALPW
;
const
double
RALP
=
RALPW
;
for
(
lp
=
0
;
lp
<
lev
;
lp
++
)
{
for
(
i
=
0
;
i
<
dimgpout
;
i
++
)
...
...
@@ -961,7 +961,7 @@ Omega(double *omega_in, double *divergence, double *u_wind, double *v_wind, doub
void
MakeGeopotHeight
(
double
*
geop
,
double
*
gt
,
double
*
gq
,
double
*
ph
,
int
nhor
,
int
nlev
)
{
const
expr
double
z2log2
=
2.0
*
std
::
log
(
2.0
);
const
double
z2log2
=
2.0
*
std
::
log
(
2.0
);
const
double
vtmp
=
(
C_RV
/
PlanetRD
)
-
1.0
;
const
double
zrg
=
1.0
/
PlanetGrav
;
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a 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