Skip to content
Snippets Groups Projects
Commit c35a6c96 authored by Moritz Hanke's avatar Moritz Hanke
Browse files

avoids issue in routine compute_tgt_field

parent 97409b7a
No related branches found
No related tags found
No related merge requests found
......@@ -174,7 +174,7 @@ static inline void compute_tgt_field(
{ \
YAC_OMP_FOR \
for (size_t k = 0; k < tgt_count; ++k) { \
if (src_frac_masks[i][j][k] != 0.0) \
if (fabs(src_frac_masks[i][j][k]) > FRAC_MASK_TOL) \
tgt_field[i * num_src_fields + j][k] = \
SCALE( \
tgt_field[i * num_src_fields + j][k] / \
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment