source: issm/oecreview/Archive/12321-12677/ISSM-12559-12560.diff@ 12679

Last change on this file since 12679 was 12679, checked in by Mathieu Morlighem, 13 years ago

Added 12321-12677
File size: 8.7 KB

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/ElementResults/TriaP1ElementResult.h

     
    1616
    1717        private:
    1818                int    enum_type;
    19                 IssmDouble values[3];
     19                IssmPDouble values[3];
    2020                int    step;
    21                 IssmDouble time;
     21                IssmPDouble time;
    2222
    2323        public:
    2424
    … …  
    3737                /*}}}*/
    3838                /*ElementResult virtual functions definitions: {{{*/
    3939                ElementResult* SpawnTriaElementResult(int* indices);
    40                 IssmDouble  GetTime(void){return time;};
     40                IssmPDouble  GetTime(void){return time;};
    4141                int     GetStep(void){return step;};
    4242                void    ProcessUnits(Parameters* parameters);
    4343                int     NumberOfNodalValues(void);

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/ElementResults/PentaP1ElementResult.cpp

     
    2929        int i;
    3030
    3131        enum_type=in_enum_type;
    32         for(i=0;i<6;i++)values[i]=in_values[i];
     32        for(i=0;i<6;i++)values[i]=reCast<IssmPDouble>(in_values[i]);
    3333        step=in_step;
    34         time=in_time;
     34        time=reCast<IssmPDouble>(in_time);
    3535}
    3636/*}}}*/
    3737/*FUNCTION PentaP1ElementResult::~PentaP1ElementResult(){{{*/
    … …  
    9494
    9595        /*output*/
    9696        TriaP1ElementResult* outresult=NULL;
    97         IssmDouble newvalues[3];
     97        IssmPDouble newvalues[3];
    9898
    9999        /*Loop over the new indices*/
    100100        for(int i=0;i<3;i++){
    … …  
    139139/*FUNCTION PentaP1ElementResult::GetVectorFromResults{{{*/
    140140void PentaP1ElementResult::GetVectorFromResults(Vector* vector,int* doflist,int* connectivitylist,int numdofs){
    141141
    142         IssmDouble data[6];
     142        IssmPDouble data[6];
    143143
    144144        if(numdofs!=6)_error2_("Result " << EnumToStringx(this->enum_type) << " is a PentaP1ElementResult and cannot write vector of " << numdofs << " dofs");
    145         for(int i=0;i<6;i++) data[i]=this->values[i]/(IssmDouble)connectivitylist[i];
     145        for(int i=0;i<6;i++) data[i]=this->values[i]/(IssmPDouble)connectivitylist[i];
    146146        vector->SetValues(numdofs,doflist,&data[0],ADD_VAL);
    147147
    148148} /*}}}*/

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/ElementResults/DoubleElementResult.cpp

     
    2727DoubleElementResult::DoubleElementResult(int in_enum_type,IssmDouble in_value,int in_step, IssmDouble in_time){
    2828
    2929        enum_type=in_enum_type;
    30         value=in_value;
     30        value=reCast<IssmPDouble>(in_value);
    3131        step=in_step;
    32         time=in_time;
     32        time=reCast<IssmPDouble>(in_time);
    3333}
    3434/*}}}*/
    3535/*FUNCTION DoubleElementResult::~DoubleElementResult(){{{*/

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/ElementResults/PentaP1ElementResult.h

     
    1717
    1818        private:
    1919                int    enum_type;
    20                 IssmDouble values[6];
     20                IssmPDouble values[6];
    2121                int    step;
    22                 IssmDouble time;
     22                IssmPDouble time;
    2323
    2424        public:
    2525
    … …  
    3838                /*}}}*/
    3939                /*ElementResult virtual functions definitions: {{{*/
    4040                ElementResult* SpawnTriaElementResult(int* indices);
    41                 IssmDouble  GetTime(void){return time;};
     41                IssmPDouble  GetTime(void){return time;};
    4242                int     GetStep(void){return step;};
    4343                void    ProcessUnits(Parameters* parameters);
    4444                int     NumberOfNodalValues(void);

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/ElementResults/DoubleElementResult.h

     
    11/*! \file DoubleElementResult.h
    2  *  \brief: header file for IssmDouble result object
    3  *  A IssmDouble result object is just derived from a DoubleInput object, with additional time and step information.
     2 *  \brief: header file for IssmPDouble result object
     3 *  A IssmPDouble result object is just derived from a DoubleInput object, with additional time and step information.
    44 */
    55
    66
    … …  
    1818
    1919        private:
    2020                int    enum_type;
    21                 IssmDouble value;
     21                IssmPDouble value;
    2222                int    step;
    23                 IssmDouble time;
     23                IssmPDouble time;
    2424
    2525        public:
    2626
    … …  
    3939                /*}}}*/
    4040                /*ElementResult virtual functions definitions: {{{*/
    4141                ElementResult* SpawnTriaElementResult(int* indices);
    42                 IssmDouble  GetTime(void){return time;};
     42                IssmPDouble  GetTime(void){return time;};
    4343                int     GetStep(void){return step;};
    4444                void    ProcessUnits(Parameters* parameters);
    4545                int     NumberOfNodalValues(void);

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/ElementResults/BoolElementResult.h

     
    2020                int    enum_type;
    2121                bool   value;
    2222                int    step;
    23                 IssmDouble time;
     23                IssmPDouble time;
    2424
    2525        public:
    2626
    … …  
    3939                /*}}}*/
    4040                /*ElementResult virtual functions definitions: {{{*/
    4141                ElementResult* SpawnTriaElementResult(int* indices);
    42                 IssmDouble  GetTime(void){return time;};
     42                IssmPDouble  GetTime(void){return time;};
    4343                int     GetStep(void){return step;};
    4444                void    ProcessUnits(Parameters* parameters);
    4545                int     NumberOfNodalValues(void);

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/ElementResults/TriaP1ElementResult.cpp

     
    2727TriaP1ElementResult::TriaP1ElementResult(int in_enum_type,IssmDouble* in_values,int in_step, IssmDouble in_time){
    2828
    2929        enum_type=in_enum_type;
    30         values[0]=in_values[0];
    31         values[1]=in_values[1];
    32         values[2]=in_values[2];
     30        values[0]=reCast<IssmPDouble>(in_values[0]);
     31        values[1]=reCast<IssmPDouble>(in_values[1]);
     32        values[2]=reCast<IssmPDouble>(in_values[2]);
    3333        step=in_step;
    34         time=in_time;
     34        time=reCast<IssmPDouble>(in_time);
    3535}
    3636/*}}}*/
    3737/*FUNCTION TriaP1ElementResult::~TriaP1ElementResult(){{{*/
    … …  
    127127/*FUNCTION TriaP1ElementResult::GetVectorFromResults{{{*/
    128128void TriaP1ElementResult::GetVectorFromResults(Vector* vector,int* doflist,int* connectivitylist,int numdofs){
    129129
    130         IssmDouble data[3];
     130        IssmPDouble data[3];
    131131
    132132        if(numdofs!=3)_error2_("Result " << EnumToStringx(this->enum_type) << " is a TriaP1ElementResult and cannot write vector of " << numdofs << " dofs");
    133         for(int i=0;i<3;i++) data[i]=this->values[i]/(IssmDouble)connectivitylist[i];
     133        for(int i=0;i<3;i++) data[i]=this->values[i]/(IssmPDouble)connectivitylist[i];
    134134        vector->SetValues(numdofs,doflist,&data[0],ADD_VAL);
    135135
    136136} /*}}}*/

  • u/astrid-r1b/morlighe/issmuci/trunk-jpl/../trunk-jpl/src/c/objects/ElementResults/ElementResult.h

     
    1818                virtual        ~ElementResult(){};
    1919               
    2020                virtual         ElementResult* SpawnTriaElementResult(int* indices)=0;
    21                 virtual IssmDouble  GetTime(void)=0;
     21                virtual IssmPDouble  GetTime(void)=0;
    2222                virtual int     GetStep(void)=0;
    2323                virtual void    ProcessUnits(Parameters* parameters)=0;
    2424                virtual int     NumberOfNodalValues(void)=0;
Note: See TracBrowser for help on using the repository browser.