Ignore:
Timestamp:
2015-06-04T19:59:08+02:00 (5 years ago)
Author:
cetlod
Message:

dev_r5204_CNRS_PISCES_dcy : bugfix to ensure restartability for configuration with PISCES

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/2015/dev_r5204_CNRS_PISCES_dcy/NEMOGCM/NEMO/TOP_SRC/PISCES/P4Z/p4zsms.F90

    r5348 r5354  
    9898      ENDIF 
    9999      ! 
    100       IF( ( ln_top_euler .AND. kt == nittrc000 )  .OR. ( .NOT.ln_top_euler .AND. kt == nittrc000 + nn_dttrc ) ) THEN 
     100      IF( ( ln_top_euler .AND. kt == nittrc000 )  .OR. ( .NOT.ln_top_euler .AND. kt <= nittrc000 + nn_dttrc ) ) THEN 
    101101         rfactr  = 1. / rfact 
    102102         rfact2  = rfact / FLOAT( nrdttrc ) 
Note: See TracChangeset for help on using the changeset viewer.