Changeset 2848 for branches/2011/dev_r2802_MERCATOR10_diadct/NEMOGCM/NEMO/OPA_SRC/IOM/in_out_manager.F90

Timestamp:

2011-09-21T12:33:48+02:00 (13 years ago)

Author:

cbricaud

Message:

add routines for online transports computing

File:

• branches/2011/dev_r2802_MERCATOR10_diadct/NEMOGCM/NEMO/OPA_SRC/IOM/in_out_manager.F90 (modified) (1 diff)

branches/2011/dev_r2802_MERCATOR10_diadct/NEMOGCM/NEMO/OPA_SRC/IOM/in_out_manager.F90

@@ -105 +105 @@
    !!                        logical units
    !!----------------------------------------------------------------------
-   INTEGER ::   numstp     =   -1      !: logical unit for time step
-   INTEGER ::   numout     =    6      !: logical unit for output print
-   INTEGER ::   numnam     =   -1      !: logical unit for namelist
-   INTEGER ::   numnam_ice =   -1      !: logical unit for ice namelist
-   INTEGER ::   numevo_ice =   -1      !: logical unit for ice variables (temp. evolution)
-   INTEGER ::   numsol     =   -1      !: logical unit for solver statistics
+   INTEGER ::   numstp      =   -1      !: logical unit for time step
+   INTEGER ::   numout      =    6      !: logical unit for output print
+   INTEGER ::   numnam      =   -1      !: logical unit for namelist
+   INTEGER ::   numnam_ice  =   -1      !: logical unit for ice namelist
+   INTEGER ::   numevo_ice  =   -1      !: logical unit for ice variables (temp. evolution)
+   INTEGER ::   numsol      =   -1      !: logical unit for solver statistics
+   INTEGER ::   numdct_in   =   -1      !: logical unit for transports computing
+   INTEGER ::   numdct_vol  =   -1      !: logical unit for voulume transports output
+   INTEGER ::   numdct_heat =   -1      !: logical unit for heat    transports output
+   INTEGER ::   numdct_salt =   -1      !: logical unit for salt    transports output
 
    !!----------------------------------------------------------------------