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 3191 for branches/2011/dev_NEMO_MERGE_2011/NEMOGCM/NEMO/OPA_SRC/BDY/bdydyn2d.F90 – NEMO

Ignore:
Timestamp:
2011-12-05T10:41:41+01:00 (12 years ago)
Author:
davestorkey
Message:
  1. Bug fix for BDY and fldread.F90.
  2. Update history comments for BDY.
  3. Remove redundant namelist variables in BDY.
File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/2011/dev_NEMO_MERGE_2011/NEMOGCM/NEMO/OPA_SRC/BDY/bdydyn2d.F90

    r3182 r3191  
    22   !!====================================================================== 
    33   !!                       ***  MODULE  bdydyn  *** 
    4    !! Unstructured Open Boundary Cond. :   Flow relaxation scheme on velocities 
     4   !! Unstructured Open Boundary Cond. :   Apply boundary conditions to barotropic solution 
    55   !!====================================================================== 
    6    !! History :  1.0  !  2005-02  (J. Chanut, A. Sellar)  Original code 
    7    !!             -   !  2007-07  (D. Storkey) Move Flather implementation to separate routine. 
    8    !!            3.0  !  2008-04  (NEMO team)  add in the reference version 
    9    !!            3.2  !  2008-04  (R. Benshila) consider velocity instead of transport  
    10    !!            3.3  !  2010-09  (E.O'Dea) modifications for Shelf configurations  
    11    !!            3.3  !  2010-09  (D.Storkey) add ice boundary conditions 
     6   !! History :  3.4  !  2011     (D. Storkey) new module as part of BDY rewrite 
    127   !!---------------------------------------------------------------------- 
    138#if defined key_bdy  
    … …  
    3025   PRIVATE 
    3126 
    32    PUBLIC   bdy_dyn2d     ! routine called in dynspg_ts and dyn_nxt and dynspg_flt 
     27   PUBLIC   bdy_dyn2d     ! routine called in dynspg_ts and bdy_dyn 
    3328 
    3429   !!---------------------------------------------------------------------- 
    … …  
    6055            CALL bdy_dyn2d_fla( idx_bdy(ib_bdy), dta_bdy(ib_bdy) ) 
    6156         CASE DEFAULT 
    62             CALL ctl_stop( 'bdy_dyn3d : unrecognised option for open boundaries for barotropic variables' ) 
     57            CALL ctl_stop( 'bdy_dyn2d : unrecognised option for open boundaries for barotropic variables' ) 
    6358         END SELECT 
    6459      ENDDO 
Note: See TracChangeset for help on using the changeset viewer.