function A = aggregat(Ae,Ade,FAMbank,aggop)% A = aggregat(Ae,Ade,FAMbank,aggop) %% A = [a1, a2,...,aj,...,am] with aj=aggop(aj1,aj2,...,aji,...,ajn).% This function realizes the "AND" in the adcentend part of each rule.% Therefore there are as much elements in A as there are rules.% Row vector Ae contains fit values from a crisp input to all sets% in the library for the variable e.% Row vector Ade contains fit values from a crisp input to all sets% in the library for the variable de.% FAMbank= bank of FAM rules% aggop = aggregation operator%% FSTB - Fuzzy Systems Toolbox for MATLAB% Copyright (c) 1993-1996 by Olaf Wolkenhauer% Control Systems Centre at UMIST% Manchester M60 1QD, UK%% 19-April-1994 [i,j]=find(FAMbank); % finding all non-zero elements - rules.A=zeros(1,length(i));for co=1:length(i),  A(co)=feval(aggop,Ae(j(co)),Ade(i(co)));end;% A is a row vector where the rows (up to down) of the FAMbank matrix now % are in a sequence (left to right). A zero in the FAMbank is indicating,% that for the corresponding field no rule exists.