Merge pull request OpenSees#1373 from mhscott/warping

3D warping element
MassimoPetracca · Apr 9, 2024 · cbd079c · cbd079c
2 parents acd96e2 + d34f5c7
commit cbd079c
Show file tree

Hide file tree

Showing 7 changed files with 540 additions and 142 deletions.
diff --git a/SRC/interpreter/OpenSeesSectionCommands.cpp b/SRC/interpreter/OpenSeesSectionCommands.cpp
@@ -526,7 +526,8 @@ int OPS_Patch()
 		delete thePatch;
 		return -1;
 	    }
-	    theFiber = new UniaxialFiber3d(j,*material,area,cPos);
+	    double dval = cells[j]->getdValue();
+	    theFiber = new UniaxialFiber3d(j,*material,area,cPos,dval);
 	    theActiveFiberSectionWarping3d->addFiber(*theFiber);	
 
 	} else if (theActiveFiberSectionAsym3d != 0) {