regularizedlinearmaterial.hh

Go to the documentation of this file.

// -*- mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*-
// vi: set et ts=4 sw=4 sts=4:
/*****************************************************************************
 *   See the file COPYING for full copying permissions.                      *
 *                                                                           *
 *   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/>.   *
 *****************************************************************************/
#ifndef DUMUX_REGULARIZED_LINEAR_MATERIAL_HH
#define DUMUX_REGULARIZED_LINEAR_MATERIAL_HH
 
#include "linearmaterial.hh"
#include "regularizedlinearmaterialparams.hh"
 
#include <dumux/common/spline.hh>
 
namespace Dumux {
 
template <class ScalarT, class ParamsT = RegularizedLinearMaterialParams<ScalarT> >
class RegularizedLinearMaterial
{
    using LinearMaterial = Dumux::LinearMaterial<ScalarT, ParamsT>;
 
public:
    using Params = ParamsT;
    using Scalar = typename Params::Scalar;
 
    static Scalar pc(const Params &params, Scalar swe)
    {
        return LinearMaterial::pc(params, swe);
    }
 
    static Scalar sw(const Params &params, Scalar pc)
    {
        return LinearMaterial::sw(params, pc);
    }
 
    static Scalar endPointPc(const Params &params)
    { return params.entryPc(); }
 
    static Scalar dpc_dswe(const Params &params, Scalar swe)
    {
        return LinearMaterial::dpc_dswe(params, swe);
    }
 
    static Scalar dswe_dpc(const Params &params, Scalar pc)
    {
        return LinearMaterial::dswe_dpc(params, pc);
    }
 
    static Scalar krw(const Params &params, Scalar swe)
    {
        return relperm_(params, swe);
    }
 
    static Scalar krn(const Params &params, Scalar swe)
    {
        Scalar sne = 1 - swe;
        return relperm_(params, sne);
    }
 
private:
    static Scalar relperm_(const Params &params, Scalar S)
    {
        const Scalar lowS = params.krLowS();
        const Scalar highS = params.krHighS();
 
 
        const Scalar m = (1 - ((1 - highS) + lowS)/2 ) / (1 - (1 - highS) - lowS);
 
        // check whether the saturation is unpyhsical
        if (S >= 1.0)
            return 1.0;
        else if (S <= 0.0)
            return 0;
        // check wether the permeability needs to be regularized
        else if (S < lowS) {
            using Spline = Dumux::Spline<Scalar>;
            Spline sp(0, lowS,
                      0, lowS/2,
                      0, m);
            return sp.eval(S);
        }
        else if (S > highS) {
            using Spline = Dumux::Spline<Scalar>;
            Spline sp(highS, 1,
                      1 - (1 - highS)/2, 1,
                      m, 0);
            return sp.eval(S);
        }
 
        // straight line for S \in [lowS, highS]
        return lowS/2 + m*(S - lowS);
    }
};
} // end namespace Dumux
 
#endif