| 1 | MODULE sbc_oce |
|---|
| 2 | !!====================================================================== |
|---|
| 3 | !! *** MODULE sbc_oce *** |
|---|
| 4 | !! Surface module : variables defined in core memory |
|---|
| 5 | !!====================================================================== |
|---|
| 6 | !! History : 9.0 ! 06-06 (G. Madec) Original code |
|---|
| 7 | !!---------------------------------------------------------------------- |
|---|
| 8 | USE par_oce ! ocean parameters |
|---|
| 9 | |
|---|
| 10 | IMPLICIT NONE |
|---|
| 11 | PRIVATE |
|---|
| 12 | |
|---|
| 13 | !!---------------------------------------------------------------------- |
|---|
| 14 | !! Ocean Surface Boundary Condition fields |
|---|
| 15 | !!---------------------------------------------------------------------- |
|---|
| 16 | REAL(wp), PUBLIC, DIMENSION(jpi,jpj) :: utau !: sea surface i-stress (ocean referential) [N/m2] |
|---|
| 17 | REAL(wp), PUBLIC, DIMENSION(jpi,jpj) :: vtau !: sea surface j-stress (ocean referential) [N/m2] |
|---|
| 18 | REAL(wp), PUBLIC, DIMENSION(jpi,jpj) :: qns !: sea heat flux: non solar [W/m2] |
|---|
| 19 | REAL(wp), PUBLIC, DIMENSION(jpi,jpj) :: qsr !: sea heat flux: solar [W/m2] |
|---|
| 20 | REAL(wp), PUBLIC, DIMENSION(jpi,jpj) :: emp !: freshwater budget: volume flux [Kg/m2/s] |
|---|
| 21 | REAL(wp), PUBLIC, DIMENSION(jpi,jpj) :: emps !: freshwater budget: concentration/dillution [Kg/m2/s] |
|---|
| 22 | |
|---|
| 23 | !!---------------------------------------------------------------------- |
|---|
| 24 | !! Sea Surface Mean fields |
|---|
| 25 | !!---------------------------------------------------------------------- |
|---|
| 26 | INTEGER , PUBLIC :: nn_fsbc !: frequency of sbc computation (as well as sea-ice model) |
|---|
| 27 | REAL(wp), PUBLIC, DIMENSION(jpi,jpj) :: ssu_m !: mean (nn_fsbc time-step) surface sea i-current (U-point) [m/s] |
|---|
| 28 | REAL(wp), PUBLIC, DIMENSION(jpi,jpj) :: ssv_m !: mean (nn_fsbc time-step) surface sea j-current (V-point) [m/s] |
|---|
| 29 | REAL(wp), PUBLIC, DIMENSION(jpi,jpj) :: sst_m !: mean (nn_fsbc time-step) surface sea temperature [Celsius] |
|---|
| 30 | REAL(wp), PUBLIC, DIMENSION(jpi,jpj) :: sss_m !: mean (nn_fsbc time-step) surface sea salinity [psu] |
|---|
| 31 | |
|---|
| 32 | !!---------------------------------------------------------------------- |
|---|
| 33 | !! OPA 9.0 , LOCEAN-IPSL (2006) |
|---|
| 34 | !! $Header: $ |
|---|
| 35 | !! Software governed by the CeCILL licence (modipsl/doc/NEMO_CeCILL.txt) |
|---|
| 36 | !!====================================================================== |
|---|
| 37 | END MODULE sbc_oce |
|---|
