Skip to content

Commit

Permalink
fix wrong value in if statement (forgotten merge conflict)
Browse files Browse the repository at this point in the history
  • Loading branch information
Yrisch committed Apr 24, 2024
1 parent ea04522 commit 270c170
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion src/main/substepping.F90
Original file line number Diff line number Diff line change
Expand Up @@ -795,7 +795,7 @@ subroutine kick(dki,dt,npart,nptmass,ntypes,xyzh,vxyzu,xyzmh_ptmass,vxyz_ptmass,
call summary_accrete_fail(nfail)
call summary_accrete(nptmass)
! only write to .ev during substeps if no gas particles present
if (npart==-1) call pt_write_sinkev(nptmass,timei,xyzmh_ptmass,vxyz_ptmass, &
if (npart==0) call pt_write_sinkev(nptmass,timei,xyzmh_ptmass,vxyz_ptmass, &
fxyz_ptmass,fxyz_ptmass_sinksink)
endif
endif
Expand Down

0 comments on commit 270c170

Please sign in to comment.