!include once #1015415 // GrabbedImage

svoid ocr_teachPhraseForm(final GrabbedImage gi, final SimpleRecognizer sr, final VF1<S> onTaught) {
  analyzeGrabbedImage(gi, sr);

  // make form
  final JTextField tf = jTypeWriterTextField(ocr_joinAsGrouped(gi.groupedRecognition));
  final JCheckBox grouped = jCheckBox("grouped (" + ocrCharGroupingHelpText() + ")", true);
  final JButton btnSubmit = jbutton("Submit", r {
    S s = trim(tf.getText());
    bool group = isChecked(grouped);
    L<Rect> rects = gi.rects;
    if (group) { rects = ocr_groupRects(rects, s); s = ocr_unmerge(s); }
    saveScreenClip(gi.image);
    L<S> characterMD5s = md5OfBWImageParts(gi.image, rects);
    
    if (sr.fullSearchMap != null)
      for i over rects:
        sr.fullSearchMap.put(gi.image.clip(rects.get(i)), characterMD5s.get(i));
      
    S line = "The images " + quote(join(" ", characterMD5s)) + " are the " + (group ? "grouped " : "") + "characters " + quote(s) + ".";
    print(">> " + line);
    S imageMD5 = ocrMD5OfBWImage(gi.image);
    logQuoted(glyphTeachLog(), "[" + localDateWithSeconds() + "] Image " + imageMD5 + ": " + line);
    saveTextFile(newFile(screenClipsDir(), imageMD5 + ".line"), line);

    sr.load(line);
    disposePossiblyInternalFrame(tf);
    pcallF(onTaught, s);
  });
  onUpdateAndNow(ll(tf, grouped), r {
    S s = trim(tf.getText());
    btnSubmit.setEnabled((isChecked(grouped) ? ocr_glyphCount(s) : l(dropSpaces(s))) == l(gi.characters));
  });
  
  // show form
  growFrameSouth(50, showFormTitled("Teach",
    "Image:" , jscroll_minHeight(75, zoomedImageSurface(2, gi.image.getBufferedImage())),
    "Split:" , jscroll_minHeight(75, zoomedImageSurface(2, gi.visualizedSplit.getBufferedImage())),
    "Meaning:", tf,
    "", grouped,
    "", btnSubmit));
    
  selectAllLater(tf, 100);
}