ncd_pio_closefile

INTERFACE:

   subroutine ncd_pio_closefile(file)

DESCRIPTION:

Close a NetCDF PIO file

ARGUMENTS:

     type(file_desc_t), intent(inout) :: file   ! PIO file handle to close

REVISION HISTORY:

   Created by Erik Kluzek

LOCAL VARIABLES:

  -----------------------------------------------------------------------