Changeset 2561 for trunk/NEMOGCM/NEMO/OPA_SRC/SBC/sbcmod.F90

Timestamp:

2011-01-17T17:22:58+01:00 (13 years ago)

Author:

cetlod

Message:

Suppression of special characters in the name of output variables & check consistency with iodef.xml

File:

• trunk/NEMOGCM/NEMO/OPA_SRC/SBC/sbcmod.F90 (modified) (1 diff)

trunk/NEMOGCM/NEMO/OPA_SRC/SBC/sbcmod.F90

@@ -306 +306 @@
       !                                                ! ---------------------------------------- !
       IF( MOD( kt-1, nn_fsbc ) == 0 ) THEN
-         CALL iom_put( "emp-rnf" , emp  - rnf )                   ! upward water flux
-         CALL iom_put( "emps-rnf", emps - rnf )                   ! c/d water flux
-         CALL iom_put( "qns+qsr" , qns  + qsr )                   ! total heat flux 
-         CALL iom_put( "qns"     , qns        )                   ! solar heat flux
-         CALL iom_put( "qsr"     ,       qsr  )                   ! solar heat flux
+         CALL iom_put( "empmr" , emp  - rnf )                   ! upward water flux
+         CALL iom_put( "empsmr", emps - rnf )                   ! c/d water flux
+         CALL iom_put( "qt"    , qns  + qsr )                   ! total heat flux 
+         CALL iom_put( "qns"   , qns        )                   ! solar heat flux
+         CALL iom_put( "qsr"   ,       qsr  )                   ! solar heat flux
          IF( nn_ice > 0 )   CALL iom_put( "ice_cover", fr_i )   ! ice fraction 
       ENDIF