FEApp_HeatNonlinearSourcePDE.hpp

Go to the documentation of this file.

// $Id: FEApp_HeatNonlinearSourcePDE.hpp,v 1.5 2008/08/01 22:57:12 etphipp Exp $ 
// $Source: /space/CVS/Trilinos/packages/sacado/example/FEApp/FEApp_HeatNonlinearSourcePDE.hpp,v $ 
// @HEADER
// ***********************************************************************
// 
//                           Sacado Package
//                 Copyright (2006) Sandia Corporation
// 
// Under the terms of Contract DE-AC04-94AL85000 with Sandia Corporation,
// the U.S. Government retains certain rights in this software.
// 
// 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
// Questions? Contact David M. Gay (dmgay@sandia.gov) or Eric T. Phipps
// (etphipp@sandia.gov).
// 
// ***********************************************************************
// @HEADER

#ifndef FEAPP_HEATNONLINEARSOURCEPDE_HPP
#define FEAPP_HEATNONLINEARSOURCEPDE_HPP

#include "Teuchos_RCP.hpp"

#include "FEApp_AbstractPDE.hpp"
#include "FEApp_FunctionFactory.hpp"
#include "FEApp_SourceFunctionFactory.hpp"
#include "Sacado_ScalarParameterLibrary.hpp"

namespace FEApp {

  template <typename ScalarT>
  class HeatNonlinearSourcePDE : public FEApp::AbstractPDE<ScalarT> {
  public:
  
    HeatNonlinearSourcePDE(const Teuchos::RCP< const FEApp::AbstractFunction<ScalarT> >& mat_func,
         const Teuchos::RCP< const FEApp::AbstractSourceFunction<ScalarT> >& src_func);

    virtual ~HeatNonlinearSourcePDE();

    virtual unsigned int numEquations() const;

    virtual void init(unsigned int numQuadPoints, unsigned int numNodes);

    virtual void
    evaluateElementResidual(const FEApp::AbstractQuadrature& quadRule,
          const FEApp::AbstractElement& element,
          const std::vector<ScalarT>* dot,
          const std::vector<ScalarT>& solution,
          std::vector<ScalarT>& residual);

  private:

    HeatNonlinearSourcePDE(const HeatNonlinearSourcePDE&);

    HeatNonlinearSourcePDE& operator=(const HeatNonlinearSourcePDE&);

  protected:

    Teuchos::RCP< const FEApp::AbstractFunction<ScalarT> > mat;
    
    Teuchos::RCP< const FEApp::AbstractSourceFunction<ScalarT> > source;

    unsigned int num_qp;
    
    unsigned int num_nodes;

    std::vector< std::vector<double> > phi;

    std::vector< std::vector<double> > dphi;

    std::vector<double> jac;

    std::vector<ScalarT> u;

    std::vector<ScalarT> du;

    std::vector<ScalarT> udot;

    std::vector<ScalarT> a;

    std::vector<ScalarT> f;

  };

  class HeatNonlinearSourcePDE_TemplateBuilder {
  public:
    HeatNonlinearSourcePDE_TemplateBuilder(
    const Teuchos::RCP<Teuchos::ParameterList>& params_,
          const Teuchos::RCP<Sacado::ScalarParameterLibrary>& paramLib) :
      mat_params(Teuchos::rcp(&(params_->sublist("Material Function")),false)),
      src_params(Teuchos::rcp(&(params_->sublist("Source Function")),false)),
      pl(paramLib) {}
    template <typename T>
    Teuchos::RCP<FEApp::AbstractPDE_NTBase> build() const {
      FEApp::FunctionFactory<T> matFactory(mat_params, pl);
      Teuchos::RCP< FEApp::AbstractFunction<T> > mat =
  matFactory.create();
      FEApp::SourceFunctionFactory<T> srcFactory(src_params, pl);
      Teuchos::RCP< FEApp::AbstractSourceFunction<T> > source =
  srcFactory.create();
      return Teuchos::rcp( new FEApp::HeatNonlinearSourcePDE<T>(mat, source));
    }
  protected:
    Teuchos::RCP<Teuchos::ParameterList> mat_params;
    Teuchos::RCP<Teuchos::ParameterList> src_params;
    Teuchos::RCP<Sacado::ScalarParameterLibrary> pl;
  };

}

// Include implementation
#ifndef SACADO_ETI
#include "FEApp_HeatNonlinearSourcePDEImpl.hpp"
#endif 

#endif // FEAPP_HEATNONLINERASOURCEPDE_HPP

---