Changeset 3368


Ignore:
Timestamp:
Jul 9, 2018, 11:32:37 AM (6 years ago)
Author:
fhourdin
Message:

Bug fixing.
replacing USE YOMCST (from phylmd/rrtm) by INCLUDE "YOMCSTS.h"
(from phylmd).
The routine is not used so far.

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/trunk/libf/phylmd/tracco2i_mod.F90

    r3367 r3368  
    112112    USE mod_phys_lmdz_para, ONLY: gather, scatter
    113113    USE phys_cal_mod
    114     USE YOMCST
    115114
    116115    USE netcdf95, ONLY: nf95_close, nf95_gw_var, nf95_inq_varid, nf95_open
    … …  
    119118    IMPLICIT NONE
    120119
     120    INCLUDE "YOMCST.h"
    121121    LOGICAL,INTENT(IN) :: debutphy
    122122    REAL,DIMENSION(klon),INTENT(out) :: co2ff            !  fossil-fuel CO2 emissions
Note: See TracChangeset for help on using the changeset viewer.