fix: tr.#642 (genus(I,"pri"))