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 10007 for branches/UKMO/dev_r5518_GO6_fix_cpp_keys/NEMOGCM/NEMO/TOP_SRC/MEDUSA/trcbio_medusa.F90 – NEMO

Ignore:
Timestamp:
2018-07-26T17:13:32+02:00 (6 years ago)
Author:
frrh
Message:

It turns out we do need certain CPP macros - so we need to introduce
explicit declarations based on key_vvl.

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/UKMO/dev_r5518_GO6_fix_cpp_keys/NEMOGCM/NEMO/TOP_SRC/MEDUSA/trcbio_medusa.F90

    r10004 r10007  
    7878                                            zfer, zpds, zphd, zphn, zsil,   & 
    7979                                            zzme, zzmi 
    80       USE dom_oce,                    ONLY: e3t_0,                          & 
    81                                             gdept_0,                        & 
    82                                             gdepw_0,                        & 
    83                                             nday_year, nsec_day,            & 
     80      USE dom_oce,                    ONLY: e3t_0, gdept_0,  gdepw_0,       & 
     81                                            nday_year, nsec_day,            &  
    8482                                            nyear, nyear_len, ndastp,       & 
    8583                                            nsec_month,                     & 
    8684                                            rdt, tmask, mig, mjg, nimpp,    & 
    8785                                            njmpp  
     86#if defined key_vvl 
     87      USE dom_oce,                    ONLY: e3t_n, gdept_n,  gdepw_n 
     88#endif 
     89 
    8890      USE in_out_manager,             ONLY: lwp, numout, nn_date0 
    8991      USE iom,                        ONLY: lk_iomput 
Note: See TracChangeset for help on using the changeset viewer.