Changeset 12841 for NEMO/releases/r4.0/r4.0-HEAD/src/OFF/nemogcm.F90
- Timestamp:
- 2020-05-01T12:52:40+02:00 (4 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/releases/r4.0/r4.0-HEAD/src/OFF/nemogcm.F90
r12640 r12841 27 27 USE usrdef_nam ! user defined configuration 28 28 USE eosbn2 ! equation of state (eos bn2 routine) 29 ! ! ocean physics 29 ! ! ocean physics 30 USE bdy_oce, ONLY : ln_bdy 31 USE bdyini ! open boundary cond. setting (bdy_init routine) 30 32 USE ldftra ! lateral diffusivity setting (ldf_tra_init routine) 31 33 USE ldfslp ! slopes of neutral surfaces (ldf_slp_init routine) … … 312 314 313 315 CALL sbc_init ! Forcings : surface module 316 CALL bdy_init ! Open boundaries initialisation 314 317 315 318 ! ! Tracer physics … … 476 479 USE zdf_oce, ONLY : zdf_oce_alloc 477 480 USE trc_oce, ONLY : trc_oce_alloc 481 USE bdy_oce, ONLY : bdy_oce_alloc 478 482 ! 479 483 INTEGER :: ierr … … 485 489 ierr = ierr + zdf_oce_alloc() ! ocean vertical physics 486 490 ierr = ierr + trc_oce_alloc() ! shared TRC / TRA arrays 491 ierr = ierr + bdy_oce_alloc() ! bdy masks (incl. initialization) 492 487 493 ! 488 494 CALL mpp_sum( 'nemogcm', ierr )
Note: See TracChangeset
for help on using the changeset viewer.