a good default, for bwd compatibility

p-costa · Mar 5, 2022 · 8ded592 · 8ded592
1 parent 719f6f6
commit 8ded592
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/src/param.f90 b/src/param.f90
@@ -64,6 +64,7 @@ subroutine read_input()
  character(len=100) :: filename
  character(len= 3) :: cblock
  integer :: q
+ nsaves_max = 0 ! a good default, for backward compatibility
  open(newunit=iunit,file='dns.in',status='old',action='read',iostat=ierr)
  if( ierr == 0 ) then
  read(iunit,*) cfl,dtmin