45 #include <PanzerAdaptersSTK_config.hpp> 65 PANZER_FUNC_TIME_MONITOR(
"panzer::SquareTriMeshFactory::buildMesh()");
71 mesh->initialize(parallelMach);
81 PANZER_FUNC_TIME_MONITOR(
"panzer::SquareTriMeshFactory::buildUncomittedMesh()");
85 machRank_ = stk::parallel_machine_rank(parallelMach);
86 machSize_ = stk::parallel_machine_size(parallelMach);
94 "Cannot build SquareTriMeshFactory, the product of \"X Procs\" and \"Y Procs\"" 95 " must equal the number of processors.");
108 PANZER_FUNC_TIME_MONITOR(
"panzer::SquareTriMeshFactory::completeMeshConstruction()");
134 x0_ = paramList->
get<
double>(
"X0");
135 y0_ = paramList->
get<
double>(
"Y0");
137 xf_ = paramList->
get<
double>(
"Xf");
138 yf_ = paramList->
get<
double>(
"Yf");
159 if(defaultParams == Teuchos::null) {
162 defaultParams->
set<
double>(
"X0",0.0);
163 defaultParams->
set<
double>(
"Y0",0.0);
165 defaultParams->
set<
double>(
"Xf",1.0);
166 defaultParams->
set<
double>(
"Yf",1.0);
168 defaultParams->
set<
int>(
"X Blocks",1);
169 defaultParams->
set<
int>(
"Y Blocks",1);
171 defaultParams->
set<
int>(
"X Procs",-1);
172 defaultParams->
set<
int>(
"Y Procs",1);
174 defaultParams->
set<
int>(
"X Elements",5);
175 defaultParams->
set<
int>(
"Y Elements",5);
178 bcs.
set<
int>(
"Count",0);
181 return defaultParams;
195 typedef shards::Triangle<> TriTopo;
196 const CellTopologyData * ctd = shards::getCellTopologyData<TriTopo>();
197 const CellTopologyData * side_ctd = shards::CellTopology(ctd).getBaseCellTopologyData(1,0);
206 std::stringstream ebPostfix;
207 ebPostfix <<
"-" << bx <<
"_" << by;
227 for(
int xBlock=0;xBlock<
xBlocks_;xBlock++) {
228 for(
int yBlock=0;yBlock<
yBlocks_;yBlock++) {
241 int myXElems_start = sizeAndStartX.first;
242 int myXElems_end = myXElems_start+sizeAndStartX.second;
243 int myYElems_start = sizeAndStartY.first;
244 int myYElems_end = myYElems_start+sizeAndStartY.second;
248 double deltaX = (
xf_-
x0_)/
double(totalXElems);
249 double deltaY = (
yf_-
y0_)/
double(totalYElems);
251 std::vector<double> coord(2,0.0);
254 for(
int nx=myXElems_start;nx<myXElems_end+1;++nx) {
255 coord[0] = double(nx)*deltaX+
x0_;
256 for(
int ny=myYElems_start;ny<myYElems_end+1;++ny) {
257 coord[1] = double(ny)*deltaY+
y0_;
259 mesh.
addNode(ny*(totalXElems+1)+nx+1,coord);
263 std::stringstream blockName;
264 blockName <<
"eblock-" << xBlock <<
"_" << yBlock;
268 for(
int nx=myXElems_start;nx<myXElems_end;++nx) {
269 for(
int ny=myYElems_start;ny<myYElems_end;++ny) {
270 stk::mesh::EntityId gid_a = 2*(totalXElems*ny+nx+1)-1;
271 stk::mesh::EntityId gid_b = gid_a+1;
272 std::vector<stk::mesh::EntityId> nodes(3);
273 stk::mesh::EntityId sw,se,ne,nw;
274 sw = nx+1+ny*(totalXElems+1);
276 ne = se+(totalXElems+1);
295 unsigned int minElements =
nXElems_/size;
296 unsigned int extra =
nXElems_ - minElements*size;
304 nume = minElements+1;
305 start = xProcLoc*(minElements+1);
309 start = extra*(minElements+1)+(xProcLoc-extra)*minElements;
312 return std::make_pair(start+
nXElems_*xBlock,nume);
318 unsigned int minElements =
nYElems_/size;
319 unsigned int extra =
nYElems_ - minElements*size;
327 nume = minElements+1;
328 start = yProcLoc*(minElements+1);
332 start = extra*(minElements+1)+(yProcLoc-extra)*minElements;
335 return std::make_pair(start+
nYElems_*yBlock,nume);
346 stk::mesh::Part * left = mesh.
getSideset(
"left");
347 stk::mesh::Part * right = mesh.
getSideset(
"right");
348 stk::mesh::Part * top = mesh.
getSideset(
"top");
349 stk::mesh::Part * bottom = mesh.
getSideset(
"bottom");
351 std::vector<stk::mesh::Entity> localElmts;
355 std::vector<stk::mesh::Entity>::const_iterator itr;
356 for(itr=localElmts.begin();itr!=localElmts.end();++itr) {
357 stk::mesh::Entity element = (*itr);
360 bool lower = (gid%2 != 0);
361 std::size_t block = lower ? (gid+1)/2 : gid/2;
363 ny = (block-1) / totalXElems;
364 nx = block-ny*totalXElems-1;
369 if(nx+1==totalXElems && lower) {
377 if(nx==0 && !lower) {
396 if(ny+1==totalYElems && !lower) {
417 return Teuchos::tuple(i,j);
stk::mesh::Part * getElementBlockPart(const std::string &name) const
get the block count
Teuchos::Tuple< std::size_t, 2 > procTuple_
Teuchos::RCP< const Teuchos::ParameterList > getValidParameters() const
From ParameterListAcceptor.
T & get(const std::string &name, T def_value)
ParameterList & set(std::string const &name, T const &value, std::string const &docString="", RCP< const ParameterEntryValidator > const &validator=null)
void setParameterList(const Teuchos::RCP< Teuchos::ParameterList > ¶mList)
From ParameterListAcceptor.
#define TEUCHOS_TEST_FOR_EXCEPTION(throw_exception_test, Exception, msg)
void getMyElements(std::vector< stk::mesh::Entity > &elements) const
void addEntityToSideset(stk::mesh::Entity entity, stk::mesh::Part *sideset)
void buildMetaData(stk::ParallelMachine parallelMach, STK_Interface &mesh) const
Teuchos::Tuple< std::size_t, 2 > procRankToProcTuple(std::size_t procRank) const
what is the 2D tuple describe this processor distribution
void initialize(stk::ParallelMachine parallelMach, bool setupIO=true)
stk::mesh::Entity findConnectivityById(stk::mesh::Entity src, stk::mesh::EntityRank tgt_rank, unsigned rel_id) const
void buildBlock(stk::ParallelMachine machRank, int xBlock, int yBlock, STK_Interface &mesh) const
stk::mesh::Part * getSideset(const std::string &name) const
void buildElements(stk::ParallelMachine parallelMach, STK_Interface &mesh) const
~SquareTriMeshFactory()
Destructor.
void addElement(const Teuchos::RCP< ElementDescriptor > &ed, stk::mesh::Part *block)
TEUCHOS_DEPRECATED RCP< T > rcp(T *p, Dealloc_T dealloc, bool owns_mem)
stk::mesh::EntityId elementGlobalId(std::size_t lid) const
SquareTriMeshFactory()
Constructor.
void setMyParamList(const RCP< ParameterList > ¶mList)
bool isInitialized() const
Has initialize been called on this mesh object?
void validateParametersAndSetDefaults(ParameterList const &validParamList, int const depth=1000)
std::pair< int, int > determineYElemSizeAndStart(int yBlock, unsigned int size, unsigned int rank) const
virtual void completeMeshConstruction(STK_Interface &mesh, stk::ParallelMachine parallelMach) const
void addNode(stk::mesh::EntityId gid, const std::vector< double > &coord)
void buildSubcells()
force the mesh to build subcells: edges and faces
std::pair< int, int > determineXElemSizeAndStart(int xBlock, unsigned int size, unsigned int rank) const
void addSideSets(STK_Interface &mesh) const
void addSideset(const std::string &name, const CellTopologyData *ctData)
Teuchos::RCP< STK_Interface > buildMesh(stk::ParallelMachine parallelMach) const
Build the mesh object.
std::vector< Teuchos::RCP< const PeriodicBC_MatcherBase > > periodicBCVec_
void buildLocalElementIDs()
ParameterList & sublist(const std::string &name, bool mustAlreadyExist=false, const std::string &docString="")
unsigned entityOwnerRank(stk::mesh::Entity entity) const
void rebalance(STK_Interface &mesh) const
#define TEUCHOS_ASSERT(assertion_test)
void addElementBlock(const std::string &name, const CellTopologyData *ctData)
virtual Teuchos::RCP< STK_Interface > buildUncommitedMesh(stk::ParallelMachine parallelMach) const
static void parsePeriodicBCList(const Teuchos::RCP< Teuchos::ParameterList > &pl, std::vector< Teuchos::RCP< const PeriodicBC_MatcherBase > > &periodicBC)
void initializeWithDefaults()