New URL for NEMO forge!   http://forge.nemo-ocean.eu

Since March 2022 along with NEMO 4.2 release, the code development moved to a self-hosted GitLab.
This present forge is now archived and remained online for history.
step_oce.F90 in branches/DEV_r2106_LOCEAN2010/NEMO/OPA_SRC – NEMO

source: branches/DEV_r2106_LOCEAN2010/NEMO/OPA_SRC/step_oce.F90 @ 2200

Last change on this file since 2200 was 2148, checked in by cetlod, 14 years ago

merge LOCEAN 2010 developments branches

File size: 5.8 KB
Line 
1MODULE step_oce
2   !!======================================================================
3   !!                       ***  MODULE step_oce  ***
4   !! Time-stepping    : module used for the ocean time stepping
5   !!======================================================================
6   USE oce              ! ocean dynamics and tracers variables
7   USE dom_oce          ! ocean space and time domain variables
8   USE zdf_oce          ! ocean vertical physics variables
9   USE ldftra_oce       ! ocean tracer   - trends
10   USE ldfdyn_oce       ! ocean dynamics - trends
11   USE in_out_manager   ! I/O manager
12   USE iom              !
13   USE lbclnk
14
15   USE daymod           ! calendar                         (day     routine)
16
17   USE dtatem           ! ocean temperature data           (dta_tem routine)
18   USE dtasal           ! ocean salinity    data           (dta_sal routine)
19   USE sbcmod           ! surface boundary condition       (sbc     routine)
20   USE sbcrnf           ! surface boundary condition: runoff variables
21   USE sbccpl           ! surface boundary condition: coupled formulation (call send at end of step)
22   USE cpl_oasis3, ONLY : lk_cpl
23
24   USE traqsr           ! solar radiation penetration      (tra_qsr routine)
25   USE trasbc           ! surface boundary condition       (tra_sbc routine)
26   USE trabbc           ! bottom boundary condition        (tra_bbc routine)
27   USE trabbl           ! bottom boundary layer            (tra_bbl routine)
28   USE tradmp           ! internal damping                 (tra_dmp routine)
29   USE traadv           ! advection scheme control     (tra_adv_ctl routine)
30   USE traldf           ! lateral mixing                   (tra_ldf routine)
31   USE cla              ! cross land advection             (tra_cla routine)
32   !   zdfkpp           ! KPP non-local tracer fluxes      (tra_kpp routine)
33   USE trazdf           ! vertical mixing                  (tra_zdf routine)
34   USE tranxt           ! time-stepping                    (tra_nxt routine)
35   USE tranpc           ! non-penetrative convection       (tra_npc routine)
36
37   USE eosbn2           ! equation of state                (eos_bn2 routine)
38
39   USE dynadv           ! advection                        (dyn_adv routine)
40   USE dynbfr           ! Bottom friction terms            (dyn_bfr routine)
41   USE dynvor           ! vorticity term                   (dyn_vor routine)
42   USE dynhpg           ! hydrostatic pressure grad.       (dyn_hpg routine)
43   USE dynldf           ! lateral momentum diffusion       (dyn_ldf routine)
44   USE dynzdf           ! vertical diffusion               (dyn_zdf routine)
45   USE dynspg_oce       ! surface pressure gradient        (dyn_spg routine)
46   USE dynspg           ! surface pressure gradient        (dyn_spg routine)
47   USE dynnxt           ! time-stepping                    (dyn_nxt routine)
48
49   USE obc_par          ! open boundary condition variables
50   USE obcdta           ! open boundary condition data     (obc_dta routine)
51   USE obcrst           ! open boundary cond. restart      (obc_rst routine)
52   USE obcrad           ! open boundary cond. radiation    (obc_rad routine)
53
54   USE bdy_par          ! unstructured open boundary data variables
55   USE bdydta           ! unstructured open boundary data  (bdy_dta routine)
56
57   USE sshwzv           ! vertical velocity and ssh        (ssh_wzv routine)
58
59   USE ldfslp           ! iso-neutral slopes               (ldf_slp routine)
60   USE ldfeiv           ! eddy induced velocity coef.      (ldf_eiv routine)
61
62   USE zdftmx           ! tide-induced vertical mixing     (zdf_tmx routine)
63   USE zdfbfr           ! bottom friction                  (zdf_bfr routine)
64   USE zdftke_old       ! old TKE vertical mixing      (zdf_tke_old routine)
65   USE zdftke           ! TKE vertical mixing              (zdf_tke routine)
66   USE zdfkpp           ! KPP vertical mixing              (zdf_kpp routine)
67   USE zdfddm           ! double diffusion mixing          (zdf_ddm routine)
68   USE zdfevd           ! enhanced vertical diffusion      (zdf_evd routine)
69   USE zdfric           ! Richardson vertical mixing       (zdf_ric routine)
70   USE zdfmxl           ! Mixed-layer depth                (zdf_mxl routine)
71
72   USE zpshde           ! partial step: hor. derivative     (zps_hde routine)
73
74   USE diawri           ! Standard run outputs             (dia_wri routine)
75   USE trdicp           ! Ocean momentum/tracers trends    (trd_wri routine)
76   USE trdmld           ! mixed-layer trends               (trd_mld routine)
77   USE trdmld_rst       ! restart for mixed-layer trends
78   USE trdmod_oce       ! ocean momentum/tracers trends
79   USE trdmod           ! momentum/tracers trends   
80   USE trdvor           ! vorticity budget                 (trd_vor routine)
81   USE diagap           ! hor. mean model-data gap         (dia_gap routine)
82   USE diahdy           ! dynamic height                   (dia_hdy routine)
83   USE diaptr           ! poleward transports              (dia_ptr routine)
84   USE diaar5           ! AR5 diagnosics                   (dia_ar5 routine)
85   USE diahth           ! thermocline depth                (dia_hth routine)
86   USE diafwb           ! freshwater budget                (dia_fwb routine)
87   USE diahsb           ! heat, salt and volume budgets    (dia_hsb routine)
88   USE flo_oce          ! floats variables
89   USE floats           ! floats computation               (flo_stp routine)
90
91   USE stpctl           ! time stepping control            (stp_ctl routine)
92   USE restart          ! ocean restart                    (rst_wri routine)
93   USE prtctl           ! Print control                    (prt_ctl routine)
94
95   USE traswp           ! Swap arrays           (tra_swp, tra_unswp routine)
96
97#if defined key_agrif
98   USE agrif_opa_sponge ! Momemtum and tracers sponges
99#endif
100   !!======================================================================
101END MODULE step_oce
Note: See TracBrowser for help on using the repository browser.