Skip to content

Commit

Permalink
Update TclModelBuilderUniaxialMaterialCommand.cpp
Browse files Browse the repository at this point in the history
  • Loading branch information
MassimoPetracca committed Sep 27, 2021
1 parent 0b679a2 commit 61d5997
Showing 1 changed file with 2 additions and 3 deletions.
Original file line number Diff line number Diff line change
Expand Up @@ -2894,16 +2894,16 @@ TclModelBuilderUniaxialMaterialCommand (ClientData clientData, Tcl_Interp *inter
else if (strcmp(argv[1],"AxialSpHD") == 0) {
return TclCommand_AxialSpHD(clientData, interp, argc, argv);
}
else if (strcmp(argv[1], "HystereticPoly") == 0) { // BEGIN Salvatore Sessa 14-Jan-2021 Mail: salvatore.sessa2@unina.it
if (strcmp(argv[1], "HystereticPoly") == 0) { // BEGIN Salvatore Sessa 14-Jan-2021 Mail: salvatore.sessa2@unina.it
void* theMat = OPS_HystereticPoly();
if (theMat != 0)
theMaterial = (UniaxialMaterial*)theMat;
else
return TCL_ERROR;
} // END Salvatore Sessa 14-Jan-2021 Mail: salvatore.sessa2@unina.it
else {
// Fedeas
#if defined(_STEEL2) || defined(OPSDEF_UNIAXIAL_FEDEAS)
if (theMaterial == 0)
theMaterial = TclModelBuilder_addFedeasMaterial(clientData, interp, argc, argv);
#endif
// Drain
Expand All @@ -2927,7 +2927,6 @@ TclModelBuilderUniaxialMaterialCommand (ClientData clientData, Tcl_Interp *inter
if (theMaterial == 0)
theMaterial = TclModelBuilder_addDegradingMaterial(clientData, interp, argc, argv);
#endif
}

if (theMaterial == 0) {

Expand Down

0 comments on commit 61d5997

Please sign in to comment.