summaryrefslogtreecommitdiffstats
path: root/config/cmake_ext_mod/FindMPI/mpiver.f90.in
blob: a25452385304f7e40370deb9ca2e1102bf9eb68c (plain)
1
2
3
4
5
6
7
8
9
10
      program mpi_ver
      @MPI_Fortran_INCLUDE_LINE@
      integer(kind=kind(MPI_VERSION)), parameter :: zero = ichar('0')
      character, dimension(17), parameter :: mpiver_str =&
      (/ 'I', 'N', 'F', 'O', ':', 'M', 'P', 'I', '-', 'V', 'E', 'R', '[', &
        char(zero + MPI_VERSION), &
        '.', &
        char(zero + MPI_SUBVERSION), ']' /)
      print *, mpiver_str
      end program mpi_ver