imply.m

来自「a collection of M-files to study concept」· M 代码 · 共 56 行

function [R] = imply(dA,dB,n)
%IMPLY  This function returns fuzzy implication of two matrix of fuzzy
%       values A and B, based on selected method of implication.
%       With selecting variable N from the following list,different
%       methods of implication will be governed.
%
%                 [R] = IMPLY(A,B,N)
%
%       1: Mamdani representation (Min operation rule)
%       2: Early Zadeh representation (Max-Min operation rule)
%       3: Zadeh/Lukasiewicz representation (Arithmetic operation rule)
%       4: Kleene-Dienes representation (Bollean operation rule)
%       5: Kleene-Dienes-Lukasiewicz representation
%       6: Larsen representation (Product operation rule)
%       7: Standard sequence fuzzy implication
%       8: Goguen representation
%                                                      See also CRI.


% FISMAT: Fuzzy Inference Systems toolbox for MATLAB
% (c) A. Lotfi, University of Queensland (Email: [e-mail])
% 13-10-93
% The program has been tested on MATLAB version 4.1, Sun workstation.

% Checking the inputs of function


one=ones(length(dA),length(dB));
R0=zeros(size(one));

       if nargin ~= 3
error('     Inputs of function is not correct  ') ;
       end


if (max(max(dA)) > 1) | (max(max(dB)) > 1) | (min(min(dA)) < 0) | (min(min(dB)) < 0)
	error('Grade of membership function should not be more than one or less than zero.')
end


[ma,na]=size(dA);[mb,nb]=size(dB);

if ma ~= mb,
	error('The number of rules in antecedent and consequent are not proper')
end

ind=1;

DA=dA;DB=dB;

for ind=1:ma

    dA=DA(ind,:);dB=DB(ind,:);

% * Mamdani representation (Min operation rule)
%