Method recvSelf

SRC/element/UWelements/SSPquadUP.cpp:848–920

}

int
SSPquadUP::recvSelf(int commitTag, Channel &theChannel, FEM_ObjectBroker &theBroker)
{
    int res = 0;
    int dataTag = this->getDbTag();

    // SSPquadUP creates a Vector, receives the Vector and then sets the 
    // internal data with the data in the Vector
    static Vector data(15);
    res += theChannel.recvVector(dataTag, commitTag, data);
    if (res < 0) {
        opserr << "WARNING SSPquadUP::recvSelf() - failed to receive Vector\n";
        return res;
    }
  
    this->setTag((int)data(0));
    mThickness = data(1);
    fBulk = data(2);
    fDens = data(3);
    perm[0] = data(4);
    perm[1] = data(5);
    mPorosity = data(6);
    b[0] = data(7);
    b[1] = data(8);
	//LM change
	P[0] = data(9);
	P[1] = data(10);
	P[2] = data(11);
	P[3] = data(12);
    //LM change

    // SSPquadUP now receives the tags of its four external nodes
    res += theChannel.recvID(dataTag, commitTag, mExternalNodes);
    if (res < 0) {
        opserr << "WARNING SSPquadUP::recvSelf() - " << this->getTag() << " failed to receive ID\n";
        return res;
    }

    // finally, SSPquadUP creates a material object of the correct type, sets its
    // database tag, and asks this new object to receive itself
    //LM change
	int matClass = (int)data(13);
    int matDb    = (int)data(14);
    //LM change

    // check if material object exists and that it is the right type
    if ((theMaterial == 0) || (theMaterial->getClassTag() != matClass)) {

        // if old one, delete it
        if (theMaterial != 0)
            delete theMaterial;

        // create new material object
        NDMaterial *theMatCopy = theBroker.getNewNDMaterial(matClass);
        theMaterial = (NDMaterial *)theMatCopy;

        if (theMaterial == 0) {
            opserr << "WARNING SSPquadUP::recvSelf() - " << this->getTag()