875 |
if ( mpi_size > 1) { |
if ( mpi_size > 1) { |
876 |
txt_buffer[0] = '\0'; |
txt_buffer[0] = '\0'; |
877 |
txt_buffer_in_use=0; |
txt_buffer_in_use=0; |
878 |
for (i=0; i<numCells*numCellFactor; i++) __STRCAT(txt_buffer,tmp_buffer,txt_buffer_in_use); |
for (i=numVTKNodesPerElement*(myFirstCell*numCellFactor+1); i<=(myFirstCell+myNumCells)*numVTKNodesPerElement*numCellFactor; i+=numVTKNodesPerElement) { |
879 |
|
__STRCAT(txt_buffer,tmp_buffer,txt_buffer_in_use); |
880 |
|
} |
881 |
#ifdef PASO_MPI |
#ifdef PASO_MPI |
882 |
if (txt_buffer_in_use==0) { strcpy(txt_buffer, " "); txt_buffer_in_use = 1; } /* avoid zero-length writes */ |
if (txt_buffer_in_use==0) { strcpy(txt_buffer, " "); txt_buffer_in_use = 1; } /* avoid zero-length writes */ |
883 |
MPI_File_write_ordered(mpi_fileHandle_p,txt_buffer,txt_buffer_in_use, MPI_CHAR, &mpi_status); |
MPI_File_write_ordered(mpi_fileHandle_p,txt_buffer,txt_buffer_in_use, MPI_CHAR, &mpi_status); |