00001 // $Id: FEApp_ElementFactory.cpp,v 1.2.2.2 2007/08/14 00:19:05 etphipp Exp $ 00002 // $Source: /space/CVS/Trilinos/packages/sacado/example/FEApp/FEApp_ElementFactory.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_ElementFactory.hpp" 00033 #include "FEApp_LinearElement.hpp" 00034 00035 FEApp::ElementFactory::ElementFactory( 00036 const Teuchos::RCP<Teuchos::ParameterList>& elemParams_) : 00037 elemParams(elemParams_) 00038 { 00039 } 00040 00041 Teuchos::RCP<FEApp::AbstractElement> 00042 FEApp::ElementFactory::create() 00043 { 00044 Teuchos::RCP<FEApp::AbstractElement> strategy; 00045 00046 std::string& method = elemParams->get("Method", "Linear"); 00047 if (method == "Linear") { 00048 strategy = Teuchos::rcp(new FEApp::LinearElement); 00049 } 00050 else { 00051 TEST_FOR_EXCEPTION(true, Teuchos::Exceptions::InvalidParameter, 00052 std::endl << 00053 "Error! Unknown element method " << method << 00054 "!" << std::endl << "Supplied parameter list is " << 00055 std::endl << *elemParams); 00056 } 00057 00058 return strategy; 00059 }
1.4.7