Changeset 364
- Timestamp:
- 05/12/09 15:05:41 (16 years ago)
- Location:
- issm/trunk/src
- Files:
-
- 6 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk/src/m/solutions/cielo/diagnostic_core_linear.m
r358 r364 12 12 13 13 %system matrices 14 [K_gg, p_g]=SystemMatrices(m.elements,m.nodes,m.loads,m.materials,m.parameters,inputs );14 [K_gg, p_g]=SystemMatrices(m.elements,m.nodes,m.loads,m.materials,m.parameters,inputs,analysis_type); 15 15 16 16 %Reduce tangent matrix from g size to f size -
issm/trunk/src/m/solutions/cielo/diagnostic_core_nonlinear.m
r333 r364 30 30 31 31 %system matrices 32 [K_gg_nopenalty , p_g_nopenalty]=SystemMatrices(m.elements,m.nodes,loads,m.materials,m.parameters,inputs );32 [K_gg_nopenalty , p_g_nopenalty]=SystemMatrices(m.elements,m.nodes,loads,m.materials,m.parameters,inputs,analysis_type); 33 33 34 34 %penalties 35 [K_gg , p_g]=PenaltySystemMatrices(K_gg_nopenalty,p_g_nopenalty,m.elements,m.nodes,loads,m.materials,m.parameters,inputs );35 [K_gg , p_g]=PenaltySystemMatrices(K_gg_nopenalty,p_g_nopenalty,m.elements,m.nodes,loads,m.materials,m.parameters,inputs,analysis_type); 36 36 37 37 -
issm/trunk/src/mex/PenaltySystemMatrices/PenaltySystemMatrices.cpp
r246 r364 20 20 ParameterInputs* inputs=NULL; 21 21 int analysis_type; 22 char* analysis_type_string=NULL; 22 23 23 24 /*Boot module: */ … … 37 38 FetchData((void**)&kflag,NULL,NULL,mxGetField(PARAMETERS,0,"kflag"),"Integer",NULL); 38 39 FetchData((void**)&pflag,NULL,NULL,mxGetField(PARAMETERS,0,"pflag"),"Integer",NULL); 39 FetchData((void**)&analysis_type,NULL,NULL,mxGetField(PARAMETERS,0,"analysis_type"),"Integer",NULL); 40 41 FetchData((void**)&analysis_type_string,NULL,NULL,ANALYSIS,"String",NULL); 42 analysis_type=AnalysisTypeAsEnum(analysis_type_string); 43 40 44 41 45 /*Fetch inputs: */ … … 58 62 MatFree(&Kgg); 59 63 VecFree(&pg); 64 xfree((void**)&analysis_type_string); 60 65 61 66 /*end module: */ -
issm/trunk/src/mex/PenaltySystemMatrices/PenaltySystemMatrices.h
r1 r364 25 25 #define PARAMETERS (mxArray*)prhs[6] 26 26 #define INPUTS (mxArray*)prhs[7] 27 #define ANALYSIS (mxArray*)prhs[8] 27 28 28 29 /* serial output macros: */ … … 34 35 #define NLHS 2 35 36 #undef NRHS 36 #define NRHS 837 #define NRHS 9 37 38 38 39 -
issm/trunk/src/mex/SystemMatrices/SystemMatrices.cpp
r246 r364 19 19 int numberofdofspernode; 20 20 ParameterInputs* inputs=NULL; 21 char* analysis_type_string=NULL; 21 22 int analysis_type; 22 23 … … 41 42 FetchData((void**)&connectivity,NULL,NULL,mxGetField(PARAMETERS,0,"connectivity"),"Integer",NULL); 42 43 FetchData((void**)&numberofdofspernode,NULL,NULL,mxGetField(PARAMETERS,0,"numberofdofspernode"),"Integer",NULL); 43 FetchData((void**)&analysis_type,NULL,NULL,mxGetField(PARAMETERS,0,"analysis_type"),"Integer",NULL); 44 45 FetchData((void**)&analysis_type_string,NULL,NULL,ANALYSIS,"String",NULL); 46 analysis_type=AnalysisTypeAsEnum(analysis_type_string); 44 47 45 48 /*Fetch inputs: */ … … 56 59 57 60 /*Free ressources: */ 61 xfree((void**)&analysis_type_string); 58 62 delete elements; 59 63 delete nodes; -
issm/trunk/src/mex/SystemMatrices/SystemMatrices.h
r1 r364 23 23 #define PARAMETERS (mxArray*)prhs[4] 24 24 #define INPUTS (mxArray*)prhs[5] 25 #define ANALYSIS (mxArray*)prhs[6] 25 26 26 27 /* serial output macros: */ … … 32 33 #define NLHS 2 33 34 #undef NRHS 34 #define NRHS 635 #define NRHS 7 35 36 36 37
Note:
See TracChangeset
for help on using the changeset viewer.