New URL for NEMO forge!   http://forge.nemo-ocean.eu

Since March 2022 along with NEMO 4.2 release, the code development moved to a self-hosted GitLab.
This present forge is now archived and remained online for history.
Changeset 2800 for branches/2011/UKMO_MERCATOR_obc_bdy_merge/NEMOGCM/NEMO/OPA_SRC/SBC/fldread.F90 – NEMO

Ignore:
Timestamp:
2011-07-13T15:31:05+02:00 (13 years ago)
Author:
davestorkey
Message:
  1. Application of boundary conditions to barotropic and baroclinic velocities clearly separated.
  2. Option to input full velocities in boundary data (default expects barotropic and baroclinic velocities separately).
  3. Option to use initial conditions as boundary conditions coded.
File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/2011/UKMO_MERCATOR_obc_bdy_merge/NEMOGCM/NEMO/OPA_SRC/SBC/fldread.F90

    r2797 r2800  
    134134      !!--------------------------------------------------------------------- 
    135135      ! Note that shifting time to be centrered in the middle of sbc time step impacts only nsec_* variables of the calendar  
    136       IF( present(timeshift) ) THEN 
     136      IF( present(jit) ) THEN  
     137         ! ignore kn_fsbc in this case 
     138         isecsbc = nsec_year + nsec1jan000 + jit*rdt/REAL(nn_baro,wp) 
     139      ELSE IF( present(timeshift) ) THEN 
    137140         isecsbc = nsec_year + nsec1jan000 + NINT(0.5 * REAL(kn_fsbc - 1,wp) * rdttra(1)) + timeshift * rdttra(1)  ! middle of sbc time step 
    138141      ELSE 
Note: See TracChangeset for help on using the changeset viewer.