Changes between Version 1 and Version 2 of Ticket #2564


Ignore:
Timestamp:
2020-12-03T13:50:55+01:00 (4 months ago)
Author:
hadcv
Comment:

Legend:

Unmodified
Added
Removed
Modified
  • Ticket #2564 – Description

    v1 v2  
    6060+              irec_n(jp_tem) = sf_tsd(jp_tem)%nrec(1,sf_tsd(jp_tem)%naa)            ! Determine if there is new data (ln_tint = F) 
    6161+              irec_n(jp_sal) = sf_tsd(jp_sal)%nrec(1,sf_tsd(jp_sal)%naa)            ! If not, then do not apply the increments 
    62 +              IF( kt == nit000 ) irec_b = irec_n 
     62+              IF( kt == nit000 ) irec_b = -1 
    6363               ! 
    6464               ij0 = 101 + nn_hls       ;   ij1 = 109 + nn_hls                       ! Reduced T & S in the Alboran Sea