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
83a52189
Commit
83a52189
authored
Sep 28, 2017
by
Uwe Schulzweida
Browse files
Merge declaration and initialization.
parent
38f3e5fc
Changes
1
Hide whitespace changes
Inline
Side-by-side
src/after_vertint.cc
View file @
83a52189
...
...
@@ -85,14 +85,16 @@ void genind(int *nx, const double *restrict plev, const double *restrict fullp,
#endif
for
(
long
lp
=
0
;
lp
<
nplev
;
lp
++
)
{
long
i
,
lh
;
const
double
pres
=
plev
[
lp
];
int
*
restrict
nxl
=
nx
+
lp
*
ngp
;
for
(
lh
=
0
;
lh
<
nhlev
;
lh
++
)
for
(
i
=
0
;
i
<
ngp
;
i
++
)
{
if
(
pres
>
fullp
[
lh
*
ngp
+
i
]
)
nxl
[
i
]
=
lh
;
}
for
(
long
lh
=
0
;
lh
<
nhlev
;
lh
++
)
{
const
double
*
restrict
fullpx
=
fullp
+
lh
*
ngp
;
for
(
long
i
=
0
;
i
<
ngp
;
i
++
)
{
if
(
pres
>
fullpx
[
i
]
)
nxl
[
i
]
=
lh
;
}
}
}
}
/* genind */
...
...
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