[2027] | 1 | MODULE step_oce |
---|
| 2 | !!====================================================================== |
---|
| 3 | !! *** MODULE step_oce *** |
---|
[2382] | 4 | !! Ocean time-stepping : module used in both initialisation phase and time stepping |
---|
[2104] | 5 | !!====================================================================== |
---|
[5836] | 6 | !! History : 3.3 ! 2010-08 (C. Ethe) Original code - reorganisation of the initial phase |
---|
| 7 | !! 3.7 ! 2014-01 (G. Madec) LDF simplication |
---|
[2287] | 8 | !!---------------------------------------------------------------------- |
---|
[9019] | 9 | USE oce ! ocean dynamics and tracers variables |
---|
| 10 | USE dom_oce ! ocean space and time domain variables |
---|
| 11 | USE zdf_oce ! ocean vertical physics variables |
---|
| 12 | USE zdfdrg , ONLY : ln_drgimp ! implicit top/bottom friction |
---|
[2027] | 13 | |
---|
[9019] | 14 | USE daymod ! calendar (day routine) |
---|
[2027] | 15 | |
---|
[9019] | 16 | USE sbc_oce ! surface boundary condition: ocean |
---|
| 17 | USE sbcmod ! surface boundary condition (sbc routine) |
---|
| 18 | USE sbcrnf ! surface boundary condition: runoff variables |
---|
| 19 | USE sbccpl ! surface boundary condition: coupled formulation (call send at end of step) |
---|
| 20 | USE sbcapr ! surface boundary condition: atmospheric pressure |
---|
[12377] | 21 | USE tide_mod, ONLY : ln_tide, tide_update |
---|
[9019] | 22 | USE sbcwave ! Wave intialisation |
---|
[2027] | 23 | |
---|
[12377] | 24 | USE isf_oce ! ice shelf boundary condition |
---|
| 25 | USE isfstp ! ice shelf boundary condition (isf_stp routine) |
---|
| 26 | |
---|
[9019] | 27 | USE traqsr ! solar radiation penetration (tra_qsr routine) |
---|
[12377] | 28 | USE traisf ! ice shelf (tra_isf routine) |
---|
[9019] | 29 | USE trasbc ! surface boundary condition (tra_sbc routine) |
---|
| 30 | USE trabbc ! bottom boundary condition (tra_bbc routine) |
---|
| 31 | USE trabbl ! bottom boundary layer (tra_bbl routine) |
---|
| 32 | USE tradmp ! internal damping (tra_dmp routine) |
---|
| 33 | USE traadv ! advection scheme control (tra_adv_ctl routine) |
---|
| 34 | USE traldf ! lateral mixing (tra_ldf routine) |
---|
| 35 | USE trazdf ! vertical mixing (tra_zdf routine) |
---|
[12377] | 36 | USE traatf ! time filtering (tra_atf routine) |
---|
[9019] | 37 | USE tranpc ! non-penetrative convection (tra_npc routine) |
---|
[2027] | 38 | |
---|
[9019] | 39 | USE eosbn2 ! equation of state (eos_bn2 routine) |
---|
[2027] | 40 | |
---|
[9019] | 41 | USE divhor ! horizontal divergence (div_hor routine) |
---|
| 42 | USE dynadv ! advection (dyn_adv routine) |
---|
| 43 | USE dynvor ! vorticity term (dyn_vor routine) |
---|
| 44 | USE dynhpg ! hydrostatic pressure grad. (dyn_hpg routine) |
---|
| 45 | USE dynldf ! lateral momentum diffusion (dyn_ldf routine) |
---|
| 46 | USE dynzdf ! vertical diffusion (dyn_zdf routine) |
---|
| 47 | USE dynspg ! surface pressure gradient (dyn_spg routine) |
---|
[3294] | 48 | |
---|
[12377] | 49 | USE dynatf ! time-filtering (dyn_atf routine) |
---|
[2027] | 50 | |
---|
[9019] | 51 | USE stopar ! Stochastic parametrization (sto_par routine) |
---|
[5329] | 52 | USE stopts |
---|
| 53 | |
---|
[9019] | 54 | USE bdy_oce , ONLY : ln_bdy |
---|
| 55 | USE bdydta ! open boundary condition data (bdy_dta routine) |
---|
| 56 | USE bdytra ! bdy cond. for tracers (bdy_tra routine) |
---|
| 57 | USE bdydyn3d ! bdy cond. for baroclinic vel. (bdy_dyn3d routine) |
---|
[2027] | 58 | |
---|
[9019] | 59 | USE sshwzv ! vertical velocity and ssh (ssh_nxt routine) |
---|
[4292] | 60 | ! (ssh_swp routine) |
---|
| 61 | ! (wzv routine) |
---|
[9019] | 62 | USE domvvl ! variable vertical scale factors (dom_vvl_sf_nxt routine) |
---|
[4292] | 63 | ! (dom_vvl_sf_swp routine) |
---|
[2027] | 64 | |
---|
[9019] | 65 | USE ldfslp ! iso-neutral slopes (ldf_slp routine) |
---|
| 66 | USE ldfdyn ! lateral eddy viscosity coef. (ldf_dyn routine) |
---|
| 67 | USE ldftra ! lateral eddy diffusive coef. (ldf_tra routine) |
---|
[2027] | 68 | |
---|
[9019] | 69 | USE zdfphy ! vertical physics manager (zdf_phy_init routine) |
---|
| 70 | USE zdfosm , ONLY : osm_rst, dyn_osm, tra_osm ! OSMOSIS routines used in step.F90 |
---|
[2027] | 71 | |
---|
[12377] | 72 | USE diu_layers ! diurnal SST bulk and coolskin routines |
---|
[6140] | 73 | USE sbc_oce ! surface fluxes |
---|
| 74 | |
---|
[9019] | 75 | USE zpshde ! partial step: hor. derivative (zps_hde routine) |
---|
[2027] | 76 | |
---|
[9019] | 77 | USE diawri ! Standard run outputs (dia_wri routine) |
---|
| 78 | USE diaptr ! poleward transports (dia_ptr routine) |
---|
| 79 | USE diadct ! sections transports (dia_dct routine) |
---|
| 80 | USE diaar5 ! AR5 diagnosics (dia_ar5 routine) |
---|
| 81 | USE diahth ! thermocline depth (dia_hth routine) |
---|
| 82 | USE diahsb ! heat, salt and volume budgets (dia_hsb routine) |
---|
[6140] | 83 | USE diacfl |
---|
[9213] | 84 | USE diaobs ! Observation operator |
---|
[12377] | 85 | USE diadetide ! Weights computation for daily detiding of model diagnostics |
---|
| 86 | USE diamlr ! IOM context management for multiple-linear-regression analysis |
---|
[9019] | 87 | USE flo_oce ! floats variables |
---|
| 88 | USE floats ! floats computation (flo_stp routine) |
---|
[2027] | 89 | |
---|
[9019] | 90 | USE crsfld ! Standard output on coarse grid (crs_fld routine) |
---|
[4152] | 91 | |
---|
[9019] | 92 | USE asminc ! assimilation increments (tra_asm_inc routine) |
---|
[3294] | 93 | ! (dyn_asm_inc routine) |
---|
[3764] | 94 | USE asmbkg |
---|
[9019] | 95 | USE stpctl ! time stepping control (stp_ctl routine) |
---|
| 96 | USE restart ! ocean restart (rst_wri routine) |
---|
| 97 | USE prtctl ! Print control (prt_ctl routine) |
---|
[2027] | 98 | |
---|
[9019] | 99 | USE in_out_manager ! I/O manager |
---|
| 100 | USE iom ! |
---|
[5836] | 101 | USE lbclnk |
---|
[9019] | 102 | USE timing ! Timing |
---|
[3294] | 103 | |
---|
[5836] | 104 | #if defined key_iomput |
---|
[9019] | 105 | USE xios ! I/O server |
---|
[5836] | 106 | #endif |
---|
[2027] | 107 | #if defined key_agrif |
---|
[9570] | 108 | USE agrif_oce_sponge ! Momemtum and tracers sponges |
---|
[9780] | 109 | USE agrif_all_update ! Main update driver |
---|
[9485] | 110 | #endif |
---|
[9023] | 111 | #if defined key_top |
---|
[12377] | 112 | USE trcstp, ONLY : trc_stp ! passive tracer time-stepping (trc_stp routine) |
---|
[3769] | 113 | #endif |
---|
[2382] | 114 | !!---------------------------------------------------------------------- |
---|
[9598] | 115 | !! NEMO/OCE 4.0 , NEMO Consortium (2018) |
---|
[2382] | 116 | !! $Id$ |
---|
[10068] | 117 | !! Software governed by the CeCILL license (see ./LICENSE) |
---|
[2027] | 118 | !!====================================================================== |
---|
| 119 | END MODULE step_oce |
---|