00001 
00002 
00003 
00004 
00005 
00006 
00007 
00008 
00009 
00010 
00011 
00012 
00013 
00014 
00015 
00016 
00017 
00018 
00019 
00020 
00021 
00022 
00023 
00024 
00025 
00026 
00027 
00028 
00029 
00030 
00031 #include "SundanceUserDefFunctor.hpp"
00032 #include "SundanceEvalManager.hpp"
00033 #include "SundanceEvalVector.hpp"
00034 #include "PlayaTabs.hpp"
00035 #include "SundanceOut.hpp"
00036 
00037 using namespace Sundance;
00038 using namespace Sundance;
00039 
00040 using namespace Sundance;
00041 using namespace Teuchos;
00042 
00043 
00044 UserDefFunctor::UserDefFunctor(const std::string& name, 
00045                                int domainDim, 
00046                                int rangeDim)
00047   :  name_(name), 
00048      elemNames_(), 
00049      domainDim_(domainDim), 
00050      rangeDim_(rangeDim)
00051 {
00052   TEUCHOS_TEST_FOR_EXCEPT(domainDim_ <= 0);
00053   TEUCHOS_TEST_FOR_EXCEPT(rangeDim_ <= 0);
00054 
00055   elemNames_.resize(rangeDim_);
00056 
00057   if (rangeDim_==1) 
00058     {
00059       elemNames_[0] = name_;
00060     }
00061   else
00062     {
00063       for (int i=0; i<rangeDim_; i++)
00064         {
00065           elemNames_[i] = name_ + "[" + Teuchos::toString(i) + "]";
00066         }
00067     }
00068 }
00069 
00070 
00071 
00072 
00073 
00074 void UserDefFunctor::eval0(const Array<double>& in, double* out) const
00075 {
00076   TEUCHOS_TEST_FOR_EXCEPTION(true, std::runtime_error,
00077                      "eval0() function not supported for functor " << name_);
00078 }
00079 
00080 void UserDefFunctor::eval1(const Array<double>& in, double* out, double* outDerivs) const
00081 {
00082   TEUCHOS_TEST_FOR_EXCEPTION(true, std::runtime_error,
00083                      "eval1() function not supported for functor " << name_);
00084 }
00085