Skip to content

Commit

Permalink
temporary fix for field data I/O on GPUs (#68)
Browse files Browse the repository at this point in the history
  • Loading branch information
p-costa authored Mar 10, 2023
1 parent dc6126f commit 571e5df
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion src/output.f90
Original file line number Diff line number Diff line change
Expand Up @@ -196,7 +196,7 @@ subroutine out3d(fname,nskip,p)
filesize = 0_MPI_OFFSET_KIND
call MPI_FILE_SET_SIZE(fh,filesize,ierr)
disp = 0_MPI_OFFSET_KIND
#if 1
#if !defined(_OPENACC)
call decomp_2d_write_every(ipencil,p,nskip(1),nskip(2),nskip(3),fname,.true.)
#else
!
Expand Down

0 comments on commit 571e5df

Please sign in to comment.