subt_expr.h

Go to the documentation of this file.

/*
 *  This file is a part of TiledArray.
 *  Copyright (C) 2013  Virginia Tech
 *
 *  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 3 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, see <http://www.gnu.org/licenses/>.
 *
 *  Justus Calvin
 *  Department of Chemistry, Virginia Tech
 *
 *  subt_expr.h
 *  Apr 1, 2014
 *
 */


#ifndef TILEDARRAY_EXPRESSIONS_SUBT_EXPR_H__INCLUDED
#define TILEDARRAY_EXPRESSIONS_SUBT_EXPR_H__INCLUDED

#include <TiledArray/expressions/binary_expr.h>
#include <TiledArray/expressions/subt_engine.h>

namespace TiledArray {
  namespace expressions {

    template <typename Left, typename Right>
    using ConjSubtExpr =
        ScalSubtExpr<Left, Right, TiledArray::detail::ComplexConjugate<void> >;

    template <typename Left, typename Right, typename Scalar>
    using ScalConjSubtExpr =
        ScalSubtExpr<Left, Right, TiledArray::detail::ComplexConjugate<Scalar> >;

    using TiledArray::detail::conj_op;
    using TiledArray::detail::mult_t;
    using TiledArray::detail::numeric_t;
    using TiledArray::detail::scalar_t;

    template <typename Left, typename Right>
    struct ExprTrait<SubtExpr<Left, Right> > {
      typedef Left left_type; 
      typedef Right right_type; 
      typedef result_of_subt_t<
          typename EngineTrait<typename ExprTrait<Left>::engine_type>::eval_type,
          typename EngineTrait<typename ExprTrait<Right>::engine_type>::eval_type>
          result_type; 
      typedef SubtEngine<typename ExprTrait<Left>::engine_type,
          typename ExprTrait<Right>::engine_type, result_type>
          engine_type; 
      typedef numeric_t<typename EngineTrait<engine_type>::eval_type>
          numeric_type; 
      typedef scalar_t<typename EngineTrait<engine_type>::eval_type>
          scalar_type; 
    };

    template <typename Left, typename Right, typename Scalar>
    struct ExprTrait<ScalSubtExpr<Left, Right, Scalar> > {
      typedef Left left_type; 
      typedef Right right_type; 
      typedef Scalar scalar_type;  
      typedef result_of_subt_t<
          typename EngineTrait<typename ExprTrait<Left>::engine_type>::eval_type,
          typename EngineTrait<typename ExprTrait<Right>::engine_type>::eval_type,
          scalar_type> result_type; 
      typedef ScalSubtEngine<typename ExprTrait<Left>::engine_type,
          typename ExprTrait<Right>::engine_type, Scalar, result_type>
          engine_type; 
      typedef numeric_t<typename EngineTrait<engine_type>::eval_type>
          numeric_type; 
    };



    template <typename Left, typename Right>
    class SubtExpr : public BinaryExpr<SubtExpr<Left, Right> > {
    public:
      typedef SubtExpr<Left, Right> SubtExpr_;
      typedef BinaryExpr<SubtExpr_> BinaryExpr_; 
      typedef typename ExprTrait<SubtExpr_>::left_type
          left_type; 
      typedef typename ExprTrait<SubtExpr_>::right_type
          right_type; 
      typedef typename ExprTrait<SubtExpr_>::engine_type
          engine_type; 

      // Compiler generated functions
      SubtExpr(const SubtExpr_&) = default;
      SubtExpr(SubtExpr_&&) = default;
      ~SubtExpr() = default;
      SubtExpr_& operator=(const SubtExpr_&) = delete;
      SubtExpr_& operator=(SubtExpr_&&) = delete;


      SubtExpr(const left_type& left, const right_type& right) : BinaryExpr_(left, right) { }

    }; // class SubtExpr



    template <typename Left, typename Right, typename Scalar>
    class ScalSubtExpr : public BinaryExpr<ScalSubtExpr<Left, Right, Scalar> > {
    public:
      typedef ScalSubtExpr<Left, Right, Scalar> ScalSubtExpr_; 
      typedef BinaryExpr<ScalSubtExpr_> BinaryExpr_; 
      typedef typename ExprTrait<ScalSubtExpr_>::left_type left_type; 
      typedef typename ExprTrait<ScalSubtExpr_>::right_type right_type; 
      typedef typename ExprTrait<ScalSubtExpr_>::engine_type engine_type; 
      typedef typename ExprTrait<ScalSubtExpr_>::scalar_type scalar_type; 

