Increase max unit, number of allowed open files

dzalkind · Jul 6, 2023 · e0603e5 · e0603e5
1 parent e5b1af5
commit e0603e5
Showing 1 changed file with 5 additions and 2 deletions.
diff --git a/ROSCO/src/ROSCO_Helpers.f90 b/ROSCO/src/ROSCO_Helpers.f90
@@ -1491,8 +1491,11 @@ SUBROUTINE GetNewUnit ( UnIn, ErrVar )
    INTEGER                                :: Un                                           ! Unit number
    LOGICAL                                :: Opened                                       ! Flag indicating whether or not a file is opened.
    INTEGER(IntKi), PARAMETER              :: StartUnit = 10                               ! Starting unit number to check (numbers less than 10 reserved)
-   INTEGER(IntKi), PARAMETER              :: MaxUnit   = 99                               ! The maximum unit number available (or 10 less than the number of files you want to have open at a time)
-
+   ! NOTE: maximum unit numbers in fortran 90 and later is 2**31-1.  However, there are limits within the OS.
+   !     macos -- 256  (change with ulimit -n)
+   !     linux -- 1024 (change with ulimit -n)
+   !     windows -- 512 (not sure how to change -- ADP)
+   INTEGER(IntKi), PARAMETER              :: MaxUnit   = 1024                             ! The maximum unit number available (or 10 less than the number of files you want to have open at a time)
 
       ! Initialize subroutine outputs