https://github.com/geodynamics/citcoms
Tip revision: 36f5b324acac508e900f74fcb6f9c7ae35fc8cbc authored by Leif Strand on 29 April 2009, 20:47:56 UTC
Merged r14275:14351 from trunk.
Merged r14275:14351 from trunk.
Tip revision: 36f5b32
SInlet.h
// -*- C++ -*-
//
//~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
//
//<LicenseText>
//
// CitcomS.py by Eh Tan, Eun-seo Choi, and Pururav Thoutireddy.
// Copyright (C) 2002-2005, California Institute of Technology.
//
// This program is free software; you can redistribute it and/or modify
// it under the terms of the GNU General Public License as published by
// the Free Software Foundation; either version 2 of the License, or
// (at your option) any later version.
//
// This program is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
// GNU General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with this program; if not, write to the Free Software
// Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
//
//</LicenseText>
//
// Role:
// impose normal velocity and shear traction as velocity b.c.,
// also impose temperature as temperature b.c.
//
//~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
//
#if !defined(pyCitcomSExchanger_SInlet_h)
#define pyCitcomSExchanger_SInlet_h
#include "Exchanger/Array2D.h"
#include "Exchanger/DIM.h"
#include "Exchanger/Inlet.h"
struct All_variables;
class Boundary;
class SInlet : public Exchanger::Inlet{
All_variables* E;
Exchanger::Array2D<double,Exchanger::STRESS_DIM> s;
Exchanger::Array2D<double,Exchanger::STRESS_DIM> s_old;
public:
SInlet(const Boundary& boundary,
const Exchanger::Sink& sink,
All_variables* E);
virtual ~SInlet();
virtual void recv();
virtual void impose();
private:
void setSBCFlag();
void imposeS();
double side_tractions(const Exchanger::Array2D<double,Exchanger::STRESS_DIM>& stress,
int node, int normal_dir, int dim) const;
};
#endif
// version
// $Id$
// End of file