/beegfs/hackathon/users/eoseret/qaas_runs_test/178-661-4072/intel/CloverLeaf1.3-FC/build/CloverLeaf1.3-FC/CloverLeaf_ref/kernels/pack_kernel.f90: 155 - 160
--------------------------------------------------------------------------------

155:     !$OMP PARALLEL DO PRIVATE(index)
156:     DO k=y_min-depth,y_max+y_inc+depth
157:     !$OMP SIMD
158:       DO j=1,depth
159:         index= buffer_offset + j+(k+depth-1)*depth
160:         right_snd_buffer(index)=field(x_max+1-j,k)
