Method applyLoadSensitivity

SRC/domain/pattern/EarthquakePattern.cpp:106–145

}
    
void 
EarthquakePattern::applyLoadSensitivity(double time)
{
  // see if quick return, i.e. no Ground Motions or domain set
  if (numMotions == 0)
    return;

  Domain *theDomain = this->getDomain();
  if (theDomain == 0)
    return;


  // set the vel and accel vector
  for (int i=0; i<numMotions; i++) {
    (*uDotG)(i) = theMotions[i]->getVel(time);
    if (parameterID != 0) { // Something is random in the motions
      (*uDotDotG)(i) = theMotions[i]->getAccelSensitivity(time);
    }
    else {
      (*uDotDotG)(i) = theMotions[i]->getAccel(time);
    }
  }

  bool somethingRandomInMotions = false;
  if (parameterID != 0) {
    somethingRandomInMotions = true;
  }


  NodeIter &theNodes = theDomain->getNodes();
  Node *theNode;
  while ((theNode = theNodes()) != 0) 
	theNode->addInertiaLoadSensitivityToUnbalance(*uDotDotG, 1.0,  somethingRandomInMotions);


  ElementIter &theElements = theDomain->getElements();
  Element *theElement;
  while ((theElement = theElements()) != 0) 
	theElement->addInertiaLoadSensitivityToUnbalance(*uDotDotG,  somethingRandomInMotions);
}
    
int
EarthquakePattern::addMotion(GroundMotion &theMotion)