Parent Directory | Revision Log | Patch
trunk/libf/dyn3d/bernoui.f revision 64 by guez, Wed Aug 29 14:47:17 2012 UTC | trunk/dyn3d/bernoui.f revision 76 by guez, Fri Nov 15 18:45:49 2013 UTC | |
---|---|---|
# | Line 33 c Arguments: | Line 33 c Arguments: |
33 | c ---------- | c ---------- |
34 | c | c |
35 | INTEGER nlay,ngrid | INTEGER nlay,ngrid |
36 | REAL pphi(ngrid*nlay),pecin(ngrid*nlay),pbern(ngrid*nlay) | REAL, intent(in):: pphi(ngrid*nlay),pecin(ngrid*nlay) |
37 | real pbern(ngrid*nlay) | |
38 | c | c |
39 | c Local: | c Local: |
40 | c ------ | c ------ |
|
ViewVC Help | |
Powered by ViewVC 1.1.21 |