Ignore:
Timestamp:
2018-02-06T12:22:05+01:00 (3 years ago)
Author:
jpalmier
Message:

JPALM — make clearer in the code and output which atm xCO2 source is used

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/NERC/dev_r5518_GO6_CO2_cmip/NEMOGCM/NEMO/TOP_SRC/MEDUSA/trcini_medusa.F90

    r9298 r9309  
    329329      !!                     initially done in trcsms_medusa 
    330330      !!---------------------------------------------------------------------- 
    331       !!      
    332       IF(lwp) WRITE(numout,*) ' trc_ini_medusa: initialisating atm CO2 record' 
    333       CALL trc_ini_medusa_co2atm 
    334  
     331      !!  
     332      IF( ( .NOT.lk_oasis ) .AND. ( .NOT.lk_pi_co2 ) ) THEN 
     333         IF(lwp) WRITE(numout,*) ' trc_ini_medusa: initialisating atm CO2 record' 
     334         CALL trc_ini_medusa_co2atm 
     335      ENDIF 
    335336 
    336337   END SUBROUTINE trc_ini_medusa 
Note: See TracChangeset for help on using the changeset viewer.