Parent Directory | Revision Log | Patch
trunk/libf/phylmd/CV3_routines/cv3_undilute1.f90 revision 69 by guez, Mon Feb 18 16:33:12 2013 UTC | trunk/Sources/phylmd/CV3_routines/cv3_undilute1.f revision 134 by guez, Wed Apr 29 15:47:56 2015 UTC | |
---|---|---|
# | Line 20 | Line 20 |
20 | ||
21 | ||
22 | ! inputs: | ! inputs: |
23 | integer len, nd | integer, intent(in):: len, nd |
24 | integer nk(len), icb(len) | integer nk(len), icb(len) |
25 | real, intent(in):: t(len,nd) | real, intent(in):: t(len,nd) |
26 | real q(len,nd), qs(len,nd), gz(len,nd) | real, intent(in):: q(len,nd), qs(len,nd), gz(len,nd) |
27 | real p(len,nd) | real, intent(in):: p(len,nd) |
28 | real plcl(len) ! convect3 | real plcl(len) ! convect3 |
29 | ||
30 | ! outputs: | ! outputs: |
|
ViewVC Help | |
Powered by ViewVC 1.1.21 |