00001 // @HEADER 00002 // ************************************************************************ 00003 // 00004 // Phalanx: A Partial Differential Equation Field Evaluation 00005 // Kernel for Flexible Management of Complex Dependency Chains 00006 // Copyright (2008) Sandia Corporation 00007 // 00008 // Under the terms of Contract DE-AC04-94AL85000 with Sandia Corporation, 00009 // the U.S. Government retains certain rights in this software. 00010 // 00011 // This library is free software; you can redistribute it and/or modify 00012 // it under the terms of the GNU Lesser General Public License as 00013 // published by the Free Software Foundation; either version 2.1 of the 00014 // License, or (at your option) any later version. 00015 // 00016 // This library is distributed in the hope that it will be useful, but 00017 // WITHOUT ANY WARRANTY; without even the implied warranty of 00018 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU 00019 // Lesser General Public License for more details. 00020 // 00021 // You should have received a copy of the GNU Lesser General Public 00022 // License along with this library; if not, write to the Free Software 00023 // Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 00024 // USA 00025 // 00026 // Questions? Contact Roger Pawlowski (rppawlo@sandia.gov), Sandia 00027 // National Laboratories. 00028 // 00029 // ************************************************************************ 00030 // @HEADER 00031 00032 //********************************************************************** 00033 template<typename EvalT, typename Traits> 00034 Constant<EvalT, Traits>::Constant(Teuchos::ParameterList& p) : 00035 value( p.get<double>("Value") ), 00036 constant( p.get<std::string>("Name"), 00037 p.get< Teuchos::RCP<PHX::DataLayout> >("Data Layout") ) 00038 { 00039 this->addEvaluatedField(constant); 00040 00041 std::string n = "Constant Provider: " + constant.fieldTag().name(); 00042 this->setName(n); 00043 } 00044 00045 //********************************************************************** 00046 template<typename EvalT, typename Traits> 00047 void Constant<EvalT, Traits>:: 00048 postRegistrationSetup(PHX::FieldManager<Traits>& vm) 00049 { 00050 using namespace PHX; 00051 this->utils.setFieldData(constant,vm); 00052 00053 for (std::size_t i = 0; i < static_cast<std::size_t>(constant.size()); ++i) 00054 constant[i] = value; 00055 } 00056 00057 //********************************************************************** 00058 template<typename EvalT, typename Traits> 00059 void Constant<EvalT, Traits>::evaluateFields(typename Traits::EvalData d) 00060 { } 00061 00062 //**********************************************************************