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
b75d9a6f
Commit
b75d9a6f
authored
Dec 25, 2017
by
Uwe Schulzweida
Browse files
calc_bin_addr(): removed omp parallel for.
parent
f5d23847
Changes
1
Hide whitespace changes
Inline
Side-by-side
src/remap_search_latbins.cc
View file @
b75d9a6f
...
...
@@ -14,11 +14,12 @@ void calc_bin_addr(size_t gridsize, size_t nbins, const restr_t* restrict bin_la
bin_addr
[
n2
]
=
gridsize
;
bin_addr
[
n2
+
1
]
=
0
;
}
/*
#if defined(_OPENMP)
#pragma omp parallel for default(none) \
private(n2) shared(gridsize, nbins, bin_lats, bin_addr, cell_bound_box)
#endif
*/
for
(
size_t
nele
=
0
;
nele
<
gridsize
;
++
nele
)
{
size_t
nele4
=
nele
<<
2
;
...
...
@@ -30,9 +31,11 @@ void calc_bin_addr(size_t gridsize, size_t nbins, const restr_t* restrict bin_la
if
(
cell_bound_box_lat1
<=
bin_lats
[
n2
+
1
]
&&
cell_bound_box_lat2
>=
bin_lats
[
n2
]
)
{
/*
#if defined(_OPENMP)
#pragma omp critical
#endif
*/
{
bin_addr
[
n2
]
=
MIN
(
nele
,
bin_addr
[
n2
]);
bin_addr
[
n2
+
1
]
=
MAX
(
nele
,
bin_addr
[
n2
+
1
]);
...
...
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