legacyArray.hpp

Go to the documentation of this file.

 
//
// Copyright (c) 2021-2023, University of Colorado Denver. All rights reserved.
//
// This file is part of <T>LAPACK.
// <T>LAPACK is free software: you can redistribute it and/or modify it under
// the terms of the BSD 3-Clause license. See the accompanying LICENSE file.
 
#ifndef TLAPACK_LEGACY_LEGACYARRAY_HH
#define TLAPACK_LEGACY_LEGACYARRAY_HH
 
#include "tlapack/legacy_api/base/types.hpp"
#include "tlapack/plugins/legacyArray.hpp"
 
namespace tlapack {
namespace legacy {
    namespace internal {
 
        template <typename T>
        constexpr auto create_matrix(T* A, idx_t m, idx_t n, idx_t lda)
        {
            return LegacyMatrix<T, idx_t, Layout::ColMajor>{m, n, A, lda};
        }
 
        template <typename T>
        constexpr auto create_matrix(T* A, idx_t m, idx_t n)
        {
            return LegacyMatrix<T, idx_t, Layout::ColMajor>{m, n, A, m};
        }
 
        template <typename T>
        constexpr auto create_rowmajor_matrix(T* A, idx_t m, idx_t n, idx_t lda)
        {
            return LegacyMatrix<T, idx_t, Layout::RowMajor>{m, n, A, lda};
        }
 
        template <typename T>
        constexpr auto create_rowmajor_matrix(T* A, idx_t m, idx_t n)
        {
            return LegacyMatrix<T, idx_t, Layout::RowMajor>{m, n, A, n};
        }
 
        template <typename T>
        constexpr auto create_banded_matrix(
            T* A, idx_t m, idx_t n, idx_t kl, idx_t ku)
        {
            return LegacyBandedMatrix<T, idx_t>{m, n, kl, ku, A};
        }
 
        template <typename T, typename int_t>
        constexpr auto create_vector(T* x, idx_t n, int_t inc)
        {
            return LegacyVector<T, idx_t, int_t>{n, x, inc};
        }
 
        template <typename T>
        constexpr auto create_vector(T* x, idx_t n)
        {
            return LegacyVector<T, idx_t>{n, x};
        }
 
        template <typename T, typename int_t>
        constexpr auto create_backward_vector(T* x, idx_t n, int_t inc)
        {
            return LegacyVector<T, idx_t, int_t, Direction::Backward>{n, x,
                                                                      inc};
        }
 
        template <typename T>
        constexpr auto create_backward_vector(T* x, idx_t n)
        {
            return LegacyVector<T, idx_t, tlapack::internal::StrongOne,
                                Direction::Backward>{n, x};
        }
 
    }  // namespace internal
}  // namespace legacy
}  // namespace tlapack
 
#endif  // TLAPACK_LEGACY_LEGACYARRAY_HH