Changeset 14072 for NEMO/trunk/src/OCE/IOM/in_out_manager.F90

Timestamp:

2020-12-04T08:48:38+01:00 (3 years ago)

Author:

laurent

Message:

Merging branch "2020/dev_r13648_ASINTER-04_laurent_bulk_ice", ticket #2369

File:

• NEMO/trunk/src/OCE/IOM/in_out_manager.F90 (modified) (4 diffs)

NEMO/trunk/src/OCE/IOM/in_out_manager.F90

@@ -1 @@
-MODULE in_out_manager   
+MODULE in_out_manager
    !!======================================================================
    !!                       ***  MODULE  in_out_manager  ***
@@ -53 +53 @@
    ! The following four values determine the partitioning of the output fields
    ! into netcdf4 chunks. They are unrelated to the nn_chunk_sz setting which is
-   ! for runtime optimisation. The individual netcdf4 chunks can be optionally 
-   ! gzipped (recommended) leading to significant reductions in I/O volumes 
+   ! for runtime optimisation. The individual netcdf4 chunks can be optionally
+   ! gzipped (recommended) leading to significant reductions in I/O volumes
    !                         !!!**  variables only used with iom_nf90 routines and key_netcdf4 **
-   INTEGER ::   nn_nchunks_i   !: number of chunks required in the i-dimension 
-   INTEGER ::   nn_nchunks_j   !: number of chunks required in the j-dimension 
-   INTEGER ::   nn_nchunks_k   !: number of chunks required in the k-dimension 
-   INTEGER ::   nn_nchunks_t   !: number of chunks required in the t-dimension 
+   INTEGER ::   nn_nchunks_i   !: number of chunks required in the i-dimension
+   INTEGER ::   nn_nchunks_j   !: number of chunks required in the j-dimension
+   INTEGER ::   nn_nchunks_k   !: number of chunks required in the k-dimension
+   INTEGER ::   nn_nchunks_t   !: number of chunks required in the t-dimension
    LOGICAL ::   ln_nc4zip      !: netcdf4 usage: (T) chunk and compress output using the HDF5 sublayers of netcdf4
-   !                           !                 (F) ignore chunking request and use the netcdf4 library 
-   !                           !                     to produce netcdf3-compatible files 
+   !                           !                 (F) ignore chunking request and use the netcdf4 library
+   !                           !                     to produce netcdf3-compatible files
 #endif
 
@@ -85 +85 @@
    !!----------------------------------------------------------------------
    INTEGER ::   nitrst                !: time step at which restart file should be written
-   LOGICAL ::   lrst_oce              !: logical to control the oce restart write 
-   LOGICAL ::   lrst_ice              !: logical to control the ice restart write 
-   LOGICAL ::   lrst_abl              !: logical to control the abl restart write 
+   LOGICAL ::   lrst_oce              !: logical to control the oce restart write
+   LOGICAL ::   lrst_ice              !: logical to control the ice restart write
+   LOGICAL ::   lrst_abl              !: logical to control the abl restart write
    INTEGER ::   numror = 0            !: logical unit for ocean restart (read). Init to 0 is needed for SAS (in daymod.F90)
    INTEGER ::   numrir = 0            !: logical unit for ice   restart (read)
@@ -155 +155 @@
 
    !!----------------------------------------------------------------------
-   !!                          Run control  
+   !!                          Run control
    !!----------------------------------------------------------------------
    INTEGER       ::   no_print = 0          !: optional argument of fld_fill (if present, suppress some control print)