00001 // $Id: FEApp_QuadratureFactory.cpp,v 1.3 2007/07/24 00:08:04 etphipp Exp $ 00002 // $Source: /space/CVS/Trilinos/packages/sacado/example/FEApp/FEApp_QuadratureFactory.cpp,v $ 00003 // @HEADER 00004 // *********************************************************************** 00005 // 00006 // Sacado Package 00007 // Copyright (2006) Sandia Corporation 00008 // 00009 // Under the terms of Contract DE-AC04-94AL85000 with Sandia Corporation, 00010 // the U.S. Government retains certain rights in this software. 00011 // 00012 // This library is free software; you can redistribute it and/or modify 00013 // it under the terms of the GNU Lesser General Public License as 00014 // published by the Free Software Foundation; either version 2.1 of the 00015 // License, or (at your option) any later version. 00016 // 00017 // This library is distributed in the hope that it will be useful, but 00018 // WITHOUT ANY WARRANTY; without even the implied warranty of 00019 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU 00020 // Lesser General Public License for more details. 00021 // 00022 // You should have received a copy of the GNU Lesser General Public 00023 // License along with this library; if not, write to the Free Software 00024 // Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 00025 // USA 00026 // Questions? Contact David M. Gay (dmgay@sandia.gov) or Eric T. Phipps 00027 // (etphipp@sandia.gov). 00028 // 00029 // *********************************************************************** 00030 // @HEADER 00031 #include "Teuchos_TestForException.hpp" 00032 #include "FEApp_QuadratureFactory.hpp" 00033 #include "FEApp_GaussianQuadrature2.hpp" 00034 00035 FEApp::QuadratureFactory::QuadratureFactory( 00036 const Teuchos::RCP<Teuchos::ParameterList>& quadParams_) : 00037 quadParams(quadParams_) 00038 { 00039 } 00040 00041 Teuchos::RCP<FEApp::AbstractQuadrature> 00042 FEApp::QuadratureFactory::create() 00043 { 00044 Teuchos::RCP<FEApp::AbstractQuadrature> strategy; 00045 00046 std::string& method = quadParams->get("Method", "Gaussian"); 00047 if (method == "Gaussian") { 00048 int num_points = quadParams->get("Num Points", 2); 00049 00050 if (num_points == 2) { 00051 strategy = Teuchos::rcp(new FEApp::GaussianQuadrature2); 00052 } 00053 else { 00054 TEST_FOR_EXCEPTION(true, Teuchos::Exceptions::InvalidParameter, 00055 std::endl << 00056 "Error! Number of quadrature points = " << 00057 num_points << 00058 " is not supported for Gaussian quadrature!" << 00059 std::endl << "Supplied parameter list is " << 00060 std::endl << *quadParams); 00061 } 00062 } 00063 else { 00064 TEST_FOR_EXCEPTION(true, Teuchos::Exceptions::InvalidParameter, 00065 std::endl << 00066 "Error! Unknown quadrature method " << method << 00067 "!" << std::endl << "Supplied parameter list is " << 00068 std::endl << *quadParams); 00069 } 00070 00071 return strategy; 00072 }
1.4.7