gsMinResQLP.h

Go to the documentation of this file.

#pragma once

#include <gsSolver/gsIterativeSolver.h>

//TODOs: Create accessors for values of interest, like, Arnorm, xnorm etc.
//TODOs: Add the same flaging system the matlab code uses
//TODOs: Merge the minres and minresQLP code like petsc and matlab has
namespace gismo
{

template<class T=real_t>
class gsMinResQLP : public gsIterativeSolver<T>
{

public:
    typedef gsIterativeSolver<T> Base;

    typedef gsMatrix<T>  VectorType;

    typedef typename Base::LinOpPtr LinOpPtr;

    typedef memory::shared_ptr<gsMinResQLP> Ptr;
    typedef memory::unique_ptr<gsMinResQLP> uPtr;

    template< typename OperatorType >
    explicit gsMinResQLP( const OperatorType& mat,
                                const LinOpPtr& precond = LinOpPtr())
        : Base(mat, precond), m_inexact_residual(false) {}

    template< typename OperatorType >
    static uPtr make( const OperatorType& mat, const LinOpPtr& precond = LinOpPtr() )
    { return uPtr( new gsMinResQLP(mat, precond) ); }

    bool initIteration( const VectorType& rhs, VectorType& x );
    void finalizeIteration( VectorType& x );

    bool step( VectorType& x );

    static gsOptionList defaultOptions()
    {
        gsOptionList opt = Base::defaultOptions();
        opt.addSwitch( "InexactResidual",
                       "If true, the residual is estimated, not accurately computed.",
                       false );
        return opt;
    }

    gsMinResQLP& setOptions(const gsOptionList & opt)
    {
        Base::setOptions(opt);
        m_inexact_residual = opt.askSwitch("InexactResidual", m_inexact_residual);
        return *this;
    }

    void setInexactResidual( bool flag )     { m_inexact_residual = flag; }

    std::ostream &print(std::ostream &os) const
    {
        os << "gsMinResQLP\n";
        return os;
    }

private:
    using Base::m_mat;
    using Base::m_precond;
    using Base::m_max_iters;
    using Base::m_tol;
    using Base::m_num_iter;
    using Base::m_rhs_norm;
    using Base::m_error;

    gsMatrix<T> m_rhs, r1, r2, r3, resvec, Aresvec,
                v, xl2, negResidual,
                wl, w, wl2;


    T beta1, betal, beta, tau, taul, taul2, phi, betan, gmin, cs, sn,cr1,sr1,
        cr2,sr2, deltan,gamma,gammal, gammal2, gammal3, eta,etal, etal2,
        vepln, veplnl, veplnl2, u, ul, ul2, ul3, rnorm, rnorml, xnorm, xl2norm,
        Axnorm, Anorm, Acond, relres, alpha, pnorm, dbar, delta,
        epsilon, epsilonn, gbar, maxxnorm, gammal_QLP, gamma_QLP, vepln_QLP,
        abs_gamma, gminl, gminl2, Arnorml, Arnorm, relAresl, relAres,
        rootl, ul_QLP, u_QLP;;


    index_t QLPiter;
    bool m_inexact_residual;
};

} // namespace gismo

#ifndef GISMO_BUILD_LIB
#include GISMO_HPP_HEADER(gsMinResQLP.hpp)
#endif