extrudefromtop_core.cpp

Go to the documentation of this file.

 
#include "./cores.h"
#include "../toolkits/toolkits.h"
#include "../classes/classes.h"
#include "../shared/shared.h"
#include "../solutionsequences/solutionsequences.h"
#include "../modules/modules.h"
 
void extrudefromtop_core(FemModel* femmodel){
 
   /*Intermediaries*/
   int elementtype,domaintype;
 
   if(VerboseSolution()) _printf0_("   extruding solution from top...\n");
 
   /*Get parameters*/
   femmodel->parameters->FindParam(&domaintype,DomainTypeEnum);
   femmodel->parameters->FindParam(&elementtype,MeshElementtypeEnum);
 
   /*If this is a 2D horizontal domain, return (no need to extrude)*/
   if(domaintype==Domain2DhorizontalEnum) return;
 
   /*Special method for Penta, otherwise call solution sequence*/
   if(elementtype==PentaEnum){
      int inputenum; femmodel->parameters->FindParam(&inputenum,InputToExtrudeEnum);
      InputExtrudex(femmodel,inputenum,+1);
   }
   else{
      /*Call on core computations: */
      femmodel->SetCurrentConfiguration(ExtrudeFromTopAnalysisEnum);
      femmodel->UpdateConstraintsExtrudeFromTopx();
      solutionsequence_linear(femmodel);
   }
}