Ignore:
Timestamp:
07/26/23 11:18:58 (10 months ago)
Author:
acosce
Message:

update with last version of ORCA1_LIM3_PISCES + fix typo error in SOURCES/LMDZ

File:
1 edited

Legend:

Unmodified
Added
Removed
  • CONFIG/UNIFORM/v6/IPSLCM6.3/SOURCES/LMDZ/conf_phys_m.F90

    r6571 r6574  
    3434    use config_ocean_skin_m, only: config_ocean_skin 
    3535    USE phys_state_var_mod, ONLY: phys_tstep 
     36    USE infotrac_phy, ONLY: type_trac 
    3637 
    3738    INCLUDE "conema3.h" 
     
    28202821 
    28212822    ! Test on chemistry cycle  
    2822     IF (type_trac .ne. inca .AND. dms_cycle_cpl ) THEN  
     2823    IF ((type_trac .ne. "inca" .AND. type_trac .ne. "inco") .AND. dms_cycle_cpl ) THEN  
    28232824       CALL abort_physic('conf_phys', 'dms_cycle_cpl has to be TRUE only with INCA coupling model',1) 
    28242825    ENDIF 
Note: See TracChangeset for help on using the changeset viewer.