| 1340 | |
| 1341 | |
| 1342 | int |
| 1343 | Node::setNumColR(int numCol) |
| 1344 | { |
| 1345 | if (R != 0) { |
| 1346 | if (R->noCols() != numCol) { |
| 1347 | delete R; |
| 1348 | R = new Matrix(numberDOF, numCol); |
| 1349 | } |
| 1350 | } else |
| 1351 | R = new Matrix(numberDOF, numCol); |
| 1352 | |
| 1353 | if (R == 0 || R->noRows() != numberDOF) { |
| 1354 | opserr << "FATAL Node::setNumColR() - out of memory\n"; |
| 1355 | exit(-1); |
| 1356 | } |
| 1357 | |
| 1358 | R->Zero(); |
| 1359 | return 0; |
| 1360 | } |
| 1361 | |
| 1362 | int |
| 1363 | Node::setR(int row, int col, double Value) |