sS dropMinusFromZero(S s) {
  ret regexpFind("^-0(\\.0*)?", s) ? dropPrefix("-", s) : s;
}