Parent Directory | Revision Log
Move Sources/* to root directory.
1 | module indicesol |
2 | |
3 | implicit none |
4 | |
5 | INTEGER, parameter:: nbsrf=4 |
6 | |
7 | INTEGER, parameter:: is_ter = 1 ! land |
8 | INTEGER, parameter:: is_lic = 2 ! land ice |
9 | INTEGER, parameter:: is_oce = 3 ! ocean |
10 | INTEGER, parameter:: is_sic = 4 ! sea ice |
11 | |
12 | REAL, parameter:: epsfra = 1E-5 |
13 | CHARACTER(len=*), parameter:: clnsurf(nbsrf) = (/'ter', 'lic', 'oce', 'sic'/) |
14 | |
15 | end module indicesol |
ViewVC Help | |
Powered by ViewVC 1.1.21 |