Changeset 58 in lmdz_wrf


Ignore:
Timestamp:
Jul 23, 2014, 5:48:43 PM (10 years ago)
Author:
lfita
Message:

Fixing printing of i,k values

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/LMDZ_WRFmeas/WRFV3/lmdz/diagphy_mod.F90

    r57 r58  
    369369      "' is wrong in Nvalues= ",wrongi,' at i k value___'
    370370    DO i=1,wrongi
    371       PRINT *,wronggridpt(i,:), wrongvalues(i)
     371      PRINT *,wronggridpt(i,1), wronggridpt(i,2), wrongvalues(i)
    372372    END DO
    373373    IF (stoprun) THEN
Note: See TracChangeset for help on using the changeset viewer.