mo_cdi.f90: update.

examples/cdi_read_f2003.f90

@@ -4,7 +4,7 @@ PROGRAM CDIREADF2003
 
   IMPLICIT NONE
 
-  INTEGER(c_size_t) :: gsize, nmiss
+  INTEGER :: gsize, nmiss
   INTEGER :: nlevel, nvars, code
   INTEGER :: vdate, vtime, status, ilev
   INTEGER :: streamID, varID, gridID, zaxisID

examples/cdi_write_f2003.f90

@@ -6,7 +6,7 @@
       IMPLICIT NONE
 
       INTEGER :: nlev, nts
-      INTEGER(c_size_t) ::  nlon, nlat, nmiss
+      INTEGER :: nlon, nlat, nmiss
       PARAMETER (nlon = 12)   ! Number of longitudes
       PARAMETER (nlat =  6)   ! Number of latitudes
       PARAMETER (nlev =  5)   ! Number of levels
@@ -72,7 +72,7 @@
 !     Loop over the number of time steps
       DO tsID = 0, nts-1
 !        Set the verification date to 1985-01-01 + tsID
-         CALL taxisDefVdate(taxisID, INT(19850101+tsID,8))
+         CALL taxisDefVdate(taxisID, 19850101+tsID)
 !        Set the verification time to 12:00:00
          CALL taxisDefVtime(taxisID, 120000)
 !        Define the time step