Changeset 646 for palm/trunk/SOURCE/init_pegrid.f90

Timestamp:

Dec 15, 2010 1:03:52 PM (14 years ago)

Author:

raasch

Message:

2d-decomposition for lctit by default; missing define statement added

File:

• palm/trunk/SOURCE/init_pegrid.f90 (modified) (2 diffs)

palm/trunk/SOURCE/init_pegrid.f90

@@ -4 +4 @@
 ! Current revisions:
 ! -----------------
-! 
+! lctit is now using a 2d decomposition by default
 ! ATTENTION: nnz_x undefined problem still has to be solved!!!!!!!!
 ! TEST OUTPUT (TO BE REMOVED) logging mpi2 ierr values
@@ -109 +109 @@
        IF ( host(1:3) == 'ibm'  .OR.  host(1:3) == 'nec'      .OR. &
             ( host(1:2) == 'lc'  .AND.  host(3:5) /= 'sgi'  .AND.  &
-              host(3:4) /= 'xt' )                             .OR. &
+              host(3:4) /= 'xt'  .AND.  host(3:5) /= 'tit' )  .OR. &
              host(1:3) == 'dec' )  THEN