set isink=1for ieos=6 in case where isink was not set

danieljprice · Dec 4, 2024 · 245f2d2 · 245f2d2
1 parent 9062fb7
commit 245f2d2
Showing 1 changed file with 2 additions and 3 deletions.
diff --git a/src/main/eos.f90 b/src/main/eos.f90
@@ -481,9 +481,8 @@ subroutine init_eos(eos_type,ierr)
     !--Check that if using ieos=6, then isink is set properly
     !
     if (isink==0) then
-       call error('eos','ieos=6, but isink is not set')
-       ierr = ierr_isink_not_set
-       return
+       call error('eos','ieos=6, but isink is not set, setting to 1')
+       isink = 1
     endif
 
  case(8)