Revert "Add constant for max supported int"

This reverts commit 2b8f6ba.
LivInTheLookingGlass · Oct 2, 2024 · e10d874 · e10d874
1 parent 2b8f6ba
commit e10d874
Show file tree

Hide file tree

Showing 2 changed files with 0 additions and 12 deletions.
diff --git a/docs/src/fortran/lib/constants.rst b/docs/src/fortran/lib/constants.rst
@@ -11,8 +11,6 @@ View source code :source:`fortran/include/constants.f90`
     :type: integer
 .. f:variable:: i18t
     :type: integer
-.. f:variable:: imaxt
-    :type: integer
 
     A set of digit type constraints that denote how many decimal digits a number can support.
     They are given as ``i<len>t`` or ``r<len>_<exp>t``

diff --git a/fortran/src/include/constants.f90 b/fortran/src/include/constants.f90
@@ -4,16 +4,6 @@ module constants
     integer, parameter :: i1t = selected_int_kind(1)
     integer, parameter :: i4t = selected_int_kind(4)
     integer, parameter :: i18t = selected_int_kind(18)
-    integer :: imaxt
-    if (selected_int_kind(38) >= 0) then
-        imaxt = selected_int_kind(38)
-    elseif (i18t >= 0) then
-        imaxt = i18t
-    else
-        ! fall back to default value of 64-bit in most compilers
-        imaxt = 8
-        i18t = 8
-    end if
 
     integer(i1t), parameter :: errort = 0
     integer(i1t), parameter :: int64t = 1