abstract sclass ChessOCR_DynTestPieceRecognizers extends DynSingleFunctionWithPrintLog {
  replace Recognizer with ChessPieceRecognizer.
  
  S scoreModule;
  transient L<Result> results = syncList();
  new Best<S> best;
  
  transient new L<TestImage> images;
  transient JProgressBar progressBar;
  transient O onRecognition; // voidfunc(Recognizer, TestImage, Pair<S, Double> out)
  
  // result for recognizer
  srecord noeq Result(
    Recognizer recognizer,
    double score, Map<TestResult, Double> individualScores) {}
    
  // individual test result
  srecord noeq TestResult(
    TestImage test,
    S pieceFound,
    double confidence
  ) {}
  
  srecord noeq TestImage(S caseName, BufferedImage img, S piece) {
    toString { ret caseName + ": " + piece; }
  }
  
  void doIt {
    prepare();
    results.clear();
    dm_call(scoreModule, 'clear);
    testRecognizers();
  }
  
  // override me
  void testRecognizers {
    new ChessPieceRecognizer rec;
    rec.version = 2;
    rec.load();
    testRecognizer(rec);
    testRecognizer(chessOCR_defaultPieceRecognizer());
  }
  
  void prepare {
    if (empty(images)) loadImages();
    
    if (!dm_moduleExists(scoreModule))
      setField(scoreModule := dm_showNewModule("#1024827/ScoreMatrix"));
    else
      dm_activateModule(scoreModule);
  }

  Result scoreRecognizer(S name, Recognizer rec) {
    Result result = new(rec, 0, new LinkedHashMap);
    
    try {
      new Scorer scorer;
      for (TestImage img : images) {
        Pair<S, Double> out = rec.recognize(img.img);
        callF(onRecognition, rec, img, out);
        bool ok = eqic(pairA(out), img.piece);
        scorer.add(ok);
        result.individualScores.put(new TestResult(img, out.a, out.b), ok ? 1.0 : 0.0);
      }
    
      print(scorer);
      result.score = scorer.score();
    } catch print e {
      print("RECOGNIZER TOTAL FAIL");
    }
    
    ret result;
  }
  
  void loadImages {
    for (unpair S piece, BufferedImage img :
      //chessOCR_squareImagesCollectorFromAGIBlue().allImages()
      map(p -> pair(p.b, loadImage2(p.a)), chessPieceImagesFromAGIBlue())
    ) {
      images.add(new TestImage(md5OfBufferedImage(img), img, piece));
    }
    print("Loading done");
  }
  
  start { setFunctionName("Run tests"); }
  
  visual centerAndSouthWithMargin(super, withMargin(progressBar = jProgressBarWithText()));
  
  // API
  
  void testRecognizer(Recognizer rec) {
    S name = str(rec);
    prepare();
    long time = sysNow();
    Result r = scoreRecognizer(name, rec);
    time = sysNow()-time;
    print("Score for " + name + ": " + r.score);
    results.add(r);
    if (best.put(name, r.score))
      print("NEW BEST!");
    change();
    dm_call(scoreModule, 'add, dm_call(scoreModule, 'newEntry,
      r.recognizer, r.score, renderElapsedTimePleasantly(time), r.individualScores));
  }
}