!7

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

p-noconsole {
  SimpleCRUD crud = simpleCRUD(programTitle(), Statement);
  addMenu(crud.panel, "Menu!", "Show AI Concepts", r { startOrActivate(#1006463) });
  thread "Make Translations" { makeTranslations(); }
}

svoid makeTranslations {
  for (Statement s) {
    if (empty(s.possibleEnglishTranslation))
      cset(s, possibleEnglishTranslation := orQuestionMark2(f conceptsLanguageToEnglish, s.text));
  }
}