findloc is in gfortran 9.1
This commit is contained in:
parent
25d91c79af
commit
51bd67fa29
|
@ -10,7 +10,7 @@ module future
|
||||||
|
|
||||||
contains
|
contains
|
||||||
|
|
||||||
#if defined(__GFORTRAN__) || __INTEL_COMPILER < 1800
|
#if defined(__GFORTRAN__) && __GNUC__ < 9 || __INTEL_COMPILER < 1800
|
||||||
!--------------------------------------------------------------------------------------------------
|
!--------------------------------------------------------------------------------------------------
|
||||||
!> @brief substitute for the findloc intrinsic (only for integer, dimension(:) at the moment)
|
!> @brief substitute for the findloc intrinsic (only for integer, dimension(:) at the moment)
|
||||||
!--------------------------------------------------------------------------------------------------
|
!--------------------------------------------------------------------------------------------------
|
||||||
|
|
Loading…
Reference in New Issue