function output=edge_outline(input,strength)

%This function implements the edge outline filter
%------------------------------------------------

% This line is neceesary to process images in
% the uint8 8 (ie 0-255) format
input=double(input);
output=zeros(size(input));

edge=double(sobel_conv(input));
max_edge=max(max(edge));
edge=strength*(edge./max_edge);

for row=1:1:480
  for column=1:1:640  
    output(row,column)=input(row,column)+(input(row,column)*edge(row,column));
  end;
end;

output=uint8(output);

