/[lmdze]/trunk/IOIPSL/Histcom/histclo.f
ViewVC logotype

Diff of /trunk/IOIPSL/Histcom/histclo.f

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 134 by guez, Wed Apr 29 15:47:56 2015 UTC revision 138 by guez, Fri May 22 23:13:19 2015 UTC
# Line 11  contains Line 11  contains
11      ! all opened files.      ! all opened files.
12    
13      USE errioipsl, ONLY: histerr      USE errioipsl, ONLY: histerr
14      USE histcom_var, ONLY: nb_files, ncdf_ids      use histbeg_totreg_m, ONLY: nb_files
15        USE histcom_var, ONLY: ncdf_ids
16      USE netcdf, ONLY: nf90_close, nf90_noerr      USE netcdf, ONLY: nf90_close, nf90_noerr
17    
18      INTEGER, INTENT (IN), OPTIONAL:: fid ! file id      INTEGER, INTENT (IN), OPTIONAL:: fid ! file id

Legend:
Removed from v.134  
changed lines
  Added in v.138

  ViewVC Help
Powered by ViewVC 1.1.21