Changeset 2952
- Timestamp:
- 2011-10-18T13:47:07+02:00 (13 years ago)
- Location:
- branches/2011/dev_r2787_MERCATOR3_tidalpot/NEMOGCM/NEMO/OPA_SRC
- Files:
-
- 4 added
- 4 deleted
- 3 edited
-
DYN/dynspg_ts.F90 (modified) (1 diff)
-
SBC/sbctide.F90 (added)
-
SBC/tide.h90 (added)
-
SBC/tide_mod.F90 (added)
-
SBC/updtide.F90 (added)
-
step.F90 (modified) (1 diff)
-
step_oce.F90 (modified) (1 diff)
-
tide.h90 (deleted)
-
tide_mod.F90 (deleted)
-
tideini.F90 (deleted)
-
updtide.F90 (deleted)
Legend:
- Unmodified
- Added
- Removed
-
branches/2011/dev_r2787_MERCATOR3_tidalpot/NEMOGCM/NEMO/OPA_SRC/DYN/dynspg_ts.F90
r2920 r2952 35 35 USE bdydyn ! unstructured open boundaries 36 36 USE bdytides ! tidal forcing at unstructured open boundaries. 37 USE tideini37 USE sbctide 38 38 USE updtide 39 39 USE lib_mpp ! distributed memory computing library -
branches/2011/dev_r2787_MERCATOR3_tidalpot/NEMOGCM/NEMO/OPA_SRC/step.F90
r2920 r2952 97 97 IF( lk_dtasal ) CALL dta_sal( kstp ) ! update 3D salinity data 98 98 CALL sbc ( kstp ) ! Sea Boundary Condition (including sea-ice) 99 IF( lk_tide ) CALL tide_init( kstp )99 IF( lk_tide ) CALL sbc_tide( kstp ) 100 100 IF( lk_obc ) CALL obc_dta( kstp ) ! update dynamic and tracer data at open boundaries 101 101 IF( lk_obc ) CALL obc_rad( kstp ) ! compute phase velocities at open boundaries -
branches/2011/dev_r2787_MERCATOR3_tidalpot/NEMOGCM/NEMO/OPA_SRC/step_oce.F90
r2920 r2952 23 23 USE sbccpl ! surface boundary condition: coupled formulation (call send at end of step) 24 24 USE cpl_oasis3, ONLY : lk_cpl 25 USE tideini! Tide initialisation25 USE sbctide ! Tide initialisation 26 26 27 27 USE traqsr ! solar radiation penetration (tra_qsr routine)
Note: See TracChangeset
for help on using the changeset viewer.
