form residual and tangent
| 1228 | |
| 1229 | //form residual and tangent |
| 1230 | void |
| 1231 | ShellDKGQ::formResidAndTangent( int tang_flag ) |
| 1232 | { |
| 1233 | // |
| 1234 | //six(6) nodal dof's ordered: |
| 1235 | //----------- |
| 1236 | //| u1 | <---- plate membrane |
| 1237 | //| u2 | |
| 1238 | //|----------| |
| 1239 | //| w = u3 | <----plate bending |
| 1240 | //| theta1 | |
| 1241 | //| theta2 | |
| 1242 | //|----------| |
| 1243 | //| theta3 | <- drill (tran from membrane) |
| 1244 | //|----------| |
| 1245 | // membrane strains ordered : |
| 1246 | // |
| 1247 | // strain(0) = eps00 i.e. (11)-strain |
| 1248 | // strain(1) = eps11 i.e. (22)-strain |
| 1249 | // strain(2) = gamma01 i.e. (12)-shear |
| 1250 | // |
| 1251 | // curvatures and shear strains ordered : |
| 1252 | // |
| 1253 | // strain(3) = kappa00 i.e. (11)-curvature |
| 1254 | // strain(4) = kappa11 i.e. (22)-curvature |
| 1255 | // strain(5) = 2*kappa01 i.e. 2*(12)-curvature |
| 1256 | // |
| 1257 | // strain(6) = gamma02 i.e. (13)-shear |
| 1258 | // strain(7) = gamma12 i.e. (23)-shear |
| 1259 | // |
| 1260 | // same ordering for moments/shears but no 2 |
| 1261 | // |
| 1262 | // Then, |
| 1263 | // epsilon00 = -z * kappa00 + eps00_membrane |
| 1264 | // epsilon11 = -z * kappa11 + eps11_membrane |
| 1265 | // gamma01 = 2*epsilon01 = -z * (2*kappa01) + gamma01_membrane |
| 1266 | // |
| 1267 | // Shear strains gamma02, gamma12 constant through cross section |
| 1268 | // neglected in this shell element Zero(); |
| 1269 | // |
| 1270 | static const int ndf = 6; //two membrane + 3 moment +drill |
| 1271 | |
| 1272 | static const int nstress = 8; //3 membrane , 3 moment, 2 shear |
| 1273 | |
| 1274 | static const int ngauss = 4; |
| 1275 | |
| 1276 | static const int numnodes = 4; |
| 1277 | |
| 1278 | int i,j,k,p,q; |
| 1279 | int jj,kk; |
| 1280 | |
| 1281 | int p1,q1; |
| 1282 | |
| 1283 | int p2,q2; |
| 1284 | |
| 1285 | int success; |
| 1286 | |
| 1287 | double volume = 0.0; |
nothing calls this directly
no test coverage detected