/[lmdze]/trunk/Sources/IOIPSL/Histcom/histbeg_totreg.f
ViewVC logotype

Diff of /trunk/Sources/IOIPSL/Histcom/histbeg_totreg.f

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

revision 211 by guez, Fri Mar 11 18:47:26 2016 UTC revision 212 by guez, Thu Jan 12 12:31:31 2017 UTC
# Line 63  CONTAINS Line 63  CONTAINS
63      REAL, INTENT(IN):: pdate0 ! the Julian date at which the itau was equal to 0      REAL, INTENT(IN):: pdate0 ! the Julian date at which the itau was equal to 0
64      REAL, INTENT(IN):: pdeltat ! time step of the counter itau, in seconds      REAL, INTENT(IN):: pdeltat ! time step of the counter itau, in seconds
65    
     INTEGER, INTENT(OUT):: fileid ! ID of the netcdf file  
66      INTEGER, INTENT(OUT):: horiid ! ID of the horizontal grid      INTEGER, INTENT(OUT):: horiid ! ID of the horizontal grid
67        INTEGER, INTENT(OUT):: fileid ! ID of the netcdf file
68    
69      ! Variables local to the procedure:      ! Variables local to the procedure:
70      REAL, DIMENSION(size(lon_1d), size(lat_1d)):: lon, lat      REAL, DIMENSION(size(lon_1d), size(lat_1d)):: lon, lat
Legend:
Removed from v.211  
changed lines
  Added in v.212
  ViewVC Help
Powered by ViewVC 1.1.21