Ignore:
Timestamp:
Sep 27, 2012 9:23:24 AM (9 years ago)
Author:
raasch
Message:

Starting with changes required for GPU optimization. OpenACC statements for using NVIDIA GPUs added.
Adjustment of mixing length to the Prandtl mixing length at first grid point above ground removed.
mask array is set zero for ghost boundaries

File:
1 edited

Legend:

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

    r683 r1015  
    44! Current revisions:
    55! -----------------
    6 ! output of handling of ghostpoint exchange
     6! output of accelerator board information
    77!
    88! Former revisions:
    99! -----------------
    1010! $Id$
     11!
     12! 683 2011-02-09 14:25:15Z raasch
     13! output of handling of ghostpoint exchange
    1114!
    1215! 622 2010-12-10 08:08:13Z raasch
     
    135138                          numprocs * threads_per_task, pdims(1), pdims(2), &
    136139                          threads_per_task
     140       IF ( num_acc_per_node /= 0 )  WRITE ( 18, 108 )  num_acc_per_node
     141       WRITE ( 18, 110 )
    137142#else
    138143       WRITE ( 18, 100 )  TRIM( run_description_header ),        &
    139144                          numprocs * threads_per_task, 1, 1, &
    140145                          threads_per_task
     146       IF ( num_acc_per_node /= 0 )  WRITE ( 18, 109 )  num_acc_per_node
     147       WRITE ( 18, 110 )
    141148#endif
    142149       DO
     
    276283
    277284100 FORMAT (A/11('-')//'CPU measures for ',I5,' PEs (',I5,'(x) * ',I5,'(y', &
    278             &') tasks *',I5,' threads):'/ &
    279              &'----------------------------------------------------------', &
    280              &'------------'//&
    281             &'place:                        mean        counts      min  ', &
    282              &'     max       rms'/ &
    283             &'                           sec.      %                sec. ', &
    284              &'     sec.      sec.'/  &
    285             &'-----------------------------------------------------------', &
    286              &'-------------------')
     285            &') tasks *',I5,' threads):')
    287286
    288287101 FORMAT (/'special measures:'/ &
     
    296295106 FORMAT (/'Exchange of ghostpoints via MPI_ISEND/MPI_IRECV')
    297296107 FORMAT (//)
     297108 FORMAT ('Accelerator boards per node: ',I2)
     298109 FORMAT ('Accelerator boards: ',I2)
     299110 FORMAT ('----------------------------------------------------------',   &
     300            &'------------'//&
     301            &'place:                        mean        counts      min  ', &
     302            &'     max       rms'/ &
     303            &'                           sec.      %                sec. ', &
     304            &'     sec.      sec.'/  &
     305            &'-----------------------------------------------------------', &
     306            &'-------------------')
    298307
    299308 END SUBROUTINE cpu_statistics
Note: See TracChangeset for help on using the changeset viewer.