libSUFR_version.f90

Go to the documentation of this file.

!> \file libSUFR_version.f90  Source file generated by CMake to report the libSUFR version used
 
!***********************************************************************************************************************************
!> \brief  Report libSUFR version number
 
module sufr_version
  implicit none
  save
  
contains
  
  
  !*********************************************************************************************************************************
  !> \brief  Subroutine generated by CMake to report the code version used
  !!
  !! \param unit  Output unit to write the version information to
  
  subroutine print_libsufr_version(unit)
    implicit none
    integer, intent(in) :: unit
    character :: libSUFR_version*(99) = 'rev.405, hash 2fd9210 (2025-01-19)'
    character :: compile_date*(99) = 'Sat 25 Jan 12:20:37 CET 2025'
    character :: compiler*(99) = 'gfortran'
    character :: compiler_flags*(99) = '-O2'
    
    write(unit,'(A)', advance='no') 'libSUFR '//trim(libsufr_version)//', compiled on '//trim(compile_date)//' with '// &
         trim(compiler)//' '//trim(compiler_flags)
    
  subroutine print_libsufr_version(unit) …
  end subroutine print_libsufr_version
  !*********************************************************************************************************************************
  
end module sufr_version
!***********************************************************************************************************************************