Parent Directory | Revision Log | Patch
revision 18 by guez, Thu Aug 7 12:29:13 2008 UTC | revision 22 by guez, Fri Jul 31 15:18:47 2009 UTC | |
---|---|---|
# | Line 34 CONTAINS | Line 34 CONTAINS |
34 | ! Local: | ! Local: |
35 | ||
36 | INTEGER :: iq, l | INTEGER :: iq, l |
37 | INTEGER :: length | INTEGER, PARAMETER:: length = 100 |
PARAMETER (length=100) | ||
38 | REAL :: tab_cntrl(length) ! tableau des parametres du run | REAL :: tab_cntrl(length) ! tableau des parametres du run |
39 | ||
40 | ! Variables locales pour NetCDF: | ! Variables locales pour NetCDF: |
|
ViewVC Help | |
Powered by ViewVC 1.1.21 |