Ignore:
Timestamp:
2016-11-07T17:59:36+01:00 (4 years ago)
Author:
timgraham
Message:

Remove age tracer as this conflicts with changes for MEDUSA. This will need to be added as a separate branch in suites

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/UKMO/dev_r5518_GO6_package/NEMOGCM/NEMO/TOP_SRC/trcnam.F90

    r7179 r7203  
    2424   USE trcnam_cfc        ! CFC SMS namelist 
    2525   USE trcnam_c14b       ! C14 SMS namelist 
    26    USE trcnam_age        ! AGE SMS namelist 
    2726   USE trcnam_my_trc     ! MY_TRC SMS namelist 
    2827   USE trd_oce        
     
    162161      ENDIF 
    163162 
    164       IF( lk_c14b    ) THEN  ;   CALL trc_nam_c14b         ! C14 bomb     tracers 
    165       ELSE                   ;   IF(lwp) WRITE(numout,*) '          C14 not used' 
    166       ENDIF 
    167  
    168       IF( lk_age     ) THEN  ;   CALL trc_nam_age         ! AGE     tracer 
    169       ELSE                   ;   IF(lwp) WRITE(numout,*) '          AGE not used' 
    170       ENDIF 
    171  
    172       IF( lk_my_trc  ) THEN  ;   CALL trc_nam_my_trc      ! MY_TRC  tracers 
    173       ELSE                   ;   IF(lwp) WRITE(numout,*) '          MY_TRC not used' 
     163      IF( lk_c14b     ) THEN   ;   CALL trc_nam_c14b         ! C14 bomb     tracers 
     164      ELSE                    ;   IF(lwp) WRITE(numout,*) '          C14 not used' 
     165      ENDIF 
     166 
     167      IF( lk_my_trc  ) THEN   ;   CALL trc_nam_my_trc      ! MY_TRC  tracers 
     168      ELSE                    ;   IF(lwp) WRITE(numout,*) '          MY_TRC not used' 
    174169      ENDIF 
    175170      ! 
Note: See TracChangeset for help on using the changeset viewer.