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 |