Don't like ads? PRO users don't see any ads ;-)
Public Pastes
Guest

Untitled

By: a guest on Apr 28th, 2012  |  syntax: None  |  size: 0.72 KB  |  hits: 15  |  expires: Never
download  |  raw  |  embed  |  report abuse  |  print
Text below is selected. Please press Ctrl+C to copy to your clipboard. (⌘+C on Mac)
  1. Best approach to read and write large files with collective MPI-IO
  2. ! A contiguous type to describe the vector per element.
  3.   ! MPI_TYPE_CONTIGUOUS(COUNT, OLDTYPE, NEWTYPE, IERROR)
  4.   call MPI_Type_contiguous(nComponents, rk_mpi, &
  5.     &                      me%vectype, iError)
  6.   call MPI_Type_commit( me%vectype, iError )
  7.  
  8.   ! A subarray to describe the view of this process on the file.
  9.   ! MPI_TYPE_CREATE_SUBARRAY(ndims, array_of_sizes, array_of_subsizes,
  10.   !                          array_of_starts, order, oldtype, newtype, ierror)
  11.   call MPI_Type_create_subarray( 1, [ globElems ], [ locElems ], &
  12.     &                           [ elemOff ], MPI_ORDER_FORTRAN, &
  13.     &                           me%vectype, me%ftype, iError)
create a new version of this paste RAW Paste Data