Changeset 7999df47 in flexpart.git for src/timemanager_mpi.f90

Timestamp:

Mar 8, 2016, 3:28:18 PM (8 years ago)

Author:

Espen Sollum ATMOS <eso@…>

Branches:

master, 10.4.1_pesei, GFS_025, bugfixes+enhancements, dev, release-10, release-10.4.1, scaling-bug, univie

Children:

c2162ce

Parents:

9b53903

Message:

For parallel domain-filling version, changed info written to screen more consistent with serial version

File:

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

src/timemanager_mpi.f90

@@ -118 +118 @@
   real :: xold,yold,zold,xmassfract
   real, parameter :: e_inv = 1.0/exp(1.0)
-!double precision xm(maxspec,maxpointspec_act),
-!    +                 xm_depw(maxspec,maxpointspec_act),
-!    +                 xm_depd(maxspec,maxpointspec_act)
-
-!open(88,file='TEST.dat')
 
 ! Measure time spent in timemanager