research/dns-hit3d-fdm
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

disable gather_4 before restart_write -> u' + U written

Browse source
This commit is contained in:
park0d 2017-03-24 18:55:09 +09:00
parent fe6444366c
commit e14bb9dd14
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
main.f90
View file

@ -187,7 +187,7 @@ program x_code
if (mod(itime,IPRINT2).eq.0) then
call restart_write_parallel
if (fdm_sw.ne.0) then ! Reacting
call gather_4
!call gather_4
if (TIME.ge.bgn_save) then
call fdm_restart_write
if (myid.eq.master) then