Skip to content
GitLab
Menu
Projects
Groups
Snippets
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
Menu
Open sidebar
mpim-sw
cdo
Commits
ce9cc8f1
Commit
ce9cc8f1
authored
Sep 28, 2017
by
Uwe Schulzweida
Browse files
interp_X: simplify if statement.
parent
83a52189
Changes
1
Hide whitespace changes
Inline
Side-by-side
src/after_vertint.cc
View file @
ce9cc8f1
...
...
@@ -265,12 +265,10 @@ void interp_X(const double *restrict gt, double *pt, const double *restrict hyb_
{
nl
=
nxl
[
i
]
*
ngp
+
i
;
nh
=
nl
+
ngp
;
if
(
nh
>=
ngp
*
nhlev
)
ptl
[
i
]
=
gt
[
nl
];
else
ptl
[
i
]
=
gt
[
nl
]
+
(
pres
-
hyb_press
[
nl
])
*
(
gt
[
nh
]
-
gt
[
nl
])
/
(
hyb_press
[
nh
]
-
hyb_press
[
nl
]);
ptl
[
i
]
=
(
nh
>=
ngp
*
nhlev
)
?
gt
[
nl
]
:
gt
[
nl
]
+
(
pres
-
hyb_press
[
nl
])
*
(
gt
[
nh
]
-
gt
[
nl
])
/
(
hyb_press
[
nh
]
-
hyb_press
[
nl
]);
}
}
}
...
...
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