Changeset 1817 for LMDZ5/trunk


Ignore:
Timestamp:
Jul 25, 2013, 2:49:07 PM (11 years ago)
Author:
lguez
Message:

Write the max of CFL on countcfl time steps instead of the value for the current time step.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • LMDZ5/trunk/libf/dyn3d/advtrac.F90

    r1549 r1817  
    203203     if (countcfl==day_step) then
    204204        do l=1,llm
    205            write(lunout,*) 'L, CFLmax ' &
    206                 ,l,maxval(cflx(:,l)),maxval(cfly(:,l)),maxval(cflz(:,l))
     205           write(lunout,*) 'L, CFL[xyz]max:', l, cflxmax(l), cflymax(l), &
     206                cflzmax(l)
    207207        enddo
    208208        countcfl=0
Note: See TracChangeset for help on using the changeset viewer.