SUBROUTINE iotd_fin USE iotd_mod_h, ONLY: nid USE netcdf, ONLY: nf90_close IMPLICIT NONE !======================================================================= ! ! Auteur: F. Hourdin ! ------- ! ! Objet: ! ------ ! Light interface for netcdf outputs. can be used outside LMDZ ! !======================================================================= integer ierr ! Arguments: ! ---------- ierr = nf90_close(nid) END SUBROUTINE iotd_fin