derivatives.hpp

Go to the documentation of this file.

/*  Copyright (C) 2004-2015
    ANTONIO JAVIER BARRAGAN, antonio.barragan@diesia.uhu.es
    http://uhu.es/antonio.barragan

    Collaborators:
    JOSE MANUEL ANDUJAR, andujar@diesia.uhu.es
    AGUSTIN JIMENEZ AVELLO, agustin.jimenez@upm.es
    BASIL M. AL-HADITHI, basil.alhadithi@upm.es

    DPTO. DE ING. ELECTRONICA, DE SISTEMAS INFORMATICOS Y AUTOMATICA
    ETSI, UNIVERSITY OF HUELVA (SPAIN)

    For more information, please contact with authors.
    
    This software 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 software 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 _DERIVATIVES_HPP_
#define _DERIVATIVES_HPP_

#include <flt/utilities.hpp>

namespace FLT // Use the FTL (Fuzzy Logic Tools) namespace
{
    TNT::Array2D<double> jacobian(System &S,
                                      const double *const x,
                                      const double *const u,
                                      TNT::Array2D<double> &B,
                                      TNT::Array1D<double> &F);

    TNT::Array2D<double> jacobian(System &S,
                        System &C,
                        const double *const x);

    TNT::Array2D<double> jacobianAprox(System &S,
                             System &C,
                             const double * const x,
                             double h=0.001);

    TNT::Array2D<double> jacobianAprox(System &S,
                             const double *const x,
                             const double *const u,
                             TNT::Array2D<double> &B,
                             TNT::Array1D<double> &F,
                             double h=0.001);
    
    double derconseq(System &S,
             double *x,
             size_t output,
             size_t rule,
             size_t parameter,
             int &error);

    TNT::Array2D<double> derconseq(System &S,
                           double *x);
                           
    TNT::Array2D<double> deraffine(System &S,
                           double *x);
    
    double derantec(System &S,
            double *x,
            size_t input,
            size_t output,
            size_t rule,
            size_t parameter,
            int &error);

    TNT::Array2D<double> derantec(System &S,
                          double *x);
    
    TNT::Array2D<double> derfuzzy(System &S,
                          double *x);
                          
    TNT::Array2D<double> derCLFSconseq(System &P,
                      System &C,
                              const double * const x);


} // FLT

#endif