Changeset 7831


Ignore:
Timestamp:
2017-03-24T11:44:55+01:00 (4 years ago)
Author:
jamesharle
Message:

Remove key_tide from dynspg_ts.F90 (ticket #1874)

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/NEMOGCM/NEMO/OPA_SRC/DYN/dynspg_ts.F90

    r7753 r7831  
    632632         !                                                !  ------------------ 
    633633         ! Update only tidal forcing at open boundaries 
    634 #if defined key_tide 
    635634         IF( ln_bdy      .AND. ln_tide )   CALL bdy_dta_tides( kt, kit=jn, time_offset= noffset+1 ) 
    636635         IF( ln_tide_pot .AND. ln_tide )   CALL upd_tide     ( kt, kit=jn, time_offset= noffset   ) 
    637 #endif 
    638636         ! 
    639637         ! Set extrapolation coefficients for predictor step: 
Note: See TracChangeset for help on using the changeset viewer.