!7

static LPair<S, BWImage> images = new L;
sS word1 = "up", word2 = "down";

p-exp {
  L<File> files = audioRecordingsWithSingleClip();
  for (File f : allRecordings()) {
    S word = wordFromAudioFileName(f);
    if (!eqicOneOf(word, word1, word2)) continue;
    images.add(pair(word, bwAutoContrast(audio_clipFromLastEntryPoint(audioFileToFrequencyImage(f)))));
    print(fileName(f));
  }
  
  suckIterator(findBest_Audio_TwoWordAnalyzer1(images));
}