Method checkEleRemoval

SRC/recorder/RemoveRecorder.cpp:865–967

}

int
// changed
RemoveRecorder::checkEleRemoval(Element* theEle, Response *eleResponse, int &theComponent,const Vector &criteria)
{
  if (eleResponse == 0)
    return 0;

  int secFlag = 0;

  Information &theInfo = eleResponse->getInformation();
  
  for (int k =0; k<numRules; k++) {
    double currentValue = 0;
    double checkwallvalue1=0;
    // changed
    //		if (int(criteria[2*k] != 0 && criteria[2*k] != 7)) {
    //			if (theEle->getRemCriteria(theComponent, int(criteria[2*k]), currentValue) != 0) {
    //				opserr<<" RemoveRecorder::checkRemoval() - failed to retrieve information from element "<<theEle->getTag()<<endln;
    //				return -1;
    //			}
    //		}
    // new

    if (int(criteria[2*k] == 7)) {

      static ID idData(6);
      idData(0) = theComponent;
      idData(1) = int(criteria[2*k]);
      idData(2) = nTagbotn;
      idData(3) = nTagmidn;
      idData(4) = nTagtopn;
      idData(5) = globgrav;;
      theInfo.setID(idData);

      eleResponse->getResponse();

      Vector *result = theInfo.theVector;
      currentValue = (*result)(0);
      checkwallvalue1 = (*result)(1);
    } 
    //
    
    switch (int(criteria[2*k])) {
      
    case 0:
      // no removal,for comparison;
      break;
      
    case 1:
      // min strain (maximum compressive), notice the inequality direction
      if (currentValue <= criteria [2*k+1]) 
	secFlag ++;
      break;
      
    case 2:
      // max strain
      if (currentValue >= criteria [2*k+1]) 
	secFlag ++;