function likelihood = locateLips(basis,name,parameters,dim,method,input)


sz = size(basis);
height=dim(1)
width = dim(2)


[g]=pgmread(['/pro/web/web/courses/cs295-3/Assignment2/data/Testing/' name ]);
size(g);
image=g;

figure(1);
imagesc(image); colormap(gray);  drawnow;
sizeim = size(image)

if(input~=0)
startPoint = ginput
yoffset = floor(startPoint(1,2))
xoffset = floor(startPoint(1,1))
region = image(yoffset:yoffset+height,xoffset:xoffset+width);
end

index=0;

%figure(2);
%imagesc(region); colormap(gray);  drawnow;
if(input==0)
for row = 1:sizeim(1)
  for col = 1:sizeim(2)
    if((col+width < sizeim(2)) & (row+height < sizeim(1))) 
      region = image(row:row+height-1,col:col+width-1);
      region = region(:);
      projection = region'*basis; 
      likelihood(row,col) = marginalProbability(projection,parameters,method);
    end
  end
end

figure(2);
size(likelihood)
imagesc(likelihood); colormap(gray); drawnow;
end

%

%