Changeset 2068 for branches/DEV_r1837_MLF/NEMO/OPA_SRC/SBC/sbc_oce.F90

Timestamp:

2010-09-06T17:56:51+02:00 (14 years ago)

Author:

mlelod

Message:

ticket: #663 ensuring restartability and conservation

File:

• branches/DEV_r1837_MLF/NEMO/OPA_SRC/SBC/sbc_oce.F90 (modified) (1 diff)

branches/DEV_r1837_MLF/NEMO/OPA_SRC/SBC/sbc_oce.F90

@@ -52 +52 @@
    REAL(wp), PUBLIC, DIMENSION(jpi,jpj) ::   emps   , emps_b   !: freshwater budget: concentration/dillution   [Kg/m2/s]
    REAL(wp), PUBLIC, DIMENSION(jpi,jpj) ::   emp_tot           !: total E-P-R over ocean and ice               [Kg/m2/s]
-   ! - ML - beginning
+   ! - ML - begin
    REAL(wp), PUBLIC, DIMENSION(jpi,jpj) ::   sbc_trd_hc_n      !: sbc heat content trend now                   [K/m/s]
    REAL(wp), PUBLIC, DIMENSION(jpi,jpj) ::   sbc_trd_hc_b      !:  "   "      "      "   before                   "