1 // Copyright(C) 1999-2020 National Technology & Engineering Solutions
2 // of Sandia, LLC (NTESS).  Under the terms of Contract DE-NA0003525 with
3 // NTESS, the U.S. Government retains certain rights in this software.
4 //
5 // See packages/seacas/LICENSE for details
6 
7 //------------------------------------------------------------------------
8 // Define a variable type for storage of this elements connectivity
9 #include "Ioss_CodeTypes.h"           // for IntVector
10 #include "Ioss_ElementTopology.h"     // for ElementTopology
11 #include <Ioss_ElementVariableType.h> // for ElementVariableType
12 #include <Ioss_Quad8.h>
13 #include <cassert> // for assert
14 #include <cstddef> // for nullptr
15 
16 namespace Ioss {
17   const char *Quad8::name = "quad8";
18   class St_Quad8 : public ElementVariableType
19   {
20   public:
factory()21     static void factory() { static St_Quad8 registerThis; }
22 
23   protected:
St_Quad8()24     St_Quad8() : ElementVariableType(Ioss::Quad8::name, 8) {}
25   };
26 } // namespace Ioss
27 // ========================================================================
28 Ioss::Quad8 Ioss::Quad8::instance_;
29 
30 namespace {
31   struct Constants
32   {
33     static const int nnode     = 8;
34     static const int nedge     = 4;
35     static const int nedgenode = 3;
36     static const int nface     = 0;
37     static int       edge_node_order[nedge][nedgenode];
38   };
39 
40   // Edge numbers are zero-based [0..number_edges)
41   int Constants::edge_node_order[nedge][nedgenode] = // [edge][edge_node]
42       {{0, 1, 4}, {1, 2, 5}, {2, 3, 6}, {3, 0, 7}};
43 } // namespace
44 
factory()45 void Ioss::Quad8::factory()
46 {
47   static Ioss::Quad8 registerThis;
48   Ioss::St_Quad8::factory();
49 }
50 
Quad8()51 Ioss::Quad8::Quad8() : Ioss::ElementTopology(Ioss::Quad8::name, "Quadrilateral_8")
52 {
53   Ioss::ElementTopology::alias(Ioss::Quad8::name, "Solid_Quad_8_2D");
54   Ioss::ElementTopology::alias(Ioss::Quad8::name, "QUADRILATERAL_8_2D");
55   Ioss::ElementTopology::alias(Ioss::Quad8::name, "Face_Quad_8_3D");
56   Ioss::ElementTopology::alias(Ioss::Quad8::name, "quadface8");
57 }
58 
59 Ioss::Quad8::~Quad8() = default;
60 
parametric_dimension()61 int Ioss::Quad8::parametric_dimension() const { return 2; }
spatial_dimension()62 int Ioss::Quad8::spatial_dimension() const { return 2; }
order()63 int Ioss::Quad8::order() const { return 2; }
64 
number_corner_nodes()65 int Ioss::Quad8::number_corner_nodes() const { return 4; }
number_nodes()66 int Ioss::Quad8::number_nodes() const { return Constants::nnode; }
number_edges()67 int Ioss::Quad8::number_edges() const { return Constants::nedge; }
number_faces()68 int Ioss::Quad8::number_faces() const { return Constants::nface; }
69 
number_nodes_edge(int)70 int Ioss::Quad8::number_nodes_edge(int /* edge */) const { return Constants::nedgenode; }
71 
number_nodes_face(int)72 int Ioss::Quad8::number_nodes_face(int /* face */) const { return 0; }
number_edges_face(int)73 int Ioss::Quad8::number_edges_face(int /* face */) const { return 0; }
74 
edge_connectivity(int edge_number)75 Ioss::IntVector Ioss::Quad8::edge_connectivity(int edge_number) const
76 {
77   assert(edge_number > 0 && edge_number <= number_edges());
78   Ioss::IntVector connectivity(Constants::nedgenode);
79   assert(edge_number > 0 && edge_number <= Constants::nedge);
80 
81   for (int i = 0; i < Constants::nedgenode; i++) {
82     connectivity[i] = Constants::edge_node_order[edge_number - 1][i];
83   }
84 
85   return connectivity;
86 }
87 
face_connectivity(int)88 Ioss::IntVector Ioss::Quad8::face_connectivity(int /* face_number */) const
89 {
90   Ioss::IntVector connectivity;
91   return connectivity;
92 }
93 
element_connectivity()94 Ioss::IntVector Ioss::Quad8::element_connectivity() const
95 {
96   Ioss::IntVector connectivity(number_nodes());
97   for (int i = 0; i < number_nodes(); i++) {
98     connectivity[i] = i;
99   }
100   return connectivity;
101 }
102 
face_type(int)103 Ioss::ElementTopology *Ioss::Quad8::face_type(int /* face_number */) const
104 {
105   return (Ioss::ElementTopology *)nullptr;
106 }
107 
edge_type(int edge_number)108 Ioss::ElementTopology *Ioss::Quad8::edge_type(int edge_number) const
109 {
110   (void) edge_number;
111   assert(edge_number >= 0 && edge_number <= number_edges());
112   return Ioss::ElementTopology::factory("edge3");
113 }
114