TvergaardHutchinson.hpp

Go to the documentation of this file.

//*****************************************************************//
//    Albany 2.0:  Copyright 2012 Sandia Corporation               //
//    This Software is released under the BSD license detailed     //
//    in the file "license.txt" in the top-level Albany directory  //
//*****************************************************************//

#ifndef TVERGAARDHUTCHINSON_HPP
#define TVERGAARDHUTCHINSON_HPP

#include "Phalanx_ConfigDefs.hpp"
#include "Phalanx_Evaluator_WithBaseImpl.hpp"
#include "Phalanx_Evaluator_Derived.hpp"
#include "Phalanx_MDField.hpp"

#include "Albany_Layouts.hpp"
#include "Intrepid_CellTools.hpp"
#include "Intrepid_Cubature.hpp"

namespace LCM {
template<typename EvalT, typename Traits>
class TvergaardHutchinson : public PHX::EvaluatorWithBaseImpl<Traits>,
                            public PHX::EvaluatorDerived<EvalT, Traits>  {

public:

  TvergaardHutchinson(const Teuchos::ParameterList& p,
                          const Teuchos::RCP<Albany::Layouts>& dl);

  void postRegistrationSetup(typename Traits::SetupData d,
             PHX::FieldManager<Traits>& vm);

  void evaluateFields(typename Traits::EvalData d);

private:

  typedef typename EvalT::ScalarT ScalarT;
  typedef typename EvalT::MeshScalarT MeshScalarT;

  // Input
  Teuchos::RCP<Intrepid::Cubature<RealType> > cubature;
  Teuchos::RCP<Intrepid::Basis<RealType, Intrepid::FieldContainer<RealType> > > intrepidBasis;
  // current basis vector of the surface element
  PHX::MDField<ScalarT,Cell,QuadPoint,Dim, Dim> currentBasis;
  // displacement jump
  PHX::MDField<ScalarT,Cell,QuadPoint,Dim> jump;

  // material constants defining the traction-separation law
  RealType delta_1;
  RealType delta_2;
  RealType delta_c;
  RealType sigma_c;

  // material constants controlling the relative effect of shear and normal opening
  RealType beta_0;
  RealType beta_1;
  RealType beta_2;

  // Output
  PHX::MDField<ScalarT,Cell,QuadPoint,Dim> cohesiveTraction;

  unsigned int worksetSize;
  unsigned int numQPs;
  unsigned int numDims;

};
} // end namespace LCM

#endif