Sacado_ScalarParameterLibrary.cpp

Go to the documentation of this file.
00001 // $Id: Sacado_ScalarParameterLibrary.cpp,v 1.2 2007/06/23 00:46:31 etphipp Exp $ 
00002 // $Source: /space/CVS/Trilinos/packages/sacado/src/parameter/Sacado_ScalarParameterLibrary.cpp,v $ 
00003 // @HEADER
00004 // ***********************************************************************
00005 // 
00006 //                           Sacado Package
00007 //                 Copyright (2006) Sandia Corporation
00008 // 
00009 // Under the terms of Contract DE-AC04-94AL85000 with Sandia Corporation,
00010 // the U.S. Government retains certain rights in this software.
00011 // 
00012 // This library is free software; you can redistribute it and/or modify
00013 // it under the terms of the GNU Lesser General Public License as
00014 // published by the Free Software Foundation; either version 2.1 of the
00015 // License, or (at your option) any later version.
00016 //  
00017 // This library is distributed in the hope that it will be useful, but
00018 // WITHOUT ANY WARRANTY; without even the implied warranty of
00019 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
00020 // Lesser General Public License for more details.
00021 //  
00022 // You should have received a copy of the GNU Lesser General Public
00023 // License along with this library; if not, write to the Free Software
00024 // Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
00025 // USA
00026 // Questions? Contact David M. Gay (dmgay@sandia.gov) or Eric T. Phipps
00027 // (etphipp@sandia.gov).
00028 // 
00029 // ***********************************************************************
00030 // @HEADER
00031 
00032 #include "Sacado_ScalarParameterLibrary.hpp"
00033 
00034 void
00035 Sacado::ScalarParameterLibrary::
00036 setRealValueForAllTypes(const std::string& name, double value)
00037 {
00038   FamilyMap::iterator it = library.find(name);
00039   TEST_FOR_EXCEPTION(
00040      it == library.end(), 
00041      std::logic_error,
00042      std::string("Sacado::ScalararameterLibrary::setRealValueForAllTypes():  ")
00043      + "Invalid parameter family " + name);
00044   (*it).second->setRealValueForAllTypes(value);
00045 }
00046 
00047 void
00048 Sacado::ScalarParameterLibrary::
00049 fillVector(const Teuchos::Array<std::string>& names,
00050      Sacado::ScalarParameterVector& pv)
00051 {
00052   FamilyMap::iterator it;
00053 
00054   // Fill in parameters
00055   for (unsigned int i=0; i<names.size(); i++) {
00056     it = library.find(names[i]);
00057     TEST_FOR_EXCEPTION(
00058        it == library.end(), 
00059        std::logic_error,
00060        std::string("Sacado::ParameterLibraryBase::fillVector():  ")
00061        + "Invalid parameter family " + names[i]);
00062     pv.addParam((*it).second, 0.0);
00063     pv[i].baseValue = (*it).second->getValue<double>();
00064   }
00065 }

Generated on Wed May 12 21:59:05 2010 for Sacado Package Browser (Single Doxygen Collection) by  doxygen 1.4.7