Changeset 8801
- Timestamp:
- 07/05/11 16:47:23 (14 years ago)
- Location:
- issm/trunk/src/mex
- Files:
-
- 3 added
- 3 deleted
- 9 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk/src/mex/Makefile.am
r8714 r8801 9 9 BamgMesher\ 10 10 BamgConvertMesh\ 11 BuildNodeSets\12 11 Chaco\ 13 12 ComputeBasalStress\ … … 63 62 Qmu\ 64 63 Reduceload\ 65 Reduceloadfromgtof\66 Reducematrixfromgtof\67 64 Reducevectorgtos\ 68 65 Reducevectorgtof\ … … 86 83 InputUpdateFromVector\ 87 84 UpdateVertexPositions\ 85 UpdateSpcs\ 88 86 VerticesDof 89 87 … … 114 112 AddExternalResult/AddExternalResult.h 115 113 116 BuildNodeSets_SOURCES = BuildNodeSets/BuildNodeSets.cpp\117 BuildNodeSets/BuildNodeSets.h118 119 114 BamgMesher_SOURCES = BamgMesher/BamgMesher.cpp\ 120 115 BamgMesher/BamgMesher.h … … 285 280 Reduceload/Reduceload.h 286 281 287 Reducematrixfromgtof_SOURCES = Reducematrixfromgtof/Reducematrixfromgtof.cpp\288 Reducematrixfromgtof/Reducematrixfromgtof.h289 290 Reduceloadfromgtof_SOURCES = Reduceloadfromgtof/Reduceloadfromgtof.cpp\291 Reduceloadfromgtof/Reduceloadfromgtof.h292 293 282 Reducevectorgtos_SOURCES = Reducevectorgtos/Reducevectorgtos.cpp\ 294 283 Reducevectorgtos/Reducevectorgtos.h … … 351 340 UpdateVertexPositions/UpdateVertexPositions.h 352 341 342 UpdateSpcs_SOURCES = UpdateSpcs/UpdateSpcs.cpp\ 343 UpdateSpcs/UpdateSpcs.h 344 353 345 ParsePetscOptions_SOURCES = ParsePetscOptions/ParsePetscOptions.cpp\ 354 346 ParsePetscOptions/ParsePetscOptions.h … … 358 350 VerticesDof/VerticesDof.h 359 351 360 -
issm/trunk/src/mex/Mergesolutionfromftog/Mergesolutionfromftog.cpp
r6579 r8801 11 11 Vec uf = NULL; 12 12 Vec ys = NULL; 13 NodeSets *nodesets = NULL; 13 Nodes* nodes = NULL; 14 Parameters* parameters = NULL; 14 15 15 16 /* output datasets: */ … … 20 21 21 22 /*checks on arguments on the matlab side: */ 22 if((nlhs!=NLHS) || (nrhs!= 3 && nrhs!=4)){23 if((nlhs!=NLHS) || (nrhs!=4 && nrhs!=5)){ 23 24 MergesolutionfromftogUsage(); 24 25 _error_(" usage. See above"); … … 28 29 FetchData(&uf,UF); 29 30 FetchData(&ys,YS); 30 FetchNodeSets(&nodesets,NODESETS); 31 FetchData((DataSet**)&nodes,NODES); 32 FetchParams(¶meters,PARAMETERS); 31 33 32 34 /*!Reduce vector: */ 33 if (nrhs== 3){34 Mergesolutionfromftogx(&ug, uf,ys,nodes ets);35 if (nrhs==4){ 36 Mergesolutionfromftogx(&ug, uf,ys,nodes,parameters); 35 37 } 36 38 else{ 37 39 FetchData(&flag_ys0,YSFLAG); 38 Mergesolutionfromftogx(&ug, uf,ys,nodes ets,flag_ys0);40 Mergesolutionfromftogx(&ug, uf,ys,nodes,parameters,flag_ys0); 39 41 } 40 42 … … 46 48 VecFree(&ug); 47 49 VecFree(&ys); 48 delete nodesets; 50 delete nodes; 51 delete parameters; 49 52 50 53 /*end module: */ … … 55 58 { 56 59 _printf_(true,"\n"); 57 _printf_(true," usage: [ug] = %s(uf,ys,nodes ets,[flag_ys0]);\n",__FUNCT__);60 _printf_(true," usage: [ug] = %s(uf,ys,nodes,parameters,[flag_ys0]);\n",__FUNCT__); 58 61 _printf_(true,"\n"); 59 62 } -
issm/trunk/src/mex/Mergesolutionfromftog/Mergesolutionfromftog.h
r6579 r8801 21 21 #define UF (mxArray*)prhs[0] 22 22 #define YS (mxArray*)prhs[1] 23 #define NODESETS (mxArray*)prhs[2] 24 #define YSFLAG (mxArray*)prhs[3] 23 #define NODES (mxArray*)prhs[2] 24 #define PARAMETERS (mxArray*)prhs[3] 25 #define YSFLAG (mxArray*)prhs[4] 25 26 26 27 /* serial output macros: */ … … 31 32 #define NLHS 1 32 33 #undef NRHS 33 #define NRHS 434 #define NRHS 5 34 35 35 36 #endif /* _MERGESOLUTIONFROMFTOG_H */ -
issm/trunk/src/mex/Reducevectorgtof/Reducevectorgtof.cpp
r6412 r8801 9 9 /*input datasets: */ 10 10 Vec ug=NULL; 11 Node Sets* nodesets=NULL;11 Nodes* nodes=NULL; 12 12 Parameters* parameters=NULL; 13 13 … … 23 23 /*Input datasets: */ 24 24 FetchData(&ug,UG); 25 Fetch NodeSets(&nodesets,NODESETS);25 FetchData((DataSet**)&nodes,NODES); 26 26 FetchParams(¶meters,PARAMETERS); 27 27 28 28 /*!Reduce vector: */ 29 Reducevectorgtofx(&uf,ug,nodes ets,parameters);29 Reducevectorgtofx(&uf,ug,nodes,parameters); 30 30 31 31 /*write output datasets: */ … … 33 33 34 34 /*Free ressources: */ 35 delete nodes ets;35 delete nodes; 36 36 delete parameters; 37 37 VecFree(&ug); … … 45 45 { 46 46 _printf_(true,"\n"); 47 _printf_(true," usage: uf = %s(ug,nodes ets,parameters);\n",__FUNCT__);47 _printf_(true," usage: uf = %s(ug,nodes,parameters);\n",__FUNCT__); 48 48 _printf_(true,"\n"); 49 49 } -
issm/trunk/src/mex/Reducevectorgtof/Reducevectorgtof.h
r5787 r8801 20 20 /* serial input macros: */ 21 21 #define UG (mxArray*)prhs[0] 22 #define NODES ETS(mxArray*)prhs[1]22 #define NODES (mxArray*)prhs[1] 23 23 #define PARAMETERS (mxArray*)prhs[2] 24 24 -
issm/trunk/src/mex/Reducevectorgtos/Reducevectorgtos.cpp
r6412 r8801 9 9 /*input datasets: */ 10 10 Vec yg=NULL; 11 Node Sets* nodesets=NULL;11 Nodes* nodes=NULL; 12 12 Parameters* parameters=NULL; 13 13 … … 23 23 /*Input datasets: */ 24 24 FetchData(&yg,YG); 25 Fetch NodeSets(&nodesets,NODESETS);25 FetchData((DataSet**)&nodes,NODES); 26 26 FetchParams(¶meters,PARAMETERS); 27 27 28 28 /*!Reduce vector: */ 29 Reducevectorgtosx(&ys,yg,nodes ets,parameters);29 Reducevectorgtosx(&ys,yg,nodes,parameters); 30 30 31 31 /*write output datasets: */ … … 33 33 34 34 /*Free ressources: */ 35 delete nodes ets;35 delete nodes; 36 36 delete parameters; 37 37 VecFree(&yg); … … 45 45 { 46 46 _printf_(true,"\n"); 47 _printf_(true," usage: ys = %s(yg,nodes ets,parameters);\n",__FUNCT__);47 _printf_(true," usage: ys = %s(yg,nodes,parameters);\n",__FUNCT__); 48 48 _printf_(true,"\n"); 49 49 } -
issm/trunk/src/mex/Reducevectorgtos/Reducevectorgtos.h
r5787 r8801 18 18 /* serial input macros: */ 19 19 #define YG (mxArray*)prhs[0] 20 #define NODES ETS(mxArray*)prhs[1]20 #define NODES (mxArray*)prhs[1] 21 21 #define PARAMETERS (mxArray*)prhs[2] 22 22 -
issm/trunk/src/mex/SystemMatrices/SystemMatrices.cpp
r7391 r8801 17 17 18 18 /* output datasets: */ 19 Mat Kgg = NULL;20 19 Mat Kff = NULL; 21 20 Mat Kfs = NULL; 22 Vec pg = NULL;23 21 Vec pf = NULL; 24 Vec dg = NULL;25 22 Vec df = NULL; 26 23 … … 56 53 FetchData(&penalty_kflag,PENALTYKFLAG); 57 54 FetchData(&penalty_pflag,PENALTYPFLAG); 58 SystemMatricesx(&K gg,&Kff,&Kfs,&pg,&pf,&dg,&df,&kmax,elements,nodes,vertices,loads,materials,parameters,kflag,pflag,penalty_kflag,penalty_pflag);55 SystemMatricesx(&Kff,&Kfs,&pf,&df,&kmax,elements,nodes,vertices,loads,materials,parameters,kflag,pflag,penalty_kflag,penalty_pflag); 59 56 } 60 57 else 61 SystemMatricesx(&K gg,&Kff,&Kfs,&pg,&pf,&dg,&df,&kmax,elements,nodes,vertices,loads,materials,parameters);58 SystemMatricesx(&Kff,&Kfs,&pf,&df,&kmax,elements,nodes,vertices,loads,materials,parameters); 62 59 63 60 /*write output datasets: */ 64 WriteData(KGG,Kgg);65 61 WriteData(KFF,Kff); 66 62 WriteData(KFS,Kfs); 67 WriteData(PG,pg);68 63 WriteData(PF,pf); 69 WriteData(DG,dg);70 64 WriteData(DF,df); 71 65 WriteData(KMAX,kmax); … … 78 72 delete materials; 79 73 delete parameters; 80 MatFree(&Kgg);81 74 MatFree(&Kff); 82 75 MatFree(&Kfs); 83 VecFree(&pg);84 76 VecFree(&pf); 85 VecFree(&dg);86 77 VecFree(&df); 87 78 … … 93 84 { 94 85 _printf_(true,"\n"); 95 _printf_(true," usage: [K gg,Kff,Kfs,pg,pf,dg,df,kmax] = %s(elements,nodes,vertices,loads,materials,parameters);\n",__FUNCT__);96 _printf_(true," usage: [K gg,Kff,Kfs,pg,pf,dg,df,kmax] = %s(elements,nodes,vertices,loads,materials,parameters,kflag,pflag,penalty_kflag,penalty_pflag);\n",__FUNCT__);86 _printf_(true," usage: [Kff,Kfs,pf,df,kmax] = %s(elements,nodes,vertices,loads,materials,parameters);\n",__FUNCT__); 87 _printf_(true," usage: [Kff,Kfs,pf,df,kmax] = %s(elements,nodes,vertices,loads,materials,parameters,kflag,pflag,penalty_kflag,penalty_pflag);\n",__FUNCT__); 97 88 _printf_(true,"\n"); 98 89 } -
issm/trunk/src/mex/SystemMatrices/SystemMatrices.h
r7391 r8801 30 30 31 31 /* serial output macros: */ 32 #define KGG (mxArray**)&plhs[0] 33 #define KFF (mxArray**)&plhs[1] 34 #define KFS (mxArray**)&plhs[2] 35 #define PG (mxArray**)&plhs[3] 36 #define PF (mxArray**)&plhs[4] 37 #define DG (mxArray**)&plhs[5] 38 #define DF (mxArray**)&plhs[6] 39 #define KMAX (mxArray**)&plhs[7] 32 #define KFF (mxArray**)&plhs[0] 33 #define KFS (mxArray**)&plhs[1] 34 #define PF (mxArray**)&plhs[2] 35 #define DF (mxArray**)&plhs[3] 36 #define KMAX (mxArray**)&plhs[4] 40 37 41 38 /* serial arg counts: */ 42 39 #undef NLHS 43 #define NLHS 840 #define NLHS 5 44 41 #undef NRHS 45 42 #define NRHS 10
Note:
See TracChangeset
for help on using the changeset viewer.