Changeset 5931


Ignore:
Timestamp:
09/21/10 16:27:18 (15 years ago)
Author:
Mathieu Morlighem
Message:

more ElementVector

Location:
issm/trunk/src/c/objects/Elements
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • issm/trunk/src/c/objects/Elements/Penta.cpp

    r5930 r5931  
    774774                        break;
    775775                case PrognosticAnalysisEnum:
    776                         CreatePVectorPrognostic( pg);
     776                        pe=CreatePVectorPrognostic();
     777                        if(pe) pe->AddToGlobal(pg,pf);
     778                        if(pe) delete pe;
    777779                        break;
    778780                case BalancedthicknessAnalysisEnum:
    779                         CreatePVectorBalancedthickness( pg);
     781                        pe=CreatePVectorBalancedthickness();
     782                        if(pe) pe->AddToGlobal(pg,pf);
     783                        if(pe) delete pe;
    780784                        break;
    781785                case BalancedvelocitiesAnalysisEnum:
    782                         CreatePVectorBalancedvelocities( pg);
     786                        pe=CreatePVectorBalancedvelocities();
     787                        if(pe) pe->AddToGlobal(pg,pf);
     788                        if(pe) delete pe;
    783789                        break;
    784790                case ThermalAnalysisEnum:
    … …  
    30023008/*}}}*/
    30033009/*FUNCTION Penta::CreatePVectorBalancedthickness {{{1*/
    3004 void Penta::CreatePVectorBalancedthickness( Vec pg){
    3005 
    3006         if (!IsOnBed() || IsOnWater()) return;
     3010ElementVector* Penta::CreatePVectorBalancedthickness(void){
     3011
     3012        if (!IsOnBed() || IsOnWater()) return NULL;
    30073013
    30083014        /*Depth Averaging Vx and Vy*/
    … …  
    30143020        ElementVector* pe=tria->CreatePVectorBalancedthickness();
    30153021        delete tria->matice; delete tria;
    3016         pe->AddToGlobal(pg,NULL);
    3017         delete pe;
    30183022
    30193023        /*Delete Vx and Vy averaged*/
    … …  
    30223026
    30233027        /*Clean up and return*/
    3024         return;
     3028        return pe;
    30253029}
    30263030/*}}}*/
    30273031/*FUNCTION Penta::CreatePVectorBalancedvelocities {{{1*/
    3028 void Penta::CreatePVectorBalancedvelocities( Vec pg){
    3029 
    3030         if (!IsOnBed() || IsOnWater()) return;
     3032ElementVector* Penta::CreatePVectorBalancedvelocities(void){
     3033
     3034        if (!IsOnBed() || IsOnWater()) return NULL;
    30313035
    30323036        /*Depth Averaging Vx and Vy*/
    … …  
    30383042        ElementVector* pe=tria->CreatePVectorBalancedvelocities();
    30393043        delete tria->matice; delete tria;
    3040         pe->AddToGlobal(pg,NULL);
    3041         delete pe;
    30423044
    30433045        /*Delete Vx and Vy averaged*/
    … …  
    30463048
    30473049        /*Clean up and return*/
    3048         return;
     3050        return pe;
    30493051}
    30503052/*}}}*/
    … …  
    37393741/*}}}*/
    37403742/*FUNCTION Penta::CreatePVectorPrognostic {{{1*/
    3741 void Penta::CreatePVectorPrognostic( Vec pg){
    3742 
    3743         if (!IsOnBed() || IsOnWater()) return;
     3743ElementVector* Penta::CreatePVectorPrognostic(void){
     3744
     3745        if (!IsOnBed() || IsOnWater()) return NULL;
    37443746
    37453747        /*Depth Averaging Vx and Vy*/
    … …  
    37513753        ElementVector* pe=tria->CreatePVectorPrognostic();
    37523754        delete tria->matice; delete tria;
    3753         pe->AddToGlobal(pg,NULL);
    3754         delete pe;
    37553755
    37563756        /*Delete Vx and Vy averaged*/
    … …  
    37593759
    37603760        /*Clean up and return*/
    3761         return;
     3761        return pe;
    37623762}
    37633763/*}}}*/

  • issm/trunk/src/c/objects/Elements/Penta.h

    r5929 r5931  
    150150                ElementMatrix* CreateKMatrixThermalVolume(void);
    151151                ElementMatrix* CreateKMatrixThermalShelf(void);
    152                 void      CreatePVectorBalancedthickness( Vec pg);
    153                 void      CreatePVectorBalancedvelocities( Vec pg);
     152                ElementVector* CreatePVectorBalancedthickness(void);
     153                ElementVector* CreatePVectorBalancedvelocities(void);
    154154                ElementVector* CreatePVectorAdjointHoriz(void);
    155155                ElementVector* CreatePVectorAdjointMacAyeal(void);
    … …  
    170170                void      CreatePVectorDiagnosticVert( Vec pg);
    171171                void      CreatePVectorMelting( Vec pg);
    172                 void      CreatePVectorPrognostic( Vec pg);
     172                ElementVector* CreatePVectorPrognostic(void);
    173173                ElementVector* CreatePVectorSlope(void);
    174174                void      CreatePVectorThermal( Vec pg);
Note: See TracChangeset for help on using the changeset viewer.