Parent Directory | Revision Log | Patch
trunk/libf/phylmd/transp.f revision 38 by guez, Thu Jan 6 17:52:19 2011 UTC | trunk/phylmd/transp.f revision 76 by guez, Fri Nov 15 18:45:49 2013 UTC | |
---|---|---|
# | Line 18 c | Line 18 c |
18 | c | c |
19 | REAL, intent(in):: paprs(klon,klev+1) | REAL, intent(in):: paprs(klon,klev+1) |
20 | real tsol(klon) | real tsol(klon) |
21 | REAL t(klon,klev), q(klon,klev), u(klon,klev), v(klon,klev) | REAL, INTENT (IN):: t(klon,klev) |
22 | real q(klon,klev), u(klon,klev), v(klon,klev) | |
23 | REAL utran_e(klon), utran_q(klon), vtran_e(klon), vtran_q(klon) | REAL utran_e(klon), utran_q(klon), vtran_e(klon), vtran_q(klon) |
24 | c | c |
25 | INTEGER i, l | INTEGER i, l |
|
ViewVC Help | |
Powered by ViewVC 1.1.21 |