- Timestamp:
- 2011-12-05T10:41:41+01:00 (13 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2011/dev_NEMO_MERGE_2011/NEMOGCM/NEMO/OPA_SRC/BDY/bdydyn2d.F90
r3182 r3191 2 2 !!====================================================================== 3 3 !! *** MODULE bdydyn *** 4 !! Unstructured Open Boundary Cond. : Flow relaxation scheme on velocities4 !! Unstructured Open Boundary Cond. : Apply boundary conditions to barotropic solution 5 5 !!====================================================================== 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 12 7 !!---------------------------------------------------------------------- 13 8 #if defined key_bdy … … 30 25 PRIVATE 31 26 32 PUBLIC bdy_dyn2d ! routine called in dynspg_ts and dyn_nxt and dynspg_flt27 PUBLIC bdy_dyn2d ! routine called in dynspg_ts and bdy_dyn 33 28 34 29 !!---------------------------------------------------------------------- … … 60 55 CALL bdy_dyn2d_fla( idx_bdy(ib_bdy), dta_bdy(ib_bdy) ) 61 56 CASE DEFAULT 62 CALL ctl_stop( 'bdy_dyn 3d : unrecognised option for open boundaries for barotropic variables' )57 CALL ctl_stop( 'bdy_dyn2d : unrecognised option for open boundaries for barotropic variables' ) 63 58 END SELECT 64 59 ENDDO
Note: See TracChangeset
for help on using the changeset viewer.