Method sendSelf

SRC/element/UWelements/SSPquadUP.cpp:780–846

}

int
SSPquadUP::sendSelf(int commitTag, Channel &theChannel)
{
    int res = 0;
  
    // note: we don't check for dataTag == 0 for Element
    // objects as that is taken care of in a commit by the Domain
    // object - don't want to have to do the check if sending data
    int dataTag = this->getDbTag();
  
    // SSPquadUP packs its data into a Vector and sends this to theChannel
    // along with its dbTag and the commitTag passed in the arguments
    //LM change
	static Vector data(15);
    data(0) = this->getTag();
    data(1) = mThickness;
    data(2) = fBulk;
    data(3) = fDens;
    data(4) = perm[0];
    data(5) = perm[1];
    data(6) = mPorosity;
    data(7) = b[0];
    data(8) = b[1];
	data(9) = P[0];
	data(10) = P[1];
	data(11) = P[2];
	data(12) = P[3];
    data(13) = theMaterial->getClassTag();         
    //LM change
        
    // Now SSPquadUP sends the ids of its materials
    int matDbTag = theMaterial->getDbTag();
  
    static ID idData(12);
  
    // NOTE: we do have to ensure that the material has a database
    // tag if we are sending to a database channel.
    if (matDbTag == 0) {
        matDbTag = theChannel.getDbTag();
        if (matDbTag != 0) {
            theMaterial->setDbTag(matDbTag);
        }
    }
    data(14) = matDbTag;

    res += theChannel.sendVector(dataTag, commitTag, data);
    if (res < 0) {
        opserr << "WARNING SSPquadUP::sendSelf() - " << this->getTag() << " failed to send Vector\n";
        return res;
    }

    // SSPquadUP then sends the tags of its four nodes
    res += theChannel.sendID(dataTag, commitTag, mExternalNodes);
    if (res < 0) {
        opserr << "WARNING SSPquadUP::sendSelf() - " << this->getTag() << " failed to send ID\n";
        return res;
    }