!7

p-exp {
  int w = 32;
  L<RGBImageAndRect> marked = markedFaces_scaledToWidth(w);
  FaceFinderByPictures1 finder = new(w, rgbImageAndRects_getClip(marked));
  new Best<F1<RGBImage, Rect>> best;
  video_scoreRect_step(best, marked, finder);
  //showImage(mergeRGBImagesAndRects(callFaceFinder(finder, rgbImageAndRects_images(marked))));
  
  // Make finder smaller by removing pictures
  for i over l(finder.pictures): {
    FaceFinderByPictures1 newFinder = shallowClone(finder);
    newFinder.pictures = listWithoutIndex(newFinder.pictures, i);
    print("Took out image " + (i+1) + "/" + l(finder.pictures));
    video_scoreRect_step(new Best, marked, finder);
  }
}