00001 // $Id: NOX_Petsc_SharedJacobian.C,v 1.5 2006/08/22 00:01:48 rppawlo Exp $ 00002 // $Source: /space/CVS/Trilinos/packages/nox/src-petsc/NOX_Petsc_SharedJacobian.C,v $ 00003 00004 //@HEADER 00005 // ************************************************************************ 00006 // 00007 // NOX: An Object-Oriented Nonlinear Solver Package 00008 // Copyright (2002) Sandia Corporation 00009 // 00010 // LOCA: Library of Continuation Algorithms Package 00011 // Copyright (2005) Sandia Corporation 00012 // 00013 // Under terms of Contract DE-AC04-94AL85000, there is a non-exclusive 00014 // license for use of this work by or on behalf of the U.S. Government. 00015 // 00016 // This library is free software; you can redistribute it and/or modify 00017 // it under the terms of the GNU Lesser General Public License as 00018 // published by the Free Software Foundation; either version 2.1 of the 00019 // License, or (at your option) any later version. 00020 // 00021 // This library is distributed in the hope that it will be useful, but 00022 // WITHOUT ANY WARRANTY; without even the implied warranty of 00023 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU 00024 // Lesser General Public License for more details. 00025 // 00026 // You should have received a copy of the GNU Lesser General Public 00027 // License along with this library; if not, write to the Free Software 00028 // Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 00029 // USA 00030 // 00031 // Questions? Contact Roger Pawlowski (rppawlo@sandia.gov) or 00032 // Eric Phipps (etphipp@sandia.gov), Sandia National Laboratories. 00033 // ************************************************************************ 00034 // CVS Information 00035 // $Source: /space/CVS/Trilinos/packages/nox/src-petsc/NOX_Petsc_SharedJacobian.C,v $ 00036 // $Author: rppawlo $ 00037 // $Date: 2006/08/22 00:01:48 $ 00038 // $Revision: 1.5 $ 00039 // ************************************************************************ 00040 //@HEADER 00041 00042 #include "NOX_Petsc_SharedJacobian.H" // class definition 00043 #include "petscmat.h" 00044 00045 using namespace NOX::Petsc; 00046 00047 SharedJacobian::SharedJacobian(Mat& j) 00048 { 00049 jacobian = &j; 00050 } 00051 00052 SharedJacobian::SharedJacobian(Mat& j, Mat& p) 00053 { 00054 jacobian = &j; 00055 prec = &p; 00056 } 00057 00058 SharedJacobian::~SharedJacobian() 00059 { 00060 } 00061 00062 Mat& SharedJacobian::getJacobian(const Group* newowner) 00063 { 00064 owner = newowner; 00065 return *jacobian; 00066 } 00067 00068 const Mat& SharedJacobian::getJacobian() const 00069 { 00070 return *jacobian; 00071 } 00072 00073 bool SharedJacobian::isOwner(const Group* grp) const 00074 { 00075 return (owner == grp); 00076 } 00077 00078 Mat& SharedJacobian::getPrec(const Group* newowner) 00079 { 00080 owner = newowner; 00081 return *prec; 00082 } 00083 00084 const Mat& SharedJacobian::getPrec() const 00085 { 00086 return *prec; 00087 } 00088 00089