Ignore:
Timestamp:
Feb 14, 2012, 11:39:54 AM (13 years ago)
Author:
aslmd
Message:

LMDZ.MARS : problem with r520. commits were made on an older version. fix the (numerous) problems this caused. please developers use svn update before committing.

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/LMDZ.MARS/libf/phymars/surfini.F

    r520 r528  
    6464       
    6565#ifdef MESOSCALE
    66 
    6766      do ig=1,ngridmx
    68 
    6967         !write(*,*) "all qsurf to zero. dirty."
    7068         do iq=1,nqmx
    … …  
    8381                 watercaptag(ig)  = .false.
    8482                 dryness(ig)      = 1.
    85          endif
    86          
    87       endif
     83         endif 
     84      enddo
    8885#else
    8986       ! print*,'ngridmx',ngridmx
Note: See TracChangeset for help on using the changeset viewer.