Ignore:
Timestamp:
Nov 9, 2012 2:38:45 PM (9 years ago)
Author:
maronga
Message:

put scripts and utilities under GPL

File:
1 edited

Legend:

Unmodified
Added
Removed
  • palm/trunk/SOURCE/user_statistics.f90

    r1037 r1046  
    2020! Current revisions:
    2121! -----------------
    22 !
     22! added preprocessor directive for parameter file check
    2323!
    2424! Former revisions:
     
    117117!--           value on all PEs, you can omit the MPI_ALLREDUCE call and
    118118!--           assign ts_value(dots_num_palm+1:,sr) = ts_value_l directly.
    119 !#if defined( __parallel )
     119!#if defined( __parallel ) && ! defined ( __check )
    120120!       IF ( collective_wait )  CALL MPI_BARRIER( comm2d, ierr )
    121121!       CALL MPI_ALLREDUCE( ts_value_l(dots_num_palm+1),                       &
Note: See TracChangeset for help on using the changeset viewer.