MCPcopy Create free account
hub / github.com/OpenSees/OpenSees / OPS_PFEMElement2D

Function OPS_PFEMElement2D

SRC/element/PFEMElement/PFEMElement2D.cpp:45–66  ·  view source on GitHub ↗

Source from the content-addressed store, hash-verified

43Vector PFEMElement2D::P;
44
45void* OPS_PFEMElement2D()
46{
47 int numdata = OPS_GetNumRemainingInputArgs();
48 if(numdata < 8) {
49 opserr<<"WARNING: insufficient number of arguments\n";
50 return 0;
51 }
52
53 // tag, nd1, nd2, nd3
54 numdata = 4;
55 int idata[4];
56 if(OPS_GetIntInput(&numdata,idata)<0) return 0;
57
58 // rho, mu, b1, b2, (thickness, kappa, lumped)
59 numdata = OPS_GetNumRemainingInputArgs();
60 if(numdata > 7) numdata = 7;
61 double data[7] = {0,0,0,0,1.0,-1,1};
62 if(OPS_GetDoubleInput(&numdata,data) < 0) return 0;
63
64 return new PFEMElement2D(idata[0],idata[1],idata[2],idata[3],
65 data[0],data[1],data[2],data[3],data[4],data[5],data[6]);
66}
67
68int OPS_PFEMElement2D(Domain& theDomain, const ID& elenodes, ID& eletags)
69{

Callers 1

Calls 8

OPS_GetIntInputFunction · 0.50
OPS_GetDoubleInputFunction · 0.50
getElementsMethod · 0.45
getTagMethod · 0.45
resizeMethod · 0.45
SizeMethod · 0.45
addElementMethod · 0.45

Tested by

no test coverage detected