    private:

      scalar_type factor_; 

    public:

      // Compiler generated functions
      ScalSubtExpr(const ScalSubtExpr_&) = default;
      ScalSubtExpr(ScalSubtExpr_&&) = default;
      ~ScalSubtExpr() = default;
      ScalSubtExpr_& operator=(const ScalSubtExpr_&) = delete;
      ScalSubtExpr_& operator=(ScalSubtExpr_&&) = delete;



      ScalSubtExpr(const left_type& left, const right_type& right,
          const scalar_type factor) :
            BinaryExpr_(left, right), factor_(factor)
      { }


      scalar_type factor() const { return factor_; }

    }; // class ScalSubtExpr


    using TiledArray::detail::mult_t;


    template <typename Left, typename Right>
    inline SubtExpr<Left, Right>
    operator-(const Expr<Left>& left, const Expr<Right>& right) {
      static_assert(TiledArray::expressions::is_aliased<Left>::value,
          "no_alias() expressions are not allowed on the right-hand side of "
          "the assignment operator.");
      static_assert(TiledArray::expressions::is_aliased<Right>::value,
          "no_alias() expressions are not allowed on the right-hand side of "
          "the assignment operator.");
      return SubtExpr<Left, Right>(left.derived(), right.derived());
    }


    template <typename Left, typename Right, typename Scalar,
        typename std::enable_if<
            TiledArray::detail::is_numeric<Scalar>::value
        >::type* = nullptr>
    inline ScalSubtExpr<Left, Right, Scalar>
    operator*(const SubtExpr<Left, Right>& expr, const Scalar& factor) {
      return ScalSubtExpr<Left, Right, Scalar>(expr.left(), expr.right(),
          factor);
    }


    template <typename Left, typename Right, typename Scalar,
        typename std::enable_if<
            TiledArray::detail::is_numeric<Scalar>::value
        >::type* = nullptr>
    inline ScalSubtExpr<Left, Right, Scalar>
    operator*(const Scalar& factor, const SubtExpr<Left, Right>& expr) {
      return ScalSubtExpr<Left, Right, Scalar>(expr.left(), expr.right(),
          factor);
    }


    template <typename Left, typename Right, typename Scalar1, typename Scalar2,
        typename std::enable_if<
            TiledArray::detail::is_numeric<Scalar2>::value
        >::type* = nullptr>
    inline ScalSubtExpr<Left, Right, mult_t<Scalar1, Scalar2> >
    operator*(const ScalSubtExpr<Left, Right, Scalar1>& expr,
        const Scalar2& factor)
    {
      return ScalSubtExpr<Left, Right, mult_t<Scalar1, Scalar2> >(expr.left(),
          expr.right(), expr.factor() * factor);
    }


    template <typename Left, typename Right, typename Scalar1, typename Scalar2,
        typename std::enable_if<
            TiledArray::detail::is_numeric<Scalar1>::value
        >::type* = nullptr>
    inline ScalSubtExpr<Left, Right, mult_t<Scalar2, Scalar1> >
    operator*(const Scalar1& factor, const ScalSubtExpr<Left, Right, Scalar2>& expr) {
      return ScalSubtExpr<Left, Right, mult_t<Scalar2, Scalar1> >(expr.left(),
          expr.right(), expr.factor() * factor);
    }



    template <typename Left, typename Right>
    inline ScalSubtExpr<Left, Right,
        typename ExprTrait<SubtExpr<Left, Right> >::numeric_type>
    operator-(const SubtExpr<Left, Right>& expr) {
      return ScalSubtExpr<Left, Right,
          typename ExprTrait<SubtExpr<Left, Right> >::numeric_type>(expr.left(),
              expr.right(), -1);
    }


    template <typename Left, typename Right, typename Scalar>
    inline ScalSubtExpr<Left, Right, Scalar>
    operator-(const ScalSubtExpr<Left, Right, Scalar>& expr) {
      return ScalSubtExpr<Left, Right, Scalar>(expr.left(), expr.right(), -1);
    }


