00001 /* @HEADER@ */ 00002 // ************************************************************************ 00003 // 00004 // Sundance 00005 // Copyright (2005) Sandia Corporation 00006 // 00007 // Copyright (year first published) Sandia Corporation. Under the terms 00008 // of Contract DE-AC04-94AL85000 with Sandia Corporation, the U.S. Government 00009 // 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 // Questions? Contact Kevin Long (krlong@sandia.gov), 00026 // Sandia National Laboratories, Livermore, California, USA 00027 // 00028 // ************************************************************************ 00029 /* @HEADER@ */ 00030 00031 #ifndef SUNDANCE_SUBTYPEEVALUATOR_H 00032 #define SUNDANCE_SUBTYPEEVALUATOR_H 00033 00034 #include "SundanceDefs.hpp" 00035 #include "SundanceEvaluator.hpp" 00036 #include "SundanceEvaluatableExpr.hpp" 00037 00038 namespace Sundance 00039 { 00040 class EvalContext; 00041 00042 00043 /** 00044 * 00045 */ 00046 template <class ExprType> class SubtypeEvaluator : public Evaluator 00047 { 00048 public: 00049 /** */ 00050 SubtypeEvaluator(const ExprType* expr, 00051 const EvalContext& context) 00052 : Evaluator(), 00053 expr_(expr), 00054 sparsity_(expr_->sparsitySuperset(context)) 00055 { 00056 this->setVerb(Evaluator::classVerbosity()); 00057 } 00058 00059 /** */ 00060 virtual ~SubtypeEvaluator(){;} 00061 00062 00063 00064 /** */ 00065 const RCP<SparsitySuperset>& sparsity() const {return sparsity_;} 00066 00067 protected: 00068 /** */ 00069 const ExprType* expr() const {return expr_;} 00070 00071 /** */ 00072 const MultipleDeriv& vectorResultDeriv(int iVec) const 00073 { 00074 return this->sparsity()->deriv(vectorIndices()[iVec]); 00075 } 00076 00077 /** */ 00078 const MultipleDeriv& constantResultDeriv(int iConst) const 00079 { 00080 return this->sparsity()->deriv(constantIndices()[iConst]); 00081 } 00082 00083 private: 00084 const ExprType* expr_; 00085 00086 RCP<SparsitySuperset> sparsity_; 00087 }; 00088 00089 } 00090 00091 00092 00093 00094 #endif