Changeset 5481
- Timestamp:
- 08/23/10 00:32:52 (15 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk/src/mex/DakotaResponses/DakotaResponses.cpp
r4617 r5481 16 16 Materials* materials=NULL; 17 17 Parameters* parameters=NULL; 18 Vec node_partition=NULL; 18 19 double* responses=NULL; 19 20 char** responses_descriptors=NULL; 20 21 char* string=NULL; 21 22 int numresponses; 23 int numresponsedescriptors; 22 24 mxArray* pfield=NULL; 23 25 int stringlength; … … 36 38 FetchData((DataSet**)&materials,MATERIALSIN); 37 39 FetchParams(¶meters,PARAMETERSIN); 40 FetchData(&node_partition,NODEPARTITION); 41 42 /*number of responses: */ 43 parameters->FindParam(&numresponses,QmuNumberOfResponsesEnum); 38 44 39 45 /*dakota input: */ 40 numresponse s=mxGetM(RESPONSESDESCRIPTORS);41 responses_descriptors=(char**)xmalloc(numresponse s*sizeof(char*));42 for(i=0;i<numresponse s;i++){46 numresponsedescriptors=mxGetM(RESPONSESDESCRIPTORS); 47 responses_descriptors=(char**)xmalloc(numresponsedescriptors*sizeof(char*)); 48 for(i=0;i<numresponsedescriptors;i++){ 43 49 pfield=mxGetCell(RESPONSESDESCRIPTORS,i); 44 50 stringlength = (mxGetM(pfield) * mxGetN(pfield) * sizeof(mxChar)) + 1 ; … … 57 63 58 64 /*!Generate internal degree of freedom numbers: */ 59 DakotaResponsesx(responses,elements,nodes, vertices,loads,materials, parameters, responses_descriptors,numresponses);65 DakotaResponsesx(responses,elements,nodes, vertices,loads,materials, parameters, node_partition,responses_descriptors,numresponsedescriptors,numresponses); 60 66 61 67 /*write output datasets: */ … … 70 76 delete parameters; 71 77 72 for(i=0;i<numresponse s;i++){78 for(i=0;i<numresponsedescriptors;i++){ 73 79 char* string=responses_descriptors[i]; xfree((void**)&string); 74 80 } … … 84 90 { 85 91 _printf_("\n"); 86 _printf_(" usage: [responses] = %s(elements,nodes,vertices,loads,materials,parameters,responses_descritpors ,numresponses);\n",__FUNCT__);92 _printf_(" usage: [responses] = %s(elements,nodes,vertices,loads,materials,parameters,responses_descritpors);\n",__FUNCT__); 87 93 _printf_("\n"); 88 94 }
Note:
See TracChangeset
for help on using the changeset viewer.