Skip to content

Commit

Permalink
init message before calling define_blocks
Browse files Browse the repository at this point in the history
  • Loading branch information
uramirez8707 committed Sep 10, 2024
1 parent 3087170 commit cea0b42
Showing 1 changed file with 1 addition and 0 deletions.
1 change: 1 addition & 0 deletions test_fms/diag_manager/test_reduction_methods.F90
Original file line number Diff line number Diff line change
Expand Up @@ -135,6 +135,7 @@ program test_reduction_methods
ddata = allocate_buffer(isd, ied, jsd, jed, nz, nw)
call init_buffer(ddata, isc, iec, jsc, jec, 2) !< The halos never get set
case (test_openmp)
message = .true.
if (mpp_pe() .eq. mpp_root_pe()) print *, "Testing the send_data calls with openmp blocks"
call define_blocks ('testing_model', my_block, isc, iec, jsc, jec, kpts=0, &
nx_block=1, ny_block=4, message=message)
Expand Down

0 comments on commit cea0b42

Please sign in to comment.