EpetraExt_MultiSerialComm.cpp

Go to the documentation of this file.
00001 //@HEADER
00002 /*
00003 ************************************************************************
00004 
00005               EpetraExt: Extended Linear Algebra Services Package 
00006                 Copyright (2001) Sandia Corporation
00007 
00008 Under terms of Contract DE-AC04-94AL85000, there is a non-exclusive
00009 license for use of this work by or on behalf of the U.S. Government.
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 Michael A. Heroux (maherou@sandia.gov) 
00026 
00027 ************************************************************************
00028 */
00029 //@HEADER
00030 
00031 #include "EpetraExt_MultiSerialComm.h" 
00032 
00033 namespace EpetraExt {
00034 
00035 MultiSerialComm::MultiSerialComm(int numTimeSteps_) :
00036         EpetraExt::MultiComm(Teuchos::rcp(new Epetra_SerialComm())),
00037         subComm(0)
00038 {
00039   numSubDomains=1;
00040   subDomainRank=0;
00041   firstTimeStepOnDomain = 0;
00042   ResetNumTimeSteps(numTimeSteps_);
00043 
00044   // Construct second epetra communicators
00045   subComm = new Epetra_SerialComm();
00046 }
00047 
00048 //Copy Constructor
00049 MultiSerialComm::MultiSerialComm(const MultiSerialComm &MSC ) :
00050         EpetraExt::MultiComm(Teuchos::rcp(new Epetra_SerialComm())),
00051         subComm(new Epetra_SerialComm(*(MSC.subComm)))
00052 {
00053   numSubDomains = MSC.numSubDomains;
00054   subDomainRank = MSC.subDomainRank;
00055   numTimeSteps = MSC.numTimeSteps;
00056   numTimeStepsOnDomain = MSC.numTimeStepsOnDomain;
00057   firstTimeStepOnDomain = MSC.firstTimeStepOnDomain;
00058 }
00059 
00060 MultiSerialComm::~MultiSerialComm()
00061 {
00062   delete subComm;
00063 }
00064 
00065 void MultiSerialComm::ResetNumTimeSteps(int numTimeSteps_)
00066 {
00067   numTimeSteps = numTimeSteps_;
00068   numTimeStepsOnDomain = numTimeSteps_; 
00069 }
00070 
00071 } //namespace EpetraExt

Generated on Wed May 12 21:24:46 2010 for EpetraExt by  doxygen 1.4.7