Ignore:
Timestamp:
Oct 26, 2000, 12:40:31 PM (24 years ago)
Author:
lmdz
Message:

Continuation bug coefkz2
LF

File:
1 edited

Legend:

Unmodified
Added
Removed
  • LMDZ.3.3/trunk/libf/phylmd/clmain.F

    r145 r149  
    11721172c
    11731173      INTEGER knon, nsrf
    1174       REAL paprs(knon,klev+1), pplay(knon,klev)
    1175       REAL t(knon,klev)
    1176 c
    1177       REAL pcfm(knon,klev), pcfh(knon,klev)
     1174      REAL paprs(klon,klev+1), pplay(klon,klev)
     1175      REAL t(klon,klev)
     1176c
     1177      REAL pcfm(klon,klev), pcfh(klon,klev)
    11781178c
    11791179c Quelques constantes et options:
Note: See TracChangeset for help on using the changeset viewer.