sclass MMOPattern {
  srecord Phrase(S phrase) > MMOPattern {}
  srecord And(L<MMOPattern> l) > MMOPattern {}
  srecord Or(L<MMOPattern> l) > MMOPattern {}
  srecord Not(MMOPattern p) > MMOPattern {}
}