Parent Directory | Revision Log | Patch
revision 235 by guez, Thu Nov 9 12:37:48 2017 UTC | revision 248 by guez, Fri Jan 5 16:40:13 2018 UTC | |
---|---|---|
# | Line 28 contains | Line 28 contains |
28 | ||
29 | ! Arguments: | ! Arguments: |
30 | ||
31 | INTEGER knon, nsrf | INTEGER knon |
32 | REAL paprs(klon, klev+1), pplay(klon, klev) | integer, intent(in):: nsrf |
33 | REAL t(klon, klev) | REAL, intent(in):: paprs(klon, klev+1), pplay(klon, klev) |
34 | REAL, intent(in):: t(klon, klev) | |
35 | ||
36 | REAL, intent(out):: pcfm(:, 2:), pcfh(:, 2:) ! (knon, 2:klev) | REAL, intent(out):: pcfm(:, 2:), pcfh(:, 2:) ! (knon, 2:klev) |
37 |
|
ViewVC Help | |
Powered by ViewVC 1.1.21 |