1 program mpi_ver 2 @MPI_Fortran_INCLUDE_LINE@ 3 print *, 'INFO:SUBARRAYS[', MPI_SUBARRAYS_SUPPORTED, ']-ASYNCPROT[', MPI_ASYNC_PROTECTS_NONBLOCKING, ']' 4 end program mpi_ver 5