source:
branches/dev_001_GM/NEMO/OFF_SRC/SBC/sbcrnf.F90
@
955
Last change on this file since 955 was 955, checked in by cetlod, 15 years ago | |
---|---|
File size: 872 bytes |
Line | |
---|---|
1 | MODULE sbcrnf |
2 | !!====================================================================== |
3 | !! *** MODULE sbcrnf *** |
4 | !! Ocean forcing: river runoff |
5 | !!===================================================================== |
6 | !! History : ! 00-11 (R. Hordoir, E. Durand) NetCDF FORMAT |
7 | !! 8.5 ! 02-09 (G. Madec) F90: Free form and module |
8 | !! 9.0 ! 06-07 (G. Madec) Surface module |
9 | !!---------------------------------------------------------------------- |
10 | USE par_oce ! ocean parameters |
11 | |
12 | IMPLICIT NONE |
13 | PRIVATE |
14 | |
15 | REAL(wp), PUBLIC, DIMENSION(jpi,jpj) :: rnfmsk !: river mouth mask (hori.) |
16 | REAL(wp), PUBLIC, DIMENSION(jpk) :: rnfmsk_z !: river mouth mask (vert.) |
17 | |
18 | |
19 | !!====================================================================== |
20 | END MODULE sbcrnf |
Note: See TracBrowser
for help on using the repository browser.