Fix: len(r) -> len(r_intra.r)