monitor Translator {
   action onload() {
      Translation t;
on all Translation():t addTranslation(t);
      Input i;
on all unmatched Input():i fail(i);
   }
   action addTranslation(Translation t) {
      spawn translation(t);
   }
   action translation(Translation t) {
      on all Input(t.raw) translate(t.converted);
   }
   action translate(string converted) {
      emit Output(converted);
   }
   action fail(Input i) {
      print "Cannot translate: " + i.value;
   }
}