Ejemplo n.º 1
0
//Guanzhou added for parallel
int DM04_PF::recvSelf(int commitTag, Channel &theChannel, FEM_ObjectBroker &theBroker)
{
    int dataTag = this->getDbTag();
    
    static ID idData(24);
    idData.Zero();

    if (theChannel.recvID(dataTag, commitTag, idData) < 0) {
    	opserr << "DM04_PF::recvSelf -- failed to recv ID\n";
	return -1;
    }

    e0_which       = idData(0);    index_e0      = idData(12);
    e_r_which      = idData(1);    index_e_r     = idData(13);
    lambda_c_which = idData(2);    index_lambda_c= idData(14);
    xi_which       = idData(3);    index_xi      = idData(15);
    Pat_which      = idData(4);    index_Pat     = idData(16);
    m_which        = idData(5);    index_m       = idData(17);
    M_cal_which    = idData(6);    index_M_cal   = idData(18);
    cc_which       = idData(7);    index_cc      = idData(19);
    A0_which       = idData(8);    index_A0      = idData(20);
    nd_which       = idData(9);    index_nd      = idData(21);
                      	                            	                 
    alpha_which   = idData(10);   index_alpha   = idData(22);
    z_which       = idData(11);   index_z       = idData(23);

    return 0;
}
Ejemplo n.º 2
0
//Guanzhou added for parallel
int DM04_PF::sendSelf(int commitTag, Channel &theChannel)
{
    int dataTag = this->getDbTag();
    
    static ID idData(24);
    idData.Zero();

    idData(0) = e0_which;      	  idData(12) = index_e0;      
    idData(1) = e_r_which;     	  idData(13) = index_e_r;     
    idData(2) = lambda_c_which;	  idData(14) = index_lambda_c;
    idData(3) = xi_which;      	  idData(15) = index_xi;      
    idData(4) = Pat_which;     	  idData(16) = index_Pat;     
    idData(5) = m_which;       	  idData(17) = index_m;       
    idData(6) = M_cal_which;   	  idData(18) = index_M_cal;   
    idData(7) = cc_which;      	  idData(19) = index_cc;      
    idData(8) = A0_which;      	  idData(20) = index_A0;      
    idData(9) = nd_which;      	  idData(21) = index_nd;      
    		               	  	                      
    idData(10) = alpha_which;     idData(22) = index_alpha;   
    idData(11) = z_which;         idData(23) = index_z;       
    
    
    if (theChannel.sendID(dataTag, commitTag, idData) < 0) {
   	opserr << "DM04_PF::sendSelf -- failed to send ID\n";
   	return -1;
    }

    return 0;
}
Ejemplo n.º 3
0
//Guanzhou added for parallel
int SANISAND_alpha_Eij::recvSelf(int commitTag, Channel &theChannel, FEM_ObjectBroker &theBroker)
{
    int dataTag = this->getDbTag();
    
    static ID idData(13);
    idData.Zero();

    if (theChannel.recvID(dataTag, commitTag, idData) < 0) {
    	opserr << "SANISAND_alpha_Eij::recvSelf -- failed to recv ID\n";
	return -1;
    }

    e0_index       = idData(0);
    e_r_index      = idData(1);
    lambda_index   = idData(2);
    xi_index       = idData(3);
    Pat_index      = idData(4);
    alpha_cc_index = idData(5);
    c_index        = idData(6);
    nb_index       = idData(7);
    h0_index       = idData(8);
    ch_index       = idData(9);      	                 
    G0_index       = idData(10); 
    m_index        = idData(11);
    alpha_index    = idData(12); 
    
    return 0;
}
Ejemplo n.º 4
0
//Guanzhou added for parallel
int SANISAND_alpha_Eij::sendSelf(int commitTag, Channel &theChannel)
{
    int dataTag = this->getDbTag();
    
    static ID idData(13);
    idData.Zero();

    idData(0) = e0_index;      
    idData(1) = e_r_index;     
    idData(2) = lambda_index;
    idData(3) = xi_index;      
    idData(4) = Pat_index;     
    idData(5) = alpha_cc_index;   
    idData(6) = c_index;      
    idData(7) = nb_index;      
    idData(8) = h0_index;      
    idData(9) = ch_index;      
    idData(10) = G0_index;      
    idData(11) = m_index;       
    idData(12) = alpha_index;   
    
    if (theChannel.sendID(dataTag, commitTag, idData) < 0) {
   	opserr << "SANISAND_alpha_Eij::sendSelf -- failed to send ID\n";
   	return -1;
    }

    return 0;
}
Ejemplo n.º 5
0
//Guanzhou added for parallel
int Linear_Eeq::recvSelf(int commitTag, Channel &theChannel, FEM_ObjectBroker &theBroker)
{
    int dataTag = this->getDbTag();
    
    static ID idData(1);
    idData.Zero();

    if (theChannel.recvID(dataTag, commitTag, idData) < 0) {
    	opserr << "Linear_Eeq::recvSelf -- failed to recv ID\n";
	return -1;
    }
    
    LinearFactor_index = idData(0);

    return 0;
}
Ejemplo n.º 6
0
//Guanzhou added for parallel
int Linear_Eeq::sendSelf(int commitTag, Channel &theChannel)
{
    int dataTag = this->getDbTag();
    
    static ID idData(1);
    idData.Zero();

    idData(0) = LinearFactor_index; 
    
    if (theChannel.sendID(dataTag, commitTag, idData) < 0) {
   	opserr << "Linear_Eeq::sendSelf -- failed to send ID\n";
   	return -1;
    }

    return 0;
}
Ejemplo n.º 7
0
//Guanzhou added for parallel
int AF_Eij::recvSelf(int commitTag, Channel &theChannel, FEM_ObjectBroker &theBroker)
{
    int dataTag = this->getDbTag();
    
    static ID idData(3);
    idData.Zero();

    if (theChannel.recvID(dataTag, commitTag, idData) < 0) {
    	opserr << "AF_Eij::recvSelf -- failed to recv ID\n";
	return -1;
    }

    ha_index    = idData(0);
    Cr_index    = idData(1);
    alpha_index = idData(2);
    
    return 0;
}
Ejemplo n.º 8
0
//Guanzhou added for parallel
int AF_Eij::sendSelf(int commitTag, Channel &theChannel)
{
    int dataTag = this->getDbTag();

    static ID idData(3);
    idData.Zero();

    idData(0) = ha_index;
    idData(1) = Cr_index;
    idData(2) = alpha_index;

    if (theChannel.sendID(dataTag, commitTag, idData) < 0) {
   	opserr << "AF_Eij::sendSelf -- failed to send ID\n";
   	return -1;
    }

    return 0;
}
Ejemplo n.º 9
0
//================================================================================ 
//Guanzhou added for parallel
int VM_YF::recvSelf(int commitTag, Channel &theChannel, FEM_ObjectBroker &theBroker)
{
    int dataTag = this->getDbTag();
    
    static ID idData(4);
    idData.Zero();

    if (theChannel.recvID(dataTag, commitTag, idData) < 0) {
     opserr << "VM_YF::recvSelf -- failed to recv ID\n";
 return -1;
    }

    k_which       = idData(0);
    index_k       = idData(1);
    alpha_which = idData(2);
    index_alpha = idData(3);

    return 0;
}
Ejemplo n.º 10
0
//================================================================================ 
//Guanzhou added for parallel
int VM_YF::sendSelf(int commitTag, Channel &theChannel)
{
    int dataTag = this->getDbTag();
    
    static ID idData(4);
    idData.Zero();

    idData(0) = k_which;    
    idData(1) = index_k;    
    idData(2) = alpha_which;
    idData(3) = index_alpha;
    
    if (theChannel.sendID(dataTag, commitTag, idData) < 0) {
    opserr << "VM_YF::sendSelf -- failed to send ID\n";
    return -1;
    }

    return 0;
}
Ejemplo n.º 11
0
//Guanzhou added for parallel
int CC_Ev::recvSelf(int commitTag, Channel &theChannel, FEM_ObjectBroker &theBroker)
{
    int dataTag = this->getDbTag();
    
    static ID idData(5);
    idData.Zero();

    if (theChannel.recvID(dataTag, commitTag, idData) < 0) {
    	opserr << "CC_Ev::recvSelf -- failed to recv ID\n";
	return -1;
    }

    lambda_index   = idData(0);
    kappa_index    = idData(1);
    e0_index = idData(2);
    p0_index = idData(3);
    M_index = idData(4);   
    
    return 0;
}
Ejemplo n.º 12
0
//Guanzhou added for parallel
int CC_Ev::sendSelf(int commitTag, Channel &theChannel)
{
    int dataTag = this->getDbTag();
    
    static ID idData(5);
    idData.Zero();

    idData(0) = lambda_index;
    idData(1) = kappa_index;
    idData(2) = e0_index;
    idData(3) = p0_index;
    idData(4) = M_index;
    
    if (theChannel.sendID(dataTag, commitTag, idData) < 0) {
   	opserr << "CC_Ev::sendSelf -- failed to send ID\n";
   	return -1;
    }

    return 0;
}
Ejemplo n.º 13
0
int
EnvelopeNodeRecorder::sendSelf(int commitTag, Channel &theChannel)
{
  addColumnInfo = 1;

  if (theChannel.isDatastore() == 1) {
    opserr << "EnvelopeNodeRecorder::sendSelf() - does not send data to a datastore\n";
    return -1;
  }

  static ID idData(6); 
  idData.Zero();

  if (theDofs != 0)
    idData(0) = theDofs->Size();
  if (theNodalTags != 0)
    idData(1) = theNodalTags->Size();
  if (theHandler != 0) {
    idData(2) = theHandler->getClassTag();
  }

  idData(3) = dataFlag;

  if (echoTimeFlag == true)
    idData(4) = 1;
  else
    idData(4) = 0;

  idData(5) = this->getTag();


  if (theChannel.sendID(0, commitTag, idData) < 0) {
    opserr << "EnvelopeNodeRecorder::sendSelf() - failed to send idData\n";
    return -1;
  }

  if (theDofs != 0) 
    if (theChannel.sendID(0, commitTag, *theDofs) < 0) {
      opserr << "EnvelopeNodeRecorder::sendSelf() - failed to send dof id's\n";
      return -1;
    }

  if (theNodalTags != 0)
    if (theChannel.sendID(0, commitTag, *theNodalTags) < 0) {
      opserr << "EnvelopeNodeRecorder::sendSelf() - failed to send nodal tags\n";
      return -1;
    }

  static Vector data(2);
  data(0) = deltaT;
  data(1) = nextTimeStampToRecord;
  if (theChannel.sendVector(0, commitTag, data) < 0) {
    opserr << "EnvelopeNodeRecorder::sendSelf() - failed to send data\n";
    return -1;
  }

  if (theHandler->sendSelf(commitTag, theChannel) < 0) {
    opserr << "EnvelopeNodeRecorder::sendSelf() - failed to send the DataOutputHandler\n";
    return -1;
  }

  return 0;
}
Ejemplo n.º 14
0
int 
NodeRecorder::sendSelf(int commitTag, Channel &theChannel)
{
  addColumnInfo = 1;

  if (theChannel.isDatastore() == 1) {
    opserr << "NodeRecorder::sendSelf() - does not send data to a datastore\n";
    return -1;
  }

  initializationDone = false;

  int numDOF = theDofs->Size();

  static ID idData(8); 
  idData.Zero();
  if (theDofs != 0)
    idData(0) = numDOF;
  if (theNodalTags != 0)
    idData(1) = theNodalTags->Size();
  if (theOutputHandler != 0) {
    idData(2) = theOutputHandler->getClassTag();
  }
  
  if (echoTimeFlag == true)
    idData(3) = 1;
  else
    idData(3) = 0;

  idData(4) = dataFlag;
  idData(5) = sensitivity;

  idData(6) = this->getTag();
  if (theTimeSeries == 0)
    idData[7] = 0;
  else
    idData[7] = 1;


  if (theChannel.sendID(0, commitTag, idData) < 0) {
    opserr << "NodeRecorder::sendSelf() - failed to send idData\n";
    return -1;
  }

  if (theDofs != 0) 
    if (theChannel.sendID(0, commitTag, *theDofs) < 0) {
      opserr << "NodeRecorder::sendSelf() - failed to send dof id's\n";
      return -1;
    }

  if (theNodalTags != 0)
    if (theChannel.sendID(0, commitTag, *theNodalTags) < 0) {
      opserr << "NodeRecorder::sendSelf() - failed to send nodal tags\n";
      return -1;
    }

  static Vector data(2);
  data(0) = deltaT;
  data(1) = nextTimeStampToRecord;
  if (theChannel.sendVector(0, commitTag, data) < 0) {
    opserr << "NodeRecorder::sendSelf() - failed to send data\n";
    return -1;
  }

  if (theOutputHandler->sendSelf(commitTag, theChannel) < 0) {
    opserr << "NodeRecorder::sendSelf() - failed to send the DataOutputHandler\n";
    return -1;
  }


  if (theTimeSeries != 0) {
    ID timeSeriesTags(numDOF);
    for (int i=0; i<numDOF; i++) {
      if (theTimeSeries[i] != 0) {
	timeSeriesTags[i] = theTimeSeries[i]->getClassTag();
      } else
	timeSeriesTags[i] = -1;
    }
    if (theChannel.sendID(0, commitTag, timeSeriesTags) < 0) {
      opserr << "EnvelopeNodeRecorder::sendSelf() - failed to send time series tags\n";
      return -1;
    }    
    for (int i=0; i<numDOF; i++) {
      if (theTimeSeries[i] != 0) {	
	if (theTimeSeries[i]->sendSelf(commitTag, theChannel) < 0) {
	  opserr << "EnvelopeNodeRecorder::sendSelf() - time series failed in send\n";
	  return -1;

	}
      }
    }
  }


  return 0;
}