static S ai_simplifyNP(S s) {
  L<S> tok = nlTok(s);
  
  if (eqicGet(tok, 1, "the")
    && isNoun(get(tok, 3))
    && eqicGet(tok, 5, "of"))
    ret joinTakeFirst(tok, 4);
    
  ret s;
}