New URL for NEMO forge!   http://forge.nemo-ocean.eu

Since March 2022 along with NEMO 4.2 release, the code development moved to a self-hosted GitLab.
This present forge is now archived and remained online for history.
Changeset 828 for branches/dev_002_LIM/NEMO/OPA_SRC/SBC/flx_oce.F90 – NEMO

Ignore:
Timestamp:
2008-03-06T17:16:27+01:00 (16 years ago)
Author:
rblod
Message:

Complete previous commit in correcting a few compilation bugs, see ticket #71

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/dev_002_LIM/NEMO/OPA_SRC/SBC/flx_oce.F90

    r827 r828  
    3737#if defined key_lim3  
    3838   REAL(wp), PUBLIC, DIMENSION(jpi,jpj,jpl)    ::   &  !: 
    39 #elif defined key_lim2  
     39#else 
    4040   REAL(wp), PUBLIC, DIMENSION(jpi,jpj)    ::   &  !: 
    4141#endif 
    … …  
    5555#if defined key_lim3  
    5656   REAL(wp), PUBLIC, DIMENSION(jpi,jpj,jpl)    ::   &  !: 
    57 #elif defined key_lim2  
     57#else 
    5858   REAL(wp), PUBLIC, DIMENSION(jpi,jpj)    ::   &  !: 
    5959#endif 
Note: See TracChangeset for help on using the changeset viewer.