Parent Directory | Revision Log | Patch
trunk/dyn3d/advxp.f90 revision 81 by guez, Wed Mar 5 14:38:41 2014 UTC | trunk/Sources/dyn3d/advxp.f revision 134 by guez, Wed Apr 29 15:47:56 2015 UTC | |
---|---|---|
# | Line 84 SUBROUTINE advxp(limit, dtx, pbaru, sm, | Line 84 SUBROUTINE advxp(limit, dtx, pbaru, sm, |
84 | LOGICAL limit | LOGICAL limit |
85 | INTEGER num(jjp1), lonk, numk | INTEGER num(jjp1), lonk, numk |
86 | INTEGER lon, lati, latf, niv | INTEGER lon, lati, latf, niv |
87 | INTEGER i, i2, i3, j, jv, l, k, iter | INTEGER i, i2, i3, j, jv, l, k |
88 | ||
89 | lon = iim | lon = iim |
90 | lati = 2 | lati = 2 |
|
ViewVC Help | |
Powered by ViewVC 1.1.21 |