quadrature_gm_3d.c

一个用来实现偏微分方程中网格的计算库

// $Id: quadrature_gauss_3D.C 2892 2008-06-25 21:57:54Z jwpeterson $

// The libMesh Finite Element Library.
// Copyright (C) 2002-2007  Benjamin S. Kirk, John W. Peterson
  
// This library is free software; you can redistribute it and/or
// modify it under the terms of the GNU Lesser General Public
// License as published by the Free Software Foundation; either
// version 2.1 of the License, or (at your option) any later version.
  
// This library is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
// Lesser General Public License for more details.
  
// You should have received a copy of the GNU Lesser General Public
// License along with this library; if not, write to the Free Software
// Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA



// Local includes
#include "quadrature_gm.h"



void QGrundmann_Moller::init_3D(const ElemType _type,
				unsigned int p)
{
  // Nearly all GM rules contain negative weights, so if you are not
  // allowing rules with negative weights, we cannot continue!
  if (!allow_rules_with_negative_weights)
    {
      std::cerr << "You requested a Grundmann-Moller rule but\n"
		<< "are not allowing rules with negative weights!\n"
		<< "Either select a different quadrature class or\n"
		<< "set allow_rules_with_negative_weights==true." 
		<< std::endl;
      
      libmesh_error();
    }
  
  switch (_type)
    {
    case TET4:
    case TET10:
      {
	// Untested above _order=23 but should work...
	gm_rule( (_order + 2*p)/2 );
	return;
	
      } // end case TET4, TET10


      
      //---------------------------------------------
      // Unsupported element type
    default:
      {
	std::cerr << "ERROR: Unsupported element type: " << _type << std::endl;
	libmesh_error();
      }
    } // end switch (_type)

  // We must have returned or errored-out by this point.  If not,
  // throw an error now.
  libmesh_error();
  return;
}