Method write

SRC/handler/DataFileStreamAdd.cpp:269–399

}

int 
DataFileStreamAdd::write(Vector &data)
{
  if (fileOpen == 0)
    this->open();

  //
  // if not parallel, just write the data
  //

  if (sendSelfCount == 0) {
    (*this) << data;  
    if (closeOnWrite == true)
      this->close();
    return 0;
  }

  //
  // otherwise parallel, send the data if not p0
  //

  if (sendSelfCount < 0) {
    if (data.Size() != 0) {
      if ( theChannels[0]->sendVector(0, 0, data) < 0) {
	return -1;
      }
      return 0;
    } else
      return 0;
  }

  //
  // if p0 recv the data & write it out sorted
  //

  // recv data
  for (int i=0; i<=sendSelfCount; i++) {

    int numColumns = (*sizeColumns)(i);
    double *dataI = theData[i];
    if (i == 0) {
      for (int j=0; j<numColumns; j++) {
	dataI[j] = data(j);
      }
    } else { 
      if (numColumns != 0) {
	Vector *theV = theRemoteData[i];
	if (theChannels[i-1]->recvVector(0, 0, *theV) < 0) {
	  opserr << "DataFileStreamAdd::write - failed to recv data\n";
	}
      } 
    }
  }

  Matrix &printMapping = *mapping;

  // write data
  ID currentCol(sendSelfCount+1);