| # kx = # ax, new(ax, fs), ri-closed(ri, fs, ro), ri-cons(ri, fs), kx.toSet ⊆ dom ri ⊦ dups(ax), dups(kx), ri-closed(ri[kx, ax], fs[ax, fs[ri[kx]]], ro) |
# kx = # ax, new(ax, fs), ri-closed(ri, fs, ro), ri-cons(ri, fs), kx.toSet ⊆ dom ri ⊦ dups(kx), dups(ax), ri-closed(ri[kx, ax], fs[ax, fs[ri[kx]]], ro)