Changeset 60

Timestamp:

2004-04-22T13:47:17+02:00 (20 years ago)

Author:

opalod

Message:

CT : BUGFIX034 : Compilation error corrected when using key_flx_forced_daily cpp key. Due to the wrong arrays dimension declaration in flx_oce.F90

File:

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

trunk/NEMO/OPA_SRC/SBC/flx_oce.F90

@@ -23 +23 @@
    !! 'key_flx_forced_daily'
    !!----------------------------------------------------------------------
-   REAL(wp), PUBLIC, DIMENSION(jpi,jpj,3) ::   &  !:
+   REAL(wp), PUBLIC, DIMENSION(jpi,jpj) ::   &  !:
       p_qt ,        &   !: total heat flux ( solar + non solar)
       p_qsr,        &   !: solar heat flux