Changeset 8808
- Timestamp:
- 07/06/11 08:13:37 (14 years ago)
- Location:
- issm/trunk/src/c
- Files:
-
- 3 edited
Legend:
- Unmodified
- Added
- Removed
-
TabularUnified issm/trunk/src/c/modules/Reduceloadx/Reduceloadx.cpp ¶
r7191 r8808 27 27 if(pf && global_m*global_n){ 28 28 29 /*Some checks in debugging mode*/ 30 _assert_(y_s); 31 29 32 /*pf = pf - Kfs * y_s;*/ 30 33 MatGetLocalSize(Kfs,&Kfsm,&Kfsn); -
TabularUnified issm/trunk/src/c/objects/Node.cpp ¶
r8800 r8808 119 119 if (iomodel->dim==3){ 120 120 /*On a 3d mesh, we may have collapsed elements, hence dead nodes. Freeze them out: */ 121 if (!iomodel->nodeonbed) _error_("iomodel->nodeonbed is NULL");121 _assert_(iomodel->nodeonbed); 122 122 if (!iomodel->nodeonbed[io_index]){ 123 123 for(k=1;k<=gsize;k++){ -
TabularUnified issm/trunk/src/c/solvers/solver_linear.cpp ¶
r8803 r8808 17 17 Vec df = NULL; 18 18 Vec ys = NULL; 19 int analysis_type;19 int configuration_type; 20 20 21 21 /*Recover parameters: */ 22 femmodel->parameters->FindParam(& analysis_type,AnalysisTypeEnum);22 femmodel->parameters->FindParam(&configuration_type,ConfigurationTypeEnum); 23 23 24 24 SystemMatricesx(&Kff, &Kfs, &pf, &df, NULL,femmodel->elements,femmodel->nodes,femmodel->vertices,femmodel->loads,femmodel->materials,femmodel->parameters); 25 CreateNodalConstraintsx(&ys,femmodel->nodes, analysis_type);25 CreateNodalConstraintsx(&ys,femmodel->nodes,configuration_type); 26 26 Reduceloadx(pf, Kfs, ys); MatFree(&Kfs); 27 27 Solverx(&uf, Kff, pf, NULL, df, femmodel->parameters); MatFree(&Kff); VecFree(&pf); VecFree(&df);
Note:
See TracChangeset
for help on using the changeset viewer.