Changeset 8402


Ignore:
Timestamp:
2017-08-02T15:12:29+02:00 (8 weeks ago)
Author:
Tomas Lovato
Message:

3.6_stable: Add control in CFCs time interpolation (#1930)

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/2015/nemo_v3_6_STABLE/NEMOGCM/NEMO/TOP_SRC/CFC/trcsms_cfc.F90

    r8396 r8402  
    117117         im2       =      nmonth - 7 
    118118      ENDIF 
     119      ! Avoid bad interpolation if starting date is =< 1900 
     120      if( iyear_beg .LE. 0 ) iyear_beg = 1 
     121      ! 
    119122      iyear_end = iyear_beg + 1 
    120  
    121123      !                                                  !------------! 
    122124      DO jl = 1, jp_cfc                                  !  CFC loop  ! 
Note: See TracChangeset for help on using the changeset viewer.