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_USERDEFFUNCTORELEMENT_H 00032 #define SUNDANCE_USERDEFFUNCTORELEMENT_H 00033 00034 #include "SundanceDefs.hpp" 00035 #include "SundanceMap.hpp" 00036 #include "SundanceMultiSet.hpp" 00037 #include "PlayaExceptions.hpp" 00038 #include "SundanceUserDefFunctor.hpp" 00039 #include "Teuchos_Array.hpp" 00040 00041 00042 00043 00044 namespace Sundance 00045 { 00046 using namespace Sundance; 00047 using namespace Teuchos; 00048 00049 00050 00051 00052 /** 00053 * Scalar-valued element of a vector-valued functor 00054 */ 00055 class UserDefFunctorElement 00056 { 00057 public: 00058 /** ctor */ 00059 UserDefFunctorElement(const RCP<const UserDefFunctor>& functor, 00060 int myIndex); 00061 00062 /** */ 00063 virtual ~UserDefFunctorElement(){;} 00064 00065 /** */ 00066 const std::string& name() const {return master_->name(myIndex());} 00067 00068 /** */ 00069 const std::string& masterName() const {return master_->name();} 00070 00071 /** */ 00072 void evalArgDerivs(int maxOrder, 00073 const Array<double>& in, 00074 Array<double>& outDerivs) const ; 00075 00076 /** */ 00077 void getArgDerivIndices(const Array<int>& orders, 00078 Sundance::Map<MultiSet<int>, int>& varArgDerivs, 00079 Sundance::Map<MultiSet<int>, int>& constArgDerivs) const ; 00080 00081 /** */ 00082 int numArgs() const {return master_->domainDim();} 00083 00084 /** */ 00085 void reset() const {master_->reset();} 00086 00087 /** Return the index of this element into the list-valued 00088 * user defined op */ 00089 int myIndex() const {return myIndex_;} 00090 00091 /** */ 00092 const UserDefFunctor* master() const 00093 {return master_.get();} 00094 00095 /** */ 00096 int maxOrder() const {return master_->maxOrder();} 00097 00098 00099 private: 00100 const RCP<const UserDefFunctor> master_; 00101 const int myIndex_; 00102 }; 00103 00104 00105 } 00106 00107 00108 #endif