comparison operator wrong direction for tail ESS upper 95% ?

[mitzimorris]

When computing the ESS_tail, it seems to me that the statement to identify the upper tail:

https://github.com/avehtari/rhat_ess/blob/44d5b15173d724bfc028065877183d16961fd2f3/code/monitornew.R#L352

has the wrong operator - shouldn't it be:

 I95 <- (sims >= quantile(sims, 0.95)) + 0