Changes in src/timemanager.f90 [6a678e3:ec7fc72] in flexpart.git


Ignore:
File:
1 edited

Legend:

Unmodified
Added
Removed
  • src/timemanager.f90

    r6a678e3 rec7fc72  
    145145!CGZ-lifetime: set lifetime to 0
    146146 
    147 
     147  write(*,46) float(itime)/3600,itime,numpart
    148148
    149149  if (verbosity.gt.0) then
     
    431431
    432432        !write(*,46) float(itime)/3600,itime,numpart
    433 45      format(i9,' SECONDS SIMULATED: ',i8, ' PARTICLES:    Uncertainty: ',3f7.3)
    434 46      format(' Simulated ',f7.1,' hours (',i9,' s), ',i8, ' particles')
     43345      format(i13,' SECONDS SIMULATED: ',i13, ' PARTICLES:    Uncertainty: ',3f7.3)
     43446      format(' Simulated ',f7.1,' hours (',i13,' s), ',i13, ' particles')
    435435        if (ipout.ge.1) call partoutput(itime)    ! dump particle positions
    436436        loutnext=loutnext+loutstep
Note: See TracChangeset for help on using the changeset viewer.
hosted by ZAMG