Changeset 3966
- Timestamp:
- 05/27/10 08:49:46 (15 years ago)
- Location:
- issm/trunk/src/c
- Files:
-
- 5 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk/src/c/DataSet/DataSet.cpp
r3965 r3966 549 549 550 550 /*Objects methods*/ 551 /*FUNCTION DataSet::ComputeBasalStress{{{1*/552 void DataSet::ComputeBasalStress(Vec sigma_b,int analysis_type,int sub_analysis_type){553 554 vector<Object*>::iterator object;555 Element* element=NULL;556 557 for ( object=objects.begin() ; object < objects.end(); object++ ){558 559 if(EnumIsElement((*object)->Enum())){560 561 element=(Element*)(*object);562 element->ComputeBasalStress(sigma_b,analysis_type,sub_analysis_type);563 }564 }565 566 }567 /*}}}*/568 /*FUNCTION DataSet::ComputePressure{{{1*/569 void DataSet::ComputePressure(Vec p_g,int analysis_type,int sub_analysis_type){570 571 vector<Object*>::iterator object;572 Element* element=NULL;573 574 for ( object=objects.begin() ; object < objects.end(); object++ ){575 576 if(EnumIsElement((*object)->Enum())){577 578 element=(Element*)(*object);579 element->ComputePressure(p_g,analysis_type,sub_analysis_type);580 }581 }582 583 }584 /*}}}*/585 /*FUNCTION DataSet::ComputeStrainRate{{{1*/586 void DataSet::ComputeStrainRate(Vec eps,int analysis_type,int sub_analysis_type){587 588 vector<Object*>::iterator object;589 Element* element=NULL;590 591 for ( object=objects.begin() ; object < objects.end(); object++ ){592 593 if(EnumIsElement((*object)->Enum())){594 595 element=(Element*)(*object);596 element->ComputeStrainRate(eps,analysis_type,sub_analysis_type);597 }598 }599 600 }601 /*}}}*/602 551 /*FUNCTION DataSet::Configure{{{1*/ 603 552 void DataSet::Configure(DataSet* elements,DataSet* loads, DataSet* nodes, DataSet* vertices, DataSet* materials,Parameters* parameters){ -
issm/trunk/src/c/DataSet/DataSet.h
r3965 r3966 91 91 void InputExtrude(int enum_type); 92 92 int DeleteObject(Object* object); 93 void ComputeBasalStress(Vec sigma_b,int analysis_type,int sub_analysis_type);94 void ComputePressure(Vec p_g,int analysis_type,int sub_analysis_type);95 void ComputeStrainRate(Vec eps,int analysis_type,int sub_analysis_type);96 93 void FieldExtrude(Vec field,double* field_serial,char* field_name, int collapse); 97 94 void InputToResult(Mat* psolution,int enum_type); -
issm/trunk/src/c/modules/ComputeBasalStressx/ComputeBasalStressx.cpp
r3913 r3966 13 13 int analysis_type,int sub_analysis_type){ 14 14 15 /*Intermediary*/ 15 16 int i; 16 17 int found=0;18 double numberofelements;17 int found=0; 18 double numberofelements; 19 Element* element=NULL; 19 20 20 21 /*output: */ … … 29 30 30 31 /*Get elements configured: */ 31 elements-> Configure(elements,loads, nodes,vertices, materials,parameters);32 nodes-> Configure(elements,loads, nodes,vertices, materials,parameters);32 elements-> Configure(elements,loads, nodes,vertices, materials,parameters); 33 nodes-> Configure(elements,loads, nodes,vertices, materials,parameters); 33 34 parameters->Configure(elements,loads, nodes,vertices, materials,parameters); 34 35 35 /*Call on dataset driver: */ 36 elements->ComputeBasalStress(sigma,analysis_type,sub_analysis_type); 36 /*Compute basal stress for each element: */ 37 for (i=0;i<elements->Size();i++){ 38 element=(Element*)elements->GetObjectByOffset(i); 39 element->ComputeBasalStress(sigma,analysis_type,sub_analysis_type); 40 } 37 41 38 42 /*Assemble vector: */ -
issm/trunk/src/c/modules/ComputePressurex/ComputePressurex.cpp
r3913 r3966 13 13 int analysis_type,int sub_analysis_type){ 14 14 15 /*intermediary*/ 15 16 int numberofnodes; 17 int i; 18 Element* element=NULL; 16 19 17 20 /*output: */ … … 30 33 parameters->Configure(elements,loads,nodes,vertices,materials,parameters); 31 34 32 /*Call on dataset driver: */ 33 elements->ComputePressure(p_g,analysis_type,sub_analysis_type); 35 /*Compute pressure for each element: */ 36 for (i=0;i<elements->Size();i++){ 37 element=(Element*)elements->GetObjectByOffset(i); 38 element->ComputePressure(p_g,analysis_type,sub_analysis_type); 39 } 34 40 35 41 /*Assemble vector: */ -
issm/trunk/src/c/modules/ComputeStrainRatex/ComputeStrainRatex.cpp
r3913 r3966 13 13 int analysis_type,int sub_analysis_type){ 14 14 15 /*Intermediary*/ 15 16 int i; 16 17 int found=0;18 double numberofelements;17 int found=0; 18 double numberofelements; 19 Element* element=NULL; 19 20 20 21 /*output: */ … … 28 29 29 30 /*Get elements configured: */ 30 elements-> Configure(elements,loads, nodes,vertices, materials,parameters);31 nodes-> Configure(elements,loads, nodes,vertices, materials,parameters);31 elements-> Configure(elements,loads, nodes,vertices, materials,parameters); 32 nodes-> Configure(elements,loads, nodes,vertices, materials,parameters); 32 33 parameters->Configure(elements,loads, nodes,vertices, materials,parameters); 33 34 34 /*Call on dataset driver: */ 35 elements->ComputeStrainRate(eps,analysis_type,sub_analysis_type); 35 /*Compute basal stress for each element: */ 36 for (i=0;i<elements->Size();i++){ 37 element=(Element*)elements->GetObjectByOffset(i); 38 element->ComputeStrainRate(eps,analysis_type,sub_analysis_type); 39 } 36 40 37 41 /*Assemble vector: */
Note:
See TracChangeset
for help on using the changeset viewer.