fluidselftransportmodel.hh

#ifndef __DUNE_ACFEM_MODELS_MODULES_FLUIDSELFTRANSPORTMODEL_HH__
#define __DUNE_ACFEM_MODELS_MODULES_FLUIDSELFTRANSPORTMODEL_HH__
 
#include "../operatorparts/modeladapter.hh"
 
namespace Dune {
 
  namespace ACFem {
 
    template<class FunctionSpace>
    class FluidSelfTransportOperatorParts
      : public OperatorPartsExpression<FluidSelfTransportOperatorParts<FunctionSpace> >
    {
      typedef FluidSelfTransportOperatorParts   ThisType;
      typedef DefaultOperatorParts<ThisType>    BaseType;
      typedef OperatorPartsInterface<ThisType>  InterfaceType;
      typedef OperatorPartsTraits<ThisType>     TraitsType;
     public:
      typedef FunctionSpace FunctionSpaceType;
 
      typedef typename FunctionSpaceType::DomainType DomainType;
      typedef typename FunctionSpaceType::RangeType RangeType;
      typedef typename FunctionSpaceType::JacobianRangeType JacobianRangeType;
      typedef typename FunctionSpaceType::HessianRangeType HessianRangeType;
 
      enum {
        dimDomain = FunctionSpaceType::dimDomain,
        dimRange = FunctionSpaceType::dimRange,
        dimWorld = dimDomain
      };
 
      static_assert(dimDomain == dimRange && dimDomain == dimWorld,
                    "This is meant for dimensionworld vector-fields, "
                    "like fluids, deformations etc.");
 
      typedef typename FunctionSpaceType::DomainFieldType DomainFieldType;
      typedef typename FunctionSpaceType::RangeFieldType RangeFieldType;
 
      // Interface methods that need to be reimplemented
 
      FluidSelfTransportOperatorParts(const std::string& name = "")
        : name_(name == "" ? "(-U_iU_jD_iPhi_j+Bndry)" : name)
      {}
 
      std::string name() const
      {
        return name_;
      }
 
      template<class Intersection>
      bool setIntersection(const Intersection& intersection) const
      {
        // true is correct as higher-level code has to take care of
        // the Dirichlet-(non-Dirichlet) splitting of the boundary.
 
        // The following would yield the same result:
        // return this->robinIndicator().apply(intersection);
        return true;
      }
 
      template<class Entity, class Point>
      void flux (const Entity& entity,
                 const Point &x,
                 const RangeType& value,
                 const JacobianRangeType& jacobian,
                 JacobianRangeType& flux) const
      {
        // We need to provide the tensor-product of value with itself.
        flux = 0;
        for (int i = 0; i < dimWorld; ++i) {
          flux[i][i] = value[i] * value[i];
          for (int j = i+1; j < dimWorld; ++j) {
            flux[i][j] = flux[j][i] = - (value[i] * value[j]);
          }
        }
      }
 
      template<class Entity, class Point>
      void linearizedFlux (const RangeType& uBar,
                           const JacobianRangeType& DuBar,
                           const Entity& entity,
                           const Point &x,
                           const RangeType& value,
                           const JacobianRangeType& jacobian,
                           JacobianRangeType& flux) const
      {
        // actually the sum of tensor products ...
        flux = 0;
        for (int i = 0; i < dimWorld; ++i) {
          flux[i][i] = 2.0 * uBar[i] * value[i];
          for (int j = i+1; j < dimWorld; ++j) {
            flux[i][j] = flux[j][i] = - (uBar[i] * value[j] + uBar[j] * value[i]);
          }
        }
 
      }
 
      template<class Entity, class Point>
      void fluxDivergence(const Entity& entity,
                          const Point &x,
                          const RangeType& value,
                          const JacobianRangeType& jacobian,
                          const HessianRangeType& hessian,
                          RangeType& result) const
      {
        // I think this is correct then ....
        jacobian.mv(value, result);
      }
 
      template<class Intersection, class Point>
      void robinFlux(const Intersection& intersection,
                     const Point& x,
                     const DomainType& unitOuterNormal,
                     const RangeType& value,
                     RangeType& result) const
      {
        result  = value;
        result *= (value * unitOuterNormal); // scalar product
      }
 
      template<class Intersection, class Point>
      void linearizedRobinFlux(const RangeType& uBar,
                               const Intersection& intersection,
                               const Point& x,
                               const DomainType& unitOuterNormal,
                               const RangeType& value,
                               RangeType& result) const
      {
        RangeFieldType flowBar(0), flow(0);
        for (int i = 0; i < dimWorld; ++i) {
          flowBar += unitOuterNormal[i] * uBar[i];
          flow += unitOuterNormal[i] * value[i];
        }
        for (int i = 0; i < dimWorld; ++i) {
          result[i] = flow * uBar[i] + flowBar * value[i];
        }
      }
 
     protected:
      const std::string name_;
    };
 
    template<class FunctionSpace>
    struct OperatorPartsTraits<FluidSelfTransportOperatorParts<FunctionSpace> >
      : public DefaultOperatorPartsTraits<FunctionSpace>
    {
      enum StructureFlags
      {
        isLinear = false,
        isSymmetric = false,
        isSemiDefinite = false,
      };
 
      enum ConstituentFlags {
        hasFlux = true,
        hasSources = false,
        hasRobinFlux = true,
      };
    };
 
 
    template<class Object>
    static inline
    FluidSelfTransportOperatorParts<typename Object::FunctionSpaceType>
    fluidSelfTransportOperatorParts(const Object& object, const std::string& name = "")
    {
      return FluidSelfTransportOperatorParts<typename Object::FunctionSpaceType>(name);
    }
 
    template<class Object>
    static inline
    OperatorPartsAdapterModel<FluidSelfTransportOperatorParts<typename Object::FunctionSpaceType>,
                              typename Object::GridPartType>
    fluidSelfTransportModel(const Object& object, const std::string& name = "")
    {
      typedef FluidSelfTransportOperatorParts<typename Object::FunctionSpaceType> OperatorPartsType;
      typedef typename Object::GridPartType GridPartType;
      return OperatorPartsAdapterModel<OperatorPartsType, GridPartType>(OperatorPartsType(name));
    }
 
 
 
 
  } // namespace ACFem
 
}  //Namespace Dune
 
 
#endif // __DUNE_ACFEM_MODELS_MODULES_FLUIDSELFTRANSPORTMODEL_HH__