Changeset 5deb48c in flexpart.git for src/timemanager.f90

Timestamp:

Oct 18, 2016, 9:05:24 AM (8 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:

657fa36

Parents:

df4a68e

Message:

cosmetical changes (comments)

File:

• src/timemanager.f90 (modified) (1 diff)

src/timemanager.f90

@@ -598 +598 @@
      
         call advance(itime,npoint(j),idt(j),uap(j),ucp(j),uzp(j), &
-            us(j),vs(j),ws(j),nstop,xtra1(j),ytra1(j),ztra1(j),prob, &
-            cbt(j))
+             us(j),vs(j),ws(j),nstop,xtra1(j),ytra1(j),ztra1(j),prob, &
+             cbt(j))
 !        write (*,*) 'advance: ',prob(1),xmass1(j,1),ztra1(j)