Changeset 15fdb5c in flexpart.git for src


Ignore:
Timestamp:
Oct 18, 2016, 1:59:05 PM (7 years ago)
Author:
Sabine <sabine.eckhardt@…>
Branches:
master, 10.4.1_pesei, GFS_025, bugfixes+enhancements, dev, release-10, release-10.4.1, scaling-bug, univie
Children:
d4a4250
Parents:
657fa36
Message:

removed write statement

File:
1 edited

Legend:

Unmodified
Added
Removed
  • src/timemanager.f90

    r657fa36 r15fdb5c  
    563563               drydeposit(ks)/xmass1(j,ks)
    564564               !if (xscav_frac1(j,ks).eq.1) then
    565                   write (*,*) 'xscav 1: ',j,prob_rec(ks),xmass1(j,ks), &
    566                                 ztra1(j),drydeposit(ks),decfact
     565!                  write (*,*) 'xscav 1: ',j,prob_rec(ks),xmass1(j,ks), &
     566!                                ztra1(j),drydeposit(ks),decfact
    567567              !     stop
    568568              ! endif
Note: See TracChangeset for help on using the changeset viewer.
hosted by ZAMG