| 236 | |
| 237 | |
| 238 | int AlphaOSGeneralized_TP::formUnbalance() |
| 239 | { |
| 240 | // get a pointer to the LinearSOE and the AnalysisModel |
| 241 | LinearSOE *theLinSOE = this->getLinearSOE(); |
| 242 | AnalysisModel *theModel = this->getAnalysisModel(); |
| 243 | if (theLinSOE == 0 || theModel == 0) { |
| 244 | opserr << "WARNING AlphaOSGeneralized_TP::formUnbalance() - "; |
| 245 | opserr << "no LinearSOE or AnalysisModel has been set\n"; |
| 246 | return -1; |
| 247 | } |
| 248 | |
| 249 | theLinSOE->setB(*Put); |
| 250 | |
| 251 | // do modal damping |
| 252 | const Vector *modalValues = theModel->getModalDampingFactors(); |
| 253 | if (modalValues != 0) { |
| 254 | this->addModalDampingForce(modalValues); |
| 255 | } |
| 256 | |
| 257 | if (this->formElementResidual() < 0) { |
| 258 | opserr << "WARNING AlphaOSGeneralized_TP::formUnbalance() "; |
| 259 | opserr << " - this->formElementResidual failed\n"; |
| 260 | return -2; |
| 261 | } |
| 262 | |
| 263 | if (this->formNodalUnbalance() < 0) { |
| 264 | opserr << "WARNING AlphaOSGeneralized_TP::formUnbalance() "; |
| 265 | opserr << " - this->formNodalUnbalance failed\n"; |
| 266 | return -3; |
| 267 | } |
| 268 | |
| 269 | return 0; |
| 270 | } |
| 271 | |
| 272 | |
| 273 | int AlphaOSGeneralized_TP::formEleTangent(FE_Element *theEle) |
nothing calls this directly
no test coverage detected