    template <typename Left, typename Right>
    inline ConjSubtExpr<Left, Right> conj(const SubtExpr<Left, Right>& expr) {
      return ConjSubtExpr<Left, Right>(expr.left(), expr.right(), conj_op());
    }


    template <typename Left, typename Right>
    inline SubtExpr<Left, Right> conj(const ConjSubtExpr<Left, Right>& expr) {
      return SubtExpr<Left, Right>(expr.left(), expr.right());
    }


    template <typename Left, typename Right, typename Scalar>
    inline ScalConjSubtExpr<Left, Right, Scalar>
    conj(const ScalSubtExpr<Left, Right, Scalar>& expr) {
      return ScalConjSubtExpr<Left, Right, Scalar>(expr.left(), expr.right(),
          conj_op(TiledArray::detail::conj(expr.factor())));
    }


    template <typename Left, typename Right, typename Scalar>
    inline ScalSubtExpr<Left, Right, Scalar>
    conj(const ScalConjSubtExpr<Left, Right, Scalar>& expr) {
      return ScalSubtExpr<Left, Right, Scalar>(expr.left(), expr.right(),
          TiledArray::detail::conj(expr.factor().factor()));
    }


    template <typename Left, typename Right, typename Scalar,
        typename std::enable_if<
            TiledArray::detail::is_numeric<Scalar>::value
        >::type* = nullptr>
    inline ScalConjSubtExpr<Left, Right, Scalar>
    operator*(const ConjSubtExpr<Left, Right>& expr, const Scalar& factor) {
      return ScalConjSubtExpr<Left, Right, Scalar>(expr.left(), expr.right(),
          conj_op(factor));
    }


    template <typename Left, typename Right, typename Scalar,
        typename std::enable_if<
            TiledArray::detail::is_numeric<Scalar>::value
        >::type* = nullptr>
    inline ScalConjSubtExpr<Left, Right, Scalar>
    operator*(const Scalar& factor, const ConjSubtExpr<Left, Right>& expr) {
      return ScalConjSubtExpr<Left, Right, Scalar>(expr.left(), expr.right(),
          conj_op(factor));
    }


    template <typename Left, typename Right, typename Scalar1, typename Scalar2,
        typename std::enable_if<
            TiledArray::detail::is_numeric<Scalar2>::value
        >::type* = nullptr>
    inline ScalConjSubtExpr<Left, Right, mult_t<Scalar1, Scalar2> >
    operator*(const ScalConjSubtExpr<Left, Right, Scalar1>& expr, const Scalar2& factor) {
      return ScalConjSubtExpr<Left, Right, mult_t<Scalar1, Scalar2> >(expr.left(),
          expr.right(), conj_op(expr.factor().factor() * factor));
    }


    template <typename Left, typename Right, typename Scalar1, typename Scalar2,
        typename std::enable_if<
            TiledArray::detail::is_numeric<Scalar1>::value
        >::type* = nullptr>
    inline ScalConjSubtExpr<Left, Right, mult_t<Scalar2, Scalar1> >
    operator*(const Scalar1& factor, const ScalConjSubtExpr<Left, Right, Scalar2>& expr) {
      return ScalConjSubtExpr<Left, Right, mult_t<Scalar2, Scalar1> >(
          expr.left(), expr.right(), conj_op(expr.factor().factor() * factor));
    }


    template <typename Left, typename Right>
    inline ScalConjSubtExpr<Left, Right,
        typename ExprTrait<ConjSubtExpr<Left, Right> >::numeric_type>
    operator-(const ConjSubtExpr<Left, Right>& expr) {
      typedef typename ExprTrait<ConjSubtExpr<Left, Right> >::numeric_type
          scalar_type;
      return ScalConjSubtExpr<Left, Right, scalar_type>(expr.left(),
          expr.right(), conj_op<scalar_type>(-1));
    }


    template <typename Left, typename Right, typename Scalar>
    inline ScalConjSubtExpr<Left, Right, Scalar>
    operator-(const ScalConjSubtExpr<Left, Right, Scalar>& expr) {
      return ScalConjSubtExpr<Left, Right, Scalar>(expr.left(), expr.right(),
          conj_op(-expr.factor().factor()));
    }

  }  // namespace expressions
} // namespace TiledArray

#endif // TILEDARRAY_EXPRESSIONS_SUBT_EXPR_H__INCLUDED