File: libver_mpi.f90.in

package info (click to toggle)
cmake 4.1.0-1
  • links: PTS, VCS
  • area: main
  • in suites: experimental
  • size: 147,284 kB
  • sloc: ansic: 403,915; cpp: 290,772; sh: 4,102; python: 3,357; yacc: 3,106; lex: 1,189; f90: 532; asm: 471; lisp: 375; cs: 270; java: 266; fortran: 230; perl: 217; objc: 215; xml: 198; makefile: 97; javascript: 83; pascal: 63; tcl: 55; php: 25; ruby: 22
file content (7 lines) | stat: -rw-r--r-- 300 bytes parent folder | download | duplicates (15) 
1
2
3
4
5
6
7
 
      program mpi_ver
      @MPI_Fortran_INCLUDE_LINE@
      character(len=MPI_MAX_LIBRARY_VERSION_STRING) :: mpilibver_str
      integer(kind=MPI_INTEGER_KIND) :: ierror, reslen
      call MPI_GET_LIBRARY_VERSION(mpilibver_str, reslen, ierror)
      print *, mpilibver_str
      end program mpi_ver