Changeset 7999df47 in flexpart.git for src/init_domainfill.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/init_domainfill.f90 (modified) (1 diff)

src/init_domainfill.f90

@@ -293 +293 @@
   end do
 
-  write(*,*) 'init_domainfill> ncolumn: ', ncolumn 
-  write(*,*) 'init_domainfill> numcolumn: ', numcolumn 
-  write(*,*) 'init_domainfill> ny_sn(1),ny_sn(2): ', ny_sn(1),ny_sn(2)
-  write(*,*) 'init_domainfill> nx_we(1),nx_we(2): ', nx_we(1),nx_we(2)
-
 
 ! Check whether numpart is really smaller than maxpart