diff options
Diffstat (limited to 'Carpet/CarpetLib/src/prolongate_3d_real8_eno.F90')
| -rw-r--r-- | Carpet/CarpetLib/src/prolongate_3d_real8_eno.F90 | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/Carpet/CarpetLib/src/prolongate_3d_real8_eno.F90 b/Carpet/CarpetLib/src/prolongate_3d_real8_eno.F90 index 52bca8fa5..c86f773fc 100644 --- a/Carpet/CarpetLib/src/prolongate_3d_real8_eno.F90 +++ b/Carpet/CarpetLib/src/prolongate_3d_real8_eno.F90 @@ -190,6 +190,7 @@ subroutine prolongate_3d_real8_eno (src, srciext, srcjext, & !!$ Loop over fine region +!$omp parallel do private (k0, fk, j0, fj, i0, fi) do k = 0, regkext-1 k0 = (srckoff + k) / dstkfac fk = mod(srckoff + k, dstkfac) |