Changeset 3966


Ignore:
Timestamp:
05/27/10 08:49:46 (15 years ago)
Author:
Mathieu Morlighem
Message:

moved some Dataset methods to modules

Location:
issm/trunk/src/c
Files:
5 edited

Legend:

Unmodified
Added
Removed
  • issm/trunk/src/c/DataSet/DataSet.cpp

    r3965 r3966  
    549549
    550550/*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 /*}}}*/
    602551/*FUNCTION DataSet::Configure{{{1*/
    603552void DataSet::Configure(DataSet* elements,DataSet* loads, DataSet* nodes, DataSet* vertices, DataSet* materials,Parameters* parameters){
  • issm/trunk/src/c/DataSet/DataSet.h

    r3965 r3966  
    9191                void  InputExtrude(int enum_type);
    9292                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);
    9693                void  FieldExtrude(Vec field,double* field_serial,char* field_name, int collapse);
    9794                void  InputToResult(Mat* psolution,int enum_type);
  • issm/trunk/src/c/modules/ComputeBasalStressx/ComputeBasalStressx.cpp

    r3913 r3966  
    1313                        int analysis_type,int sub_analysis_type){
    1414
     15        /*Intermediary*/
    1516        int i;
    16 
    17         int  found=0;
    18         double numberofelements;
     17        int      found=0;
     18        double   numberofelements;
     19        Element* element=NULL;
    1920
    2021        /*output: */
     
    2930
    3031        /*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);
    3334        parameters->Configure(elements,loads, nodes,vertices, materials,parameters);
    3435
    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        }
    3741
    3842        /*Assemble vector: */
  • issm/trunk/src/c/modules/ComputePressurex/ComputePressurex.cpp

    r3913 r3966  
    1313                        int analysis_type,int sub_analysis_type){
    1414
     15        /*intermediary*/
    1516        int numberofnodes;
     17        int i;
     18        Element* element=NULL;
    1619
    1720        /*output: */
     
    3033        parameters->Configure(elements,loads,nodes,vertices,materials,parameters);
    3134
    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        }
    3440
    3541        /*Assemble vector: */
  • issm/trunk/src/c/modules/ComputeStrainRatex/ComputeStrainRatex.cpp

    r3913 r3966  
    1313                        int analysis_type,int sub_analysis_type){
    1414
     15        /*Intermediary*/
    1516        int i;
    16 
    17         int  found=0;
    18         double numberofelements;
     17        int      found=0;
     18        double   numberofelements;
     19        Element* element=NULL;
    1920
    2021        /*output: */
     
    2829
    2930        /*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);
    3233        parameters->Configure(elements,loads, nodes,vertices, materials,parameters);
    3334
    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        }
    3640
    3741        /*Assemble vector: */
Note: See TracChangeset for help on using the changeset viewer.