unit_upper_triangular.hpp

Go to the documentation of this file.

// SPDX-License-Identifier: BSD-2-Clause
 
#ifndef pRC_CORE_TENSOR_OPERATOR_VIEWS_UNIT_UPPER_TRIANGULAR_H
#define pRC_CORE_TENSOR_OPERATOR_VIEWS_UNIT_UPPER_TRIANGULAR_H
 
#include <prc/core/basic/functions/identity.hpp>
#include <prc/core/basic/functions/zero.hpp>
#include <prc/core/tensor/declarations.hpp>
 
namespace pRC::TensorViews
{
    template<class T, class N, class V>
        requires IsTensorView<V> && (N::Dimension == 2)
    class UnitUpperTriangular : public View<T, N, UnitUpperTriangular<T, N, V>>
    {
    private:
        using Base = View<T, N, UnitUpperTriangular>;
 
    public:
        template<class X>
            requires IsSame<V, RemoveReference<X>>
        UnitUpperTriangular(X &&a)
            : mA(forward<X>(a))
        {
        }
 
        constexpr T operator()(Index const i, Index const j)
        {
            if(i < j)
            {
                return mA(i, j);
            }
 
            if(i == j)
            {
                return identity();
            }
 
            return zero();
        }
 
        constexpr T operator()(Index const i, Index const j) const
        {
            if(i < j)
            {
                return mA(i, j);
            }
 
            if(i == j)
            {
                return identity();
            }
 
            return zero();
        }
 
        constexpr decltype(auto) operator()(
            typename Base::Subscripts const &subscripts)
        {
            return this->call(subscripts);
        }
 
        constexpr decltype(auto) operator()(
            typename Base::Subscripts const &subscripts) const
        {
            return this->call(subscripts);
        }
 
        constexpr decltype(auto) operator[](Index const index) = delete;
        constexpr decltype(auto) operator[](Index const index) const = delete;
 
    private:
        V mA;
    };
}
#endif // pRC_CORE_TENSOR_OPERATOR_VIEWS_UNIT_UPPER_TRIANGULAR_H