static int ymd_month(S ymd) {
  ret parseInt(substring(ymd, 4, 6));
}