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/DYN/dynspg_flt.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/DYN/dynspg_flt.F90

    r2797 r2800  
    3333   USE solpcg          ! preconditionned conjugate gradient solver 
    3434   USE solsor          ! Successive Over-relaxation solver 
    35    USE obcdyn3d        ! ocean open boundary condition (obc_dyn3d routines) 
     35   USE obcdyn          ! ocean open boundary condition on dynamics 
    3636   USE obcvol          ! ocean open boundary condition (obc_vol routines) 
    3737   USE cla             ! cross land advection 
     
    180180 
    181181#if defined key_obc 
    182       CALL obc_dyn3d( kt )    ! Update velocities on each open boundary 
    183       CALL obc_vol( kt )      ! Correction of the barotropic componant velocity to control the volume of the system 
     182      CALL obc_dyn( kt )      ! Update velocities on each open boundary 
     183      CALL obc_vol( kt )      ! Correction of the barotropic component velocity to control the volume of the system 
    184184#endif 
    185185#if defined key_agrif 
Note: See TracChangeset for help on using the changeset viewer.