Rev 5172 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
| Rev 5172 | Rev 5187 | ||
|---|---|---|---|
| Line 290... | Line 290... | ||
| 290 | extern int
|
290 | extern int
|
| 291 | TclModelBuilder_addDoubleFPBearing(ClientData clientData, Tcl_Interp *interp, int argc,
|
291 | TclModelBuilder_addDoubleFPBearing(ClientData clientData, Tcl_Interp *interp, int argc,
|
| 292 | TCL_Char **argv, Domain*, TclModelBuilder *, int argStart);
|
292 | TCL_Char **argv, Domain*, TclModelBuilder *, int argStart);
|
| 293 | */
|
293 | */
|
| 294 | extern int |
294 | extern int |
| 295 | TclModelBuilder_addElastomericBearing(ClientData clientData, Tcl_Interp *interp, int argc, |
- | |
| - | 295 | TclModelBuilder_addElastomericBearingPlasticity(ClientData clientData, Tcl_Interp *interp, int argc, |
|
| - | 296 | TCL_Char **argv, Domain*, TclModelBuilder *, int argStart); |
|
| - | 297 | ||
| - | 298 | extern int |
|
| - | 299 | TclModelBuilder_addElastomericBearingBoucWen(ClientData clientData, Tcl_Interp *interp, int argc, |
|
| 296 | TCL_Char **argv, Domain*, TclModelBuilder *, int argStart); |
300 | TCL_Char **argv, Domain*, TclModelBuilder *, int argStart); |
| 297 | 301 | ||
| 298 | extern int |
302 | extern int |
| 299 | TclModelBuilder_addTwoNodeLink(ClientData clientData, Tcl_Interp *interp, int argc, |
303 | TclModelBuilder_addTwoNodeLink(ClientData clientData, Tcl_Interp *interp, int argc, |
| 300 | TCL_Char **argv, Domain*, TclModelBuilder *, int argStart); |
304 | TCL_Char **argv, Domain*, TclModelBuilder *, int argStart); |
| Line 912... | Line 916... | ||
| 912 | int result = TclModelBuilder_addDoubleFPBearing(clientData, interp, argc, argv,
|
916 | int result = TclModelBuilder_addDoubleFPBearing(clientData, interp, argc, argv,
|
| 913 | theTclDomain, theTclBuilder, eleArgStart);
|
917 | theTclDomain, theTclBuilder, eleArgStart);
|
| 914 | return result;
|
918 | return result;
|
| 915 | }*/
|
919 | }*/
|
| 916 | 920 | ||
| 917 | else if (strcmp(argv[1],"elastomericBearing") == 0) { |
- | |
| - | 921 | else if (strcmp(argv[1],"elastomericBearing") == 0 || |
|
| - | 922 | strcmp(argv[1],"elastomericBearingPlasticity") == 0) { |
|
| - | 923 | int eleArgStart = 1; |
|
| - | 924 | int result = TclModelBuilder_addElastomericBearingPlasticity(clientData, interp, argc, argv, |
|
| - | 925 | theTclDomain, theTclBuilder, eleArgStart); |
|
| - | 926 | return result; |
|
| - | 927 | }
|
|
| - | 928 | ||
| - | 929 | else if (strcmp(argv[1],"elastomericBearingBoucWen") == 0) { |
|
| 918 | int eleArgStart = 1; |
930 | int eleArgStart = 1; |
| 919 | int result = TclModelBuilder_addElastomericBearing(clientData, interp, argc, argv, |
- | |
| - | 931 | int result = TclModelBuilder_addElastomericBearingBoucWen(clientData, interp, argc, argv, |
|
| 920 | theTclDomain, theTclBuilder, eleArgStart); |
932 | theTclDomain, theTclBuilder, eleArgStart); |
| 921 | return result; |
933 | return result; |
| 922 | }
|
934 | }
|
| 923 | 935 | ||
| 924 | else if (strcmp(argv[1],"twoNodeLink") == 0) { |
936 | else if (strcmp(argv[1],"twoNodeLink") == 0) { |