Changeset 9310


Ignore:
Timestamp:
2018-02-06T12:35:27+01:00 (2 years ago)
Author:
jpalmier
Message:

JPALM — minor typo corrections

Location:
branches/NERC/dev_r5518_GO6_CO2_cmip/NEMOGCM/NEMO/TOP_SRC/MEDUSA
Files:
2 edited

Legend:

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

    r9309 r9310  
    296296!! 
    297297#if defined key_axy_pi_co2 
    298    LOGICAL , PUBLIC ::   lk_pi_co2 = .TRUE.  !: OASIS used 
     298   LOGICAL , PUBLIC ::   lk_pi_co2 = .TRUE.  !: PI xCO2 used 
    299299#else 
    300    LOGICAL , PUBLIC ::   lk_pi_co2 = .FALSE. !: OASIS unused 
     300   LOGICAL , PUBLIC ::   lk_pi_co2 = .FALSE. !: PI xCO2 unused 
    301301#endif 
    302302 
  • branches/NERC/dev_r5518_GO6_CO2_cmip/NEMOGCM/NEMO/TOP_SRC/MEDUSA/trcbio_medusa.F90

    r9309 r9310  
    305305         IF ( ( kt == nittrc000 ) .AND. lwp )     & 
    306306             WRITE(numout,*) '** MEDUSA Atm xCO2 fixed to pre-industrial value **' 
    307          !! f_xco2a(:,:) = 284.725  !! CMIP5 pre-industrial pCO2 
     307         !! f_xco2a(:,:) = 284.725       !! CMIP5 pre-industrial pCO2 
    308308         f_xco2a(:,:) = 284.317          !! CMIP6 pre-industrial pCO2  
    309309      ELSE       
Note: See TracChangeset for help on using the changeset viewer.