theorem :: ROUGHIF2:10
for R being finite Approximation_Space
for X, Y being Subset of R st X <> {} holds
(CMap (kappa R)) . (X,Y) = kappa (X,(Y `))