source:
trunk/NEMO/OFF_SRC/SBC/ocesbc.F90
@
325
Last change on this file since 325 was 325, checked in by opalod, 19 years ago | |
---|---|
|
|
File size: 983 bytes |
Line | |
---|---|
1 | MODULE ocesbc |
2 | !!====================================================================== |
3 | !! *** MODULE ocesbc *** |
4 | !! Ocean surface boundary conditions |
5 | !!====================================================================== |
6 | |
7 | !! * Modules used |
8 | USE oce |
9 | USE lib_mpp |
10 | USE in_out_manager ! I/O manager |
11 | |
12 | |
13 | IMPLICIT NONE |
14 | PRIVATE |
15 | |
16 | |
17 | REAL(wp), PUBLIC, DIMENSION(jpi,jpj) :: & !: |
18 | qt , & !: total surface heat flux (w/m2) |
19 | qsr , & !: solar radiation (w/m2) |
20 | emp , & !: evaporation minus precipitation (kg/m2/s = mm/s) |
21 | emps !: evaporation - precipitation (free surface) |
22 | |
23 | !!---------------------------------------------------------------------- |
24 | !! LIM 2.0 , UCL-LODYC-IPSL (2003) |
25 | !!---------------------------------------------------------------------- |
26 | |
27 | !!====================================================================== |
28 | END MODULE ocesbc |
Note: See TracBrowser
for help on using the repository browser.