Changeset 5123 for trunk/NEMOGCM/NEMO/OPA_SRC/nemogcm.F90
- Timestamp:
- 2015-03-04T17:06:03+01:00 (6 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/NEMOGCM/NEMO/OPA_SRC/nemogcm.F90
r5120 r5123 384 384 IF( lk_tide ) CALL tide_init( nit000 ) ! Initialisation of the tidal harmonics 385 385 386 CALL sbc_init ! Forcings : surface module (clem: moved here for bdy purpose) 387 386 388 IF( lk_bdy ) CALL bdy_init ! Open boundaries initialisation 387 389 IF( lk_bdy ) CALL bdy_dta_init ! Open boundaries initialisation of external data arrays … … 390 392 391 393 CALL dyn_nept_init ! simplified form of Neptune effect 392 393 394 ! 394 395 IF( ln_crs ) CALL crs_init ! Domain initialization of coarsened grid 395 396 ! 396 397 ! Ocean physics 397 CALL sbc_init ! Forcings : surface module398 398 ! ! Vertical physics 399 399 CALL zdf_init ! namelist read
Note: See TracChangeset
for help on using the changeset viewer.