Method setResponse

SRC/material/section/FiberSection.cpp:535–588

}

Response*
FiberSection::setResponse(const char **argv, int argc, OPS_Stream &output)
{
  Response *theResponse = 0;

  output.tag("SectionOutput");
  output.attr("secType", this->getClassType());
  output.attr("secTag", this->getTag());

  // Check if fiber response is requested
  if (strcmp(argv[0],"fiber") == 0) {
    int key = 0;
    int passarg = 2;
    
    if (argc <= 2)          // not enough data input
      return 0;
    else if (argc <= 3)		// fiber number was input directly
      key = atoi(argv[1]);
    else {                  // fiber near-to coordinate specified
      double yCoord = atof(argv[1]);
      double zCoord = atof(argv[2]);
      double ySearch, zSearch;
      theFibers[0]->getFiberLocation(ySearch,zSearch);
      double closestDist = sqrt( pow(ySearch-yCoord,2) +
				 pow(zSearch-zCoord,2) );
      double distance;
      for (int j = 1; j < numFibers; j++) {
	theFibers[j]->getFiberLocation(ySearch,zSearch);
	distance = sqrt( pow(ySearch-yCoord,2) +
			 pow(zSearch-zCoord,2) );
	if (distance < closestDist) {
	  closestDist = distance;
	  key = j;
	}
      }
      theFibers[key]->getFiberLocation(ySearch,zSearch);
      passarg = 3;
    }
	
    if (key < numFibers && key >= 0) {
	output.tag("FiberOutput");
	double yLoc, zLoc;
	theFibers[key]->getFiberLocation(yLoc, zLoc);
	output.attr("yLoc", yLoc);
	output.attr("zLoc",0.0);
	output.attr("area", zLoc);
	theResponse = theFibers[key]->setResponse(&argv[passarg],argc-passarg, output);
	output.endTag();
    }    
  }

  output.endTag();
  return SectionForceDeformation::setResponse(argv,argc,output);
}

int 
FiberSection::getResponse(int responseID, Information &sectInfo)