Ignore:
Timestamp:
Aug 8, 2014, 12:01:55 PM (10 years ago)
Author:
lfita
Message:

brbrbrbrbr, adding ITNEGER kind to 'kthres'!

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/LMDZ_WRFmeas_develop/WRFV3/lmdz/physiq.F90

    r159 r160  
    47544754#include "dimensions.h"
    47554755
    4756   INTEGER, INTENT(IN)                                    :: sizev, zsize
     4756  INTEGER, INTENT(IN)                                    :: sizev, zsize, kthres
    47574757  CHARACTER(LEN=50), INTENT(IN)                          :: funcn, varn
    47584758  REAL, DIMENSION(sizev,zsize), INTENT(IN)               :: var
Note: See TracChangeset for help on using the changeset viewer.