Nektar++
NodalTriElec.cpp
Go to the documentation of this file.
1 ///////////////////////////////////////////////////////////////////////////////
2 //
3 // File NodalTriElec.cpp
4 //
5 // For more information, please see: http://www.nektar.info
6 //
7 // The MIT License
8 //
9 // Copyright (c) 2006 Division of Applied Mathematics, Brown University (USA),
10 // Department of Aeronautics, Imperial College London (UK), and Scientific
11 // Computing and Imaging Institute, University of Utah (USA).
12 //
13 // License for the specific language governing rights and limitations under
14 // Permission is hereby granted, free of charge, to any person obtaining a
15 // copy of this software and associated documentation files (the "Software"),
16 // to deal in the Software without restriction, including without limitation
17 // the rights to use, copy, modify, merge, publish, distribute, sublicense,
18 // and/or sell copies of the Software, and to permit persons to whom the
19 // Software is furnished to do so, subject to the following conditions:
20 //
21 // The above copyright notice and this permission notice shall be included
22 // in all copies or substantial portions of the Software.
23 //
24 // THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
25 // OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
26 // FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
27 // THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
28 // LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
29 // FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
30 // DEALINGS IN THE SOFTWARE.
31 //
32 // Description: 2D Nodal Triangle Fekete Point Definitions
33 //
34 ///////////////////////////////////////////////////////////////////////////////
35 
43 
44 namespace Nektar
45 {
46  namespace LibUtilities
47  {
49  {
50  // Allocate the storage for points
52 
53  int index=0,isum=0;
54  const int offset = 3; //offset to match Datafile
55  NekDouble b,c;
56  unsigned int numPoints = GetNumPoints();
57 
58  // initialize values
59  for(unsigned int i=0; i < numPoints-2; ++i)
60  {
61  index += NodalTriElecNPTS[i];
62  }
63 
64  for(unsigned int i=0; i < NodalTriElecNPTS[numPoints-2]; ++i, ++index)
65  {
66  if(int(NodalTriElecData[index][0]))
67  {
68  b = NodalTriElecData[index][4];
69  c = NodalTriElecData[index][5];
70 
71  m_points[0][isum] = 2.0*b - 1.0;
72  m_points[1][isum] = 2.0*c - 1.0;
73  isum++;
74  continue;
75  }//end symmetry1
76 
77 
78  if(int(NodalTriElecData[index][1]) == 1)
79  {
80  for(unsigned int j=0; j < 3; ++j)
81  {
82  b = NodalTriElecData[index][offset+perm3A_2d[j][1]];
83  c = NodalTriElecData[index][offset+perm3A_2d[j][2]];
84  m_points[0][isum] = 2.0*b - 1.0;
85  m_points[1][isum] = 2.0*c - 1.0;
86  isum++;
87  }//end j
88  continue;
89  }//end symmetry3a
90 
91  if(int(NodalTriElecData[index][1]) == 2)
92  {
93  for(unsigned int j=0; j < 3; ++j)
94  {
95  b = NodalTriElecData[index][offset+perm3B_2d[j][1]];
96  c = NodalTriElecData[index][offset+perm3B_2d[j][2]];
97  m_points[0][isum] = 2.0*b - 1.0;
98  m_points[1][isum] = 2.0*c - 1.0;
99  isum++;
100  }//end j
101  continue;
102  }//end symmetry3b
103 
104 
105  if(int(NodalTriElecData[index][2]))
106  {
107  for(unsigned int j=0; j < 6; ++j)
108  {
109  b = NodalTriElecData[index][offset+perm6_2d[j][1]];
110  c = NodalTriElecData[index][offset+perm6_2d[j][2]];
111  m_points[0][isum] = 2.0*b - 1.0;
112  m_points[1][isum] = 2.0*c - 1.0;
113  isum++;
114  }//end j
115  continue;
116  }//end symmetry6
117  }//end npts
118 
119  // std::cout << "(x y) = (" << ToVector(m_points[0]) << ", " << ToVector(m_points[1]) << ")" << std::endl;
120  // cout << "numPoints = " << numPoints << endl;
121  // cout << "NodalTriElecNPTS[numPoints-2] = " << NodalTriElecNPTS[numPoints-2] << endl;
122  // cout << "isum = " << isum << endl;
123  // for( int i = 0; i <= numPoints-2; ++i ) {
124  // cout << "NodalTriElecNPTS[" << i << "] = " << NodalTriElecNPTS[i] << endl;
125  // }
127 
128  ASSERTL1((static_cast<unsigned int>(isum)==m_pointsKey.GetTotNumPoints()),"sum not equal to npts");
129 
130  //exit(0);
131  }
132 
134  {
135  // Allocate the storage for points
137 
138  typedef DataType T;
139 
140  // Solve the Vandermonde system of integrals for the weight vector
142 
143  m_weights = Array<OneD,T>( w.GetRows(), w.GetPtr() );
144  }
145 
147  {
148  // Allocate the derivative matrix.
150 
153  NekVector<NekDouble> xi = x;
154  NekVector<NekDouble> yi = y;
155 
156  m_derivmatrix[0] = GetXDerivativeMatrix(x,y,xi,yi);
157  m_derivmatrix[1] = GetYDerivativeMatrix(x,y,xi,yi);
158 
159  }
160 
161  // ////////////////////////////////////////
162  // CalculateInterpMatrix()
164  Array<OneD, NekDouble>& interp)
165  {
168  NekVector<NekDouble> xi( xia );
169  NekVector<NekDouble> yi( yia );
170  NekMatrix<NekDouble> interMat = GetInterpolationMatrix(x, y, xi, yi);
171 
172  int rows = xi.GetRows(), cols = GetTotNumPoints();
173  for( int i = 0; i < rows; ++i ) {
174  for( int j = 0; j < cols; ++j ) {
175  interp[j + i*cols] = interMat(i,j);
176  }
177  }
178  }
179 
180 
181  boost::shared_ptr<PointsBaseType> NodalTriElec::Create(const PointsKey &key)
182  {
183  boost::shared_ptr<PointsBaseType> returnval(MemoryManager<NodalTriElec>::AllocateSharedPtr(key));
184  returnval->Initialize();
185  return returnval;
186  }
187 
189  {
190  int i,j;
191  int cnt;
192  int istart,iend;
193 
194  const int nVerts = 3;
195  const int nEdgeInteriorPoints = GetNumPoints()-2;
196  const int nBoundaryPoints = 3*nEdgeInteriorPoints + 3;
197 
198  if(nEdgeInteriorPoints==0)
199  {
200  return;
201  }
202 
203  // group the points of edge 1 together;
204  istart = nVerts;
205  for(i = cnt = istart; i < nBoundaryPoints; i++)
206  {
207  if( fabs(m_points[1][i] + 1.0) < NekConstants::kNekZeroTol)
208  {
209  std::swap(m_points[0][cnt], m_points[0][i]);
210  std::swap(m_points[1][cnt], m_points[1][i]);
211  cnt++;
212  }
213  }
214 
215  // bubble sort edge 1 (counterclockwise numbering)
216  iend = istart + nEdgeInteriorPoints;
217  for(i = istart; i < iend; i++)
218  {
219  for(j = istart+1; j < iend; j++)
220  {
221  if(m_points[0][j] < m_points[0][j-1])
222  {
223  std::swap(m_points[0][j], m_points[0][j-1]);
224  std::swap(m_points[1][j], m_points[1][j-1]);
225  }
226  }
227  }
228 
229  // group the points of edge 2 together;
230  istart = iend;
231  for(i = cnt = istart; i < nBoundaryPoints; i++)
232  {
233  if( fabs(m_points[1][i]+m_points[0][i]) < NekConstants::kNekZeroTol)
234  {
235  std::swap(m_points[0][cnt], m_points[0][i]);
236  std::swap(m_points[1][cnt], m_points[1][i]);
237  cnt++;
238  }
239  }
240 
241  // bubble sort edge 2 (counterclockwise numbering)
242  iend = istart + nEdgeInteriorPoints;
243  for(i = istart; i < iend; i++)
244  {
245  for(j = istart+1; j < iend; j++)
246  {
247  if(m_points[1][j] < m_points[1][j-1])
248  {
249  std::swap(m_points[0][j], m_points[0][j-1]);
250  std::swap(m_points[1][j], m_points[1][j-1]);
251  }
252  }
253  }
254 
255  // group the points of edge 3 together;
256  istart = iend;
257  for(i = cnt = istart; i < nBoundaryPoints; i++)
258  {
259  if( fabs(m_points[0][i]+1.0) < NekConstants::kNekZeroTol)
260  {
261  std::swap(m_points[0][cnt], m_points[0][i]);
262  std::swap(m_points[1][cnt], m_points[1][i]);
263  cnt++;
264  }
265  }
266  // bubble sort edge 3 (counterclockwise numbering)
267  iend = istart + nEdgeInteriorPoints;
268  for(i = istart; i < iend; i++)
269  {
270  for(j = istart+1; j < iend; j++)
271  {
272  if(m_points[1][j] > m_points[1][j-1])
273  {
274  std::swap(m_points[0][j], m_points[0][j-1]);
275  std::swap(m_points[1][j], m_points[1][j-1]);
276  }
277  }
278  }
279  return;
280  }
281  } // end of namespace stdregion
282 } // end of namespace stdregion
283 
284 
static boost::shared_ptr< PointsBaseType > Create(const PointsKey &key)
unsigned int GetTotNumPoints() const
Definition: Points.h:251
Array< OneD, DataType > m_weights
Definition: Points.h:350
static const unsigned int perm3B_2d[3][3]
General purpose memory allocation routines with the ability to allocate from thread specific memory p...
NekVector< NekDouble > MakeQuadratureWeights(const NekVector< NekDouble > &x, const NekVector< NekDouble > &y)
Definition: NodalUtil.cpp:579
static const NekDouble kNekZeroTol
static const unsigned int NodalTriElecNPTS[NodalTriElecAvailable]
void CalculateInterpMatrix(const Array< OneD, const NekDouble > &xia, const Array< OneD, const NekDouble > &yia, Array< OneD, NekDouble > &interp)
unsigned int GetTotNumPoints() const
Definition: Points.h:175
Points< NekDouble >::MatrixSharedPtrType GetXDerivativeMatrix(const NekVector< NekDouble > &x, const NekVector< NekDouble > &y, const NekVector< NekDouble > &xi, const NekVector< NekDouble > &yi)
Definition: NodalUtil.cpp:852
Defines a specification for a set of points.
Definition: Points.h:58
double NekDouble
static const unsigned int perm3A_2d[3][3]
unsigned int GetNumPoints() const
Definition: Points.h:246
unsigned int GetRows() const
Definition: NekVector.cpp:218
NekMatrix< NekDouble > GetInterpolationMatrix(const NekVector< NekDouble > &x, const NekVector< NekDouble > &y, const NekVector< NekDouble > &xi, const NekVector< NekDouble > &yi)
Definition: NodalUtil.cpp:609
Array< OneD, DataType > m_points[3]
Definition: Points.h:349
MatrixSharedPtrType m_derivmatrix[3]
Definition: Points.h:351
static const unsigned int perm6_2d[6][3]
#define ASSERTL1(condition, msg)
Assert Level 1 – Debugging which is used whether in FULLDEBUG or DEBUG compilation mode...
Definition: ErrorUtil.hpp:191
Points< NekDouble >::MatrixSharedPtrType GetYDerivativeMatrix(const NekVector< NekDouble > &x, const NekVector< NekDouble > &y, const NekVector< NekDouble > &xi, const NekVector< NekDouble > &yi)
Definition: NodalUtil.cpp:1303
static const NekDouble NodalTriElecData[][6]
Array< OneD, DataType > & GetPtr()
Definition: NekVector.cpp:230