sbool shortClassNameIs(O o, S name) {
  ret eq(shortClassName(o), name);
}

sbool mapMethodLike shortClassNameIs(S name, O o) {
  ret shortClassNameIs(o, name);
}