!7

concept Statement {
  S globalID = aGlobalID(), text;
  S possibleEnglishTranslation;
}

static Q q;

sS hE = "English (machine-generated)";
sS hC = "Computer Language";

p-subst {
  final SimpleCRUD<Statement> crud = new SimpleCRUD<Statement>(Statement);
  crud.renderer = func(Statement s) { litorderedmap(hE, s.possibleEnglishTranslation, hC, s.text) };
  showConceptsTable_afterUpdate.set(r {
    print("Setting width");
    tableSetColumnWidths(crud.table, hC, 100);
  });
  crud.show(programTitle());
  
  addMenu(crud.panel, "Menu!",
    "Show AI Concepts", r { startOrActivate(#1006463) },
    "Rebuild Translations", r { q.add(r { makeTranslations(true) }) });
  q = new Q(true);
  q.add(r { makeTranslations(false) });
}

svoid makeTranslations(bool all) {
  for (Statement s) {
    if (all || empty(s.possibleEnglishTranslation) || eq(s.possibleEnglishTranslation, "?"))
      cset(s, possibleEnglishTranslation := orQuestionMark2(f conceptLanguageToEnglish, s.text));
  }
}