Skip to content

Commit

Permalink
dump on every funct3d call: debugging messages
Browse files Browse the repository at this point in the history
  • Loading branch information
jons-pf committed Oct 23, 2024
1 parent 707c432 commit b0bf098
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion Sources/General/funct3d.f
Original file line number Diff line number Diff line change
Expand Up @@ -361,7 +361,7 @@ SUBROUTINE funct3d_par (lscreen, ier_flag)
! RESET FIRST TIME FOR SOFT START
!
IF (ivac .EQ. 1) THEN
print *, "first Nestor call - force restart"/
print *, "first Nestor call - force restart"//
& "via BAD_JACOBIAN logic"
irst = 2
delt0 = delt
Expand Down

0 comments on commit b0bf098

Please sign in to comment.