1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
|
!
! Copyright (C) 2013, Northwestern University and Argonne National Laboratory
! See COPYRIGHT notice in top-level directory.
!
! $Id$
!
! This program tests whether header file pnetcdf.inc conforms Fortran fixed
! form. Hence this test is for compilation only.
!
program main
implicit none
include "mpif.h"
include "pnetcdf.inc"
character(LEN=80) pnetcdf_version
integer err
call MPI_Init(err)
pnetcdf_version = nfmpi_inq_libvers()
call MPI_Finalize(err)
end program main
|
