SetInternalArea.m


%
% Set feature for the internal area of 1D version of COCE.
% Subset of COCE.Data (including small cask in the middle )
% specified by COCE.InternalArea and COCE.CaskContrast is set to
% COCE.InternalValue 
%
COCE.Data(COCE.ExternalArea(1):COCE.ExternalArea(1)+COCE.InternalArea(1),COCE.ExternalArea(2):COCE.ExternalArea(2)+COCE.InternalArea(2))=...
    COCE.InternalValue;
%Set cask
for i =1:COCE.CaskArea
    COCE.Data(COCE.ExternalArea(1)+1:COCE.ExternalArea(1)+ COCE.InternalArea(1),...
      COCE.PopulationSize(2)/2-COCE.CaskArea+i) = COCE.InternalValue - COCE.CaskContrast*(i*i)/COCE.CaskArea^2;
end
for i =1:COCE.CaskArea
   COCE.Data(COCE.ExternalArea(1)+1:COCE.ExternalArea(1)+COCE.InternalArea(1),...
      COCE.PopulationSize(2)/2+i) = ...
         COCE.InternalValue + COCE.CaskContrast*((COCE.CaskArea+1-i)^2)/COCE.CaskArea^2;

end