Changeset 249 for trunk/LMDZ.MARS/libf


Ignore:
Timestamp:
Aug 1, 2011, 11:22:11 AM (13 years ago)
Author:
emillour
Message:

Mars GCM:

  • Fixed bug in readtesassim (timeflag was not always set before being used)

EM

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/LMDZ.MARS/libf/phymars/readtesassim.F90

    r38 r249  
    222222      timeflag=.true.
    223223   else
     224      timeflag=.false.
    224225      do iloop=2,timelen
    225226         if (realday<time(iloop)) then
    … …  
    268269      endif
    269270   enddo
    270    timeflag=.false.
    271271
    272272   if ((dlat>1).OR.(dlon>1) .OR. (dlat<0) .OR. (dlon<0)) then
Note: See TracChangeset for help on using the changeset viewer.