INTERFACE:
subroutine ncd_pio_closefile(file)DESCRIPTION:
Close a NetCDF PIO file
ARGUMENTS:
type(file_desc_t), intent(inout) :: file ! PIO file handle to closeREVISION HISTORY:
Created by Erik KluzekLOCAL VARIABLES:
-----------------------------------------------------------------------