AbstractLinAlgPack_MA28CommonBlockEncap.cpp

00001 // @HEADER
00002 // ***********************************************************************
00003 // 
00004 // Moocho: Multi-functional Object-Oriented arCHitecture for Optimization
00005 //                  Copyright (2003) Sandia Corporation
00006 // 
00007 // Under terms of Contract DE-AC04-94AL85000, there is a non-exclusive
00008 // license for use of this work by or on behalf of the U.S. Government.
00009 // 
00010 // This library is free software; you can redistribute it and/or modify
00011 // it under the terms of the GNU Lesser General Public License as
00012 // published by the Free Software Foundation; either version 2.1 of the
00013 // License, or (at your option) any later version.
00014 //  
00015 // This library is distributed in the hope that it will be useful, but
00016 // WITHOUT ANY WARRANTY; without even the implied warranty of
00017 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
00018 // Lesser General Public License for more details.
00019 //  
00020 // You should have received a copy of the GNU Lesser General Public
00021 // License along with this library; if not, write to the Free Software
00022 // Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
00023 // USA
00024 // Questions? Contact Roscoe A. Bartlett (rabartl@sandia.gov) 
00025 // 
00026 // ***********************************************************************
00027 // @HEADER
00028 
00029 #include "Moocho_ConfigDefs.hpp"
00030 
00031 
00032 #ifdef HAVE_MOOCHO_MA28
00033 
00034 
00035 #include "AbstractLinAlgPack_MA28CommonBlockEncap.hpp"
00036 
00037 using std::cout;
00038 using std::endl;
00039 
00040 // /////////////////////////////////////////////////////////////////////////////
00041 // MA28CommonBlockReferences
00042 
00043 MA28_Cpp::MA28CommonBlockReferences& MA28_Cpp::MA28CommonBlockReferences::operator=(
00044   const MA28CommonBlockStorage& ma28cb)
00045 {
00046   ma28ed_ = ma28cb.ma28ed_;
00047   ma28fd_ = ma28cb.ma28fd_;
00048   ma28gd_ = ma28cb.ma28gd_;
00049   ma28hd_ = ma28cb.ma28hd_;
00050   ma30ed_ = ma28cb.ma30ed_;
00051   ma30fd_ = ma28cb.ma30fd_;
00052   ma30gd_ = ma28cb.ma30gd_;
00053   ma30hd_ = ma28cb.ma30hd_;
00054   ma30id_ = ma28cb.ma30id_;
00055   mc23bd_ = ma28cb.mc23bd_;
00056   return *this;
00057 }
00058 
00059 
00060 void MA28_Cpp::MA28CommonBlockReferences::dump_values(std::ostream& o) {
00061   o   << "ma28ed.lp = "   << ma28ed_.lp   << endl
00062       << "ma28ed.mp = "   << ma28ed_.mp   << endl
00063       << "ma28ed.lblock = " << ma28ed_.lblock << endl
00064       << "ma28ed.grow = "   << ma28ed_.grow   << endl
00065       << "ma28fd.eps = "    << ma28fd_.eps    << endl
00066       << "ma28fd.rmin = "   << ma28fd_.rmin   << endl
00067       << "ma28fd.resid = "  << ma28fd_.resid  << endl
00068       << "ma28fd.irncp = "  << ma28fd_.irncp  << endl
00069       << "ma28fd.icncp = "  << ma28fd_.icncp  << endl
00070       << "ma28fd.minirn = " << ma28fd_.minirn << endl
00071       << "ma28fd.minicn = " << ma28fd_.minicn << endl
00072       << "ma28fd.abort1 = " << ma28fd_.abort1 << endl
00073       << "ma28fd.abort2 = " << ma28fd_.abort2 << endl
00074       << "ma28gd.idisp[0] = " << ma28gd_.idisp[0] << endl
00075       << "ma28gd.idisp[1] = " << ma28gd_.idisp[1] << endl
00076       << "ma28hd.tol = "    << ma28hd_.tol    << endl
00077       << "ma28hd.themax = " << ma28hd_.themax << endl
00078       << "ma28hd.big = "    << ma28hd_.big    << endl
00079       << "ma28hd.dxmax = "  << ma28hd_.dxmax  << endl
00080       << "ma28hd.errmax = " << ma28hd_.errmax << endl
00081       << "ma28hd.dres = "   << ma28hd_.dres   << endl
00082       << "ma28hd.cgce = "   << ma28hd_.cgce   << endl
00083       << "ma28hd.ndrop = "  << ma28hd_.ndrop  << endl
00084       << "ma28hd.maxit = "  << ma28hd_.maxit  << endl
00085       << "ma28hd.noiter = " << ma28hd_.noiter << endl
00086       << "ma28hd.nsrch = "  << ma28hd_.nsrch  << endl
00087       << "ma28hd.istart = " << ma28hd_.istart << endl
00088       << "ma28hd.lbig = "   << ma28hd_.lbig   << endl
00089       << "ma30ed.lp = "   << ma30ed_.lp   << endl
00090       << "ma30ed.abort1 = " << ma30ed_.abort1 << endl
00091       << "ma30ed.abort2 = " << ma30ed_.abort2 << endl
00092       << "ma30ed.abort3 = " << ma30ed_.abort3 << endl
00093       << "ma30fd.irncp = "  << ma30fd_.irncp  << endl
00094       << "ma30fd.icncp = "  << ma30fd_.icncp  << endl
00095       << "ma30fd.irank = "  << ma30fd_.irank  << endl
00096       << "ma30fd.minirn = " << ma30fd_.minirn << endl
00097       << "ma30fd.minicn = " << ma30fd_.minicn << endl
00098       << "ma30gd.eps = "    << ma30gd_.eps    << endl
00099       << "ma30gd.rmin = "   << ma30gd_.rmin   << endl
00100       << "ma30hd.resid = "  << ma30hd_.resid  << endl
00101       << "ma30id.tol = "    << ma30id_.tol    << endl
00102       << "ma30id.big = "    << ma30id_.big    << endl
00103       << "ma30id.ndrop = "  << ma30id_.ndrop  << endl
00104       << "ma30id.nsrch = "  << ma30id_.nsrch  << endl
00105       << "ma30id.lbig = "   << ma30id_.lbig   << endl;
00106 }
00107 
00108 // /////////////////////////////////////////////////////////////////////////////
00109 // MA28CommonBlockStorage
00110 
00111 MA28_Cpp::MA28CommonBlockStorage& MA28_Cpp::MA28CommonBlockStorage::operator=(
00112   const MA28CommonBlockReferences& ma28cb)
00113 {
00114   ma28ed_ = ma28cb.ma28ed_;
00115   ma28fd_ = ma28cb.ma28fd_;
00116   ma28gd_ = ma28cb.ma28gd_;
00117   ma28hd_ = ma28cb.ma28hd_;
00118   ma30ed_ = ma28cb.ma30ed_;
00119   ma30fd_ = ma28cb.ma30fd_;
00120   ma30gd_ = ma28cb.ma30gd_;
00121   ma30hd_ = ma28cb.ma30hd_;
00122   ma30id_ = ma28cb.ma30id_;
00123   mc23bd_ = ma28cb.mc23bd_;
00124   return *this;
00125 }
00126 
00127 void MA28_Cpp::MA28CommonBlockStorage::dump_values(std::ostream& o) {
00128   o   << "ma28ed.lp = "   << ma28ed_.lp   << endl
00129       << "ma28ed.mp = "   << ma28ed_.mp   << endl
00130       << "ma28ed.lblock = " << ma28ed_.lblock << endl
00131       << "ma28ed.grow = "   << ma28ed_.grow   << endl
00132       << "ma28fd.eps = "    << ma28fd_.eps    << endl
00133       << "ma28fd.rmin = "   << ma28fd_.rmin   << endl
00134       << "ma28fd.resid = "  << ma28fd_.resid  << endl
00135       << "ma28fd.irncp = "  << ma28fd_.irncp  << endl
00136       << "ma28fd.icncp = "  << ma28fd_.icncp  << endl
00137       << "ma28fd.minirn = " << ma28fd_.minirn << endl
00138       << "ma28fd.minicn = " << ma28fd_.minicn << endl
00139       << "ma28fd.abort1 = " << ma28fd_.abort1 << endl
00140       << "ma28fd.abort2 = " << ma28fd_.abort2 << endl
00141       << "ma28gd.idisp[0] = " << ma28gd_.idisp[0] << endl
00142       << "ma28gd.idisp[1] = " << ma28gd_.idisp[1] << endl
00143       << "ma28hd.tol = "    << ma28hd_.tol    << endl
00144       << "ma28hd.themax = " << ma28hd_.themax << endl
00145       << "ma28hd.big = "    << ma28hd_.big    << endl
00146       << "ma28hd.dxmax = "  << ma28hd_.dxmax  << endl
00147       << "ma28hd.errmax = " << ma28hd_.errmax << endl
00148       << "ma28hd.dres = "   << ma28hd_.dres   << endl
00149       << "ma28hd.cgce = "   << ma28hd_.cgce   << endl
00150       << "ma28hd.ndrop = "  << ma28hd_.ndrop  << endl
00151       << "ma28hd.maxit = "  << ma28hd_.maxit  << endl
00152       << "ma28hd.noiter = " << ma28hd_.noiter << endl
00153       << "ma28hd.nsrch = "  << ma28hd_.nsrch  << endl
00154       << "ma28hd.istart = " << ma28hd_.istart << endl
00155       << "ma28hd.lbig = "   << ma28hd_.lbig   << endl
00156       << "ma30ed.lp = "   << ma30ed_.lp   << endl
00157       << "ma30ed.abort1 = " << ma30ed_.abort1 << endl
00158       << "ma30ed.abort2 = " << ma30ed_.abort2 << endl
00159       << "ma30ed.abort3 = " << ma30ed_.abort3 << endl
00160       << "ma30fd.irncp = "  << ma30fd_.irncp  << endl
00161       << "ma30fd.icncp = "  << ma30fd_.icncp  << endl
00162       << "ma30fd.irank = "  << ma30fd_.irank  << endl
00163       << "ma30fd.minirn = " << ma30fd_.minirn << endl
00164       << "ma30fd.minicn = " << ma30fd_.minicn << endl
00165       << "ma30gd.eps = "    << ma30gd_.eps    << endl
00166       << "ma30gd.rmin = "   << ma30gd_.rmin   << endl
00167       << "ma30hd.resid = "  << ma30hd_.resid  << endl
00168       << "ma30id.tol = "    << ma30id_.tol    << endl
00169       << "ma30id.big = "    << ma30id_.big    << endl
00170       << "ma30id.ndrop = "  << ma30id_.ndrop  << endl
00171       << "ma30id.nsrch = "  << ma30id_.nsrch  << endl
00172       << "ma30id.lbig = "   << ma30id_.lbig   << endl;
00173 }
00174 
00175 
00176 #endif // HAVE_MOOCHO_MA28
 All Classes Namespaces Files Functions Variables Typedefs Enumerations Enumerator Friends
Generated on Wed Apr 13 10:09:15 2011 for AbstractLinAlgPack: C++ Interfaces For Vectors, Matrices And Related Linear Algebra Objects by  doxygen 1.6.3