Changeset 17324


Ignore:
Timestamp:
02/20/14 14:11:43 (11 years ago)
Author:
Mathieu Morlighem
Message:

BUG: fixed node on bed assertion

File:
1 edited

Legend:

Unmodified
Added
Removed
  • issm/trunk-jpl/src/c/analyses/StressbalanceAnalysis.cpp

    r17317 r17324  
    55#include "../modules/modules.h"
    66#include "../solutionsequences/solutionsequences.h"
     7#include "../cores/cores.h"
    78
    89//#define FSANALYTICAL 1
     
    272273                }
    273274                iomodel->FetchData(3,FlowequationBorderSSAEnum,FlowequationVertexEquationEnum,StressbalanceReferentialEnum);
    274                 if(iomodel->meshtype==Mesh3DEnum) iomodel->FetchData(3,MeshVertexonbedEnum,MeshVertexonsurfaceEnum,FlowequationBorderFSEnum);
     275                if(iomodel->meshtype!=Mesh2DhorizontalEnum) iomodel->FetchData(3,MeshVertexonbedEnum,MeshVertexonsurfaceEnum,FlowequationBorderFSEnum);
    275276                ::CreateNodes(nodes,iomodel,StressbalanceAnalysisEnum,finiteelement,approximation);
    276277                iomodel->DeleteData(6,MeshVertexonbedEnum,MeshVertexonsurfaceEnum,FlowequationBorderSSAEnum,FlowequationBorderFSEnum,
     
    838839        bool isSSA,isL1L2,isHO,isFS;
    839840        bool conserve_loads = true;
    840         int  newton;
     841        int  newton,meshtype;
    841842
    842843        /* recover parameters:*/
     
    845846        femmodel->parameters->FindParam(&isHO,FlowequationIsHOEnum);
    846847        femmodel->parameters->FindParam(&isFS,FlowequationIsFSEnum);
     848        femmodel->parameters->FindParam(&meshtype,MeshTypeEnum);
    847849        femmodel->parameters->FindParam(&newton,StressbalanceIsnewtonEnum);
    848850
     
    855857                else
    856858                 solutionsequence_nonlinear(femmodel,conserve_loads);
     859
     860                if(meshtype==Mesh2DverticalEnum && isSSA){
     861                        femmodel->parameters->SetParam(VxEnum,InputToExtrudeEnum);
     862                        extrudefrombase_core(femmodel);
     863                        femmodel->parameters->SetParam(VelEnum,InputToExtrudeEnum);
     864                        extrudefrombase_core(femmodel);
     865                }
    857866        }
    858867
Note: See TracChangeset for help on using the changeset viewer.