| 55 | |
| 56 | |
| 57 | int |
| 58 | OPS_UniaxialMaterialCommand(ClientData clientData, Tcl_Interp *interp, int argc, TCL_Char **argv) { |
| 59 | |
| 60 | // check number of arguments |
| 61 | if (argc < 3) { |
| 62 | opserr << "WARNING insufficient number of uniaxial material arguments\n"; |
| 63 | opserr << "Want: uniaxialMaterial type? tag? <specific material args>" << endln; |
| 64 | return TCL_ERROR; |
| 65 | } |
| 66 | |
| 67 | OPS_ResetInputNoBuilder(clientData, interp, 2, argc, argv, 0); |
| 68 | |
| 69 | const char *matType = argv[1]; |
| 70 | UniaxialMaterial *theMaterial = OPS_ParseUniaxialMaterialCommand(matType); |
| 71 | |
| 72 | |
| 73 | } |
| 74 | |
| 75 | int OPS_testUniaxialMaterial(ClientData clientData, Tcl_Interp *interp, int argc, TCL_Char **argv) { |
| 76 |
nothing calls this directly
no test coverage detected