function f = modi_set(set,mod)% f = modi_set(set,mod)%% Modification of a fuzzy set, or a library of fuzzy sets.% 'mod'  :%% 'nor'   normalisation. Division of all elements by the maximum membership-%                        value of the set.% 'con'   concentration. Con(u(x)) = u(x)}. Makes the set more "crisp".%                        operator for the linguistic "very".% 'dil'   dilation.      Dil(ua) = u(x)^0.5. Makes the set more fuzzy.%                        operator for the linguistic "more or less".% 'int'   contrast-intensivation. %                        Int(u(x)) = 2*u(x)} if u(x) < 0.5 else 1-2*(1-u(x))}%%% FSTB - Fuzzy Systems Toolbox for MATLAB% Copyright (c) 1993-1996 by Olaf Wolkenhauer% Control Systems Centre at UMIST% Manchester M60 1QD, UK%% 25-Feb-1994 [m,resx]=size(set);f=zeros(m,resx);for row=1:m,  if all(mod(1:3)=='nor')     f(row,:)=set(row,:)./max(set(row,:));  elseif all(mod(1:3)=='con')    f(row,:)=set(row,:).^2;  elseif all(mod(1:3)=='dil')    f(row,:)=set(row,:).^0.5;   elseif all(mod(1:3)=='int')    for i=1:resx;      if set(row,i)<0.5,f(row,i)=2*set(row,i)^2;      else f(row,i)=1-2*(1-set(row,i))^2;end;    end;   end;end;