| 1 | MODULE sbc_oce |
|---|
| 2 | !!====================================================================== |
|---|
| 3 | !! *** MODULE sbc_oce *** |
|---|
| 4 | !! Surface module : variables defined in core memory |
|---|
| 5 | !! OPA 9.0 , LOCEAN-IPSL (2006) |
|---|
| 6 | !! $Id$ |
|---|
| 7 | !! Software governed by the CeCILL licence (modipsl/doc/NEMO_CeCILL.txt) |
|---|
| 8 | !!====================================================================== |
|---|
| 9 | !! History : 9.0 ! 06-06 (G. Madec) Original code |
|---|
| 10 | !!---------------------------------------------------------------------- |
|---|
| 11 | USE par_oce ! ocean parameters |
|---|
| 12 | |
|---|
| 13 | IMPLICIT NONE |
|---|
| 14 | PRIVATE |
|---|
| 15 | |
|---|
| 16 | !!---------------------------------------------------------------------- |
|---|
| 17 | !! Ocean Surface Boundary Condition fields |
|---|
| 18 | !!---------------------------------------------------------------------- |
|---|
| 19 | REAL(wp), PUBLIC, DIMENSION(jpi,jpj) :: utau !: sea surface i-stress (ocean referential) [N/m2] |
|---|
| 20 | REAL(wp), PUBLIC, DIMENSION(jpi,jpj) :: vtau !: sea surface j-stress (ocean referential) [N/m2] |
|---|
| 21 | REAL(wp), PUBLIC, DIMENSION(jpi,jpj) :: wndm !: wind speed module at T-point (=|U10m - Uoce|)[m/s] |
|---|
| 22 | REAL(wp), PUBLIC, DIMENSION(jpi,jpj) :: qns !: sea heat flux: non solar [W/m2] |
|---|
| 23 | REAL(wp), PUBLIC, DIMENSION(jpi,jpj) :: qsr !: sea heat flux: solar [W/m2] |
|---|
| 24 | REAL(wp), PUBLIC, DIMENSION(jpi,jpj) :: emp !: freshwater budget: volume flux [Kg/m2/s] |
|---|
| 25 | REAL(wp), PUBLIC, DIMENSION(jpi,jpj) :: emps !: freshwater budget: concentration/dillution [Kg/m2/s] |
|---|
| 26 | REAL(wp), PUBLIC, DIMENSION(jpi,jpj) :: fr_i !: ice fraction (between 0 to 1) |
|---|
| 27 | |
|---|
| 28 | END MODULE sbc_oce |
|---|
