Function OPS_sensitivityAlgorithm

SRC/interpreter/OpenSeesCommands.cpp:3801–3838

}

int OPS_sensitivityAlgorithm()
{
    if (cmds == 0) return 0;

    int analysisTypeTag = 1;
    Integrator* theIntegrator = 0;
    if(cmds->getStaticIntegrator() != 0) {
    	theIntegrator = cmds->getStaticIntegrator();
    } else if(cmds->getTransientIntegrator() != 0) {
    	theIntegrator = cmds->getTransientIntegrator();
    }
    
    // 1: compute at each step (default); 2: compute by command; 
    if (OPS_GetNumRemainingInputArgs() < 1) {
    	opserr << "ERROR: Wrong number of parameters to sensitivity algorithm." << "\n";
    	return -1;
    }
    if (theIntegrator == 0) {
    	opserr << "The integrator needs to be instantiated before " << "\n"
    	       << " setting  sensitivity algorithm." << "\n";
    	return -1;
    }

    const char* type = OPS_GetString();
    if (strcmp(type,"-computeAtEachStep") == 0)
    	analysisTypeTag = 1;
    else if (strcmp(type,"-computeByCommand") == 0)
    	analysisTypeTag = 2;
    else {
    	opserr << "Unknown sensitivity algorithm option: " << type << "\n";
    	return -1;
    }

    theIntegrator->setComputeType(analysisTypeTag);
    theIntegrator->activateSensitivityKey();
	
    return 0;
}
// Sensitivity:END /////////////////////////////////////////////