Changeset 16b61a5 in flexpart.git for src/concoutput_nest_mpi.f90

Timestamp:

Oct 14, 2016, 3:19:00 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:

4c64400

Parents:

861805a

Message:

Reworked the domain-filling option (MPI). Fixed a slow loop which had errors in loop counter (MPI)

File:

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

src/concoutput_nest_mpi.f90

@@ -105 +105 @@
 ! Measure execution time
   if (mp_measure_time) call mpif_mtime('iotime',0)
-  !   call cpu_time(mp_root_time_beg)
-  !   mp_root_wtime_beg = mpi_wtime()
-  ! end if
 
   if (verbosity.eq.1) then