xmatrix0.h

Go to the documentation of this file.

#pragma once

#include "xvector.h"

namespace nmx::gsl::mat {

template<class T>
class IMBase : public IGslContainer<T, gsl_matrix, 1>
{
    //verwende die Funktionen der Basisklasse
    using IGslContainer<T, gsl_matrix, 1>::gsl;

public:
    inline size_t rows() const { return gsl()->size1; }

    inline size_t columns() const { return gsl()->size2; }

    inline bool empty() const { //
        return gsl() == nullptr ? true : rows() == 0 && columns() == 0;
    }

    inline double operator()(size_t idx, size_t jdx) const {
        return gsl_matrix_get(gsl(), idx, jdx);
    }

    inline double &operator()(size_t i, size_t j) {
        return *gsl_matrix_ptr(gsl(), i, j); //
    }

    inline void save(std::ostream &os, Format fmt = Output::array()) const {
        for (size_t _idx = 0; _idx < rows(); _idx++) {
            os << gsl_matrix_get(gsl(), _idx, 0);
            for (size_t _jdx = 1; _jdx < columns(); _jdx++) {
                os << fmt.sep() << gsl_matrix_get(gsl(), _idx, _jdx);
            }
            os << fmt.lend();
        }
    }

    inline friend std::ostream &operator<<(std::ostream &os, const T &p) {
        p.save(os);
        return os;
    }

    template<class FN>
    inline T &transform(FN fn) {
        for (size_t idx = 0; idx < rows(); idx++) {
            for (size_t jdx = 0; jdx < columns(); jdx++) {
                double val = gsl_matrix_get(gsl(), idx, jdx);
                gsl_matrix_set(gsl(), idx, jdx, fn(val));
            }
        }
        return static_cast<T &>(*this);
    }
};

} // namespace nmx::gsl::mat