Changeset 4525 for branches/dev_r4028_CNRS_LIM3_MV2014/NEMOGCM/NEMO/OPA_SRC

Timestamp:

2014-03-13T16:35:37+01:00 (10 years ago)

Author:

flavoni

Message:

change limwri.F90, use iom_put for all variables

File:

• branches/dev_r4028_CNRS_LIM3_MV2014/NEMOGCM/NEMO/OPA_SRC/IOM/iom.F90 (modified) (2 diffs)

branches/dev_r4028_CNRS_LIM3_MV2014/NEMOGCM/NEMO/OPA_SRC/IOM/iom.F90

@@ -32 +32 @@
    USE trc_oce, ONLY :   nn_dttrc        !  !: frequency of step on passive tracers
    USE icb_oce, ONLY :   class_num       !  !: iceberg classes
+   USE par_ice
    USE domngb          ! ocean space and time domain
    USE phycst          ! physical constants
@@ -131 +132 @@
       CALL iom_set_axis_attr( "nfloat", (/ (REAL(ji,wp), ji=1,nfloat) /) )
 # endif
+      CALL iom_set_axis_attr( "ncatice", (/ (REAL(ji,wp), ji=1,jpl) /) )
       CALL iom_set_axis_attr( "icbcla", class_num )