Changeset 14173


Ignore:
Timestamp:
2020-12-15T13:44:07+01:00 (4 months ago)
Author:
cetlod
Message:

Bugfix to ensure restartability of AGE tracer when using euler time-stepping in TOP

File:
1 edited

Legend:

Unmodified
Added
Removed
  • NEMO/trunk/src/TOP/AGE/trcsms_age.F90

    r12377 r14173  
    5656      IF(lwp) WRITE(numout,*) ' ~~~~~~~~~~~~~~' 
    5757 
     58      IF( l_1st_euler .OR. ln_top_euler ) THEN 
     59         tr(:,:,:,jp_age,Kbb) = tr(:,:,:,jp_age,Kmm) 
     60      ENDIF 
     61 
    5862 
    5963      DO jk = 1, nla_age 
Note: See TracChangeset for help on using the changeset viewer.