let R be finite RelStr ; :: thesis: cliquecover# R <= card the carrier of R
consider C being finite Clique-partition of R such that
A: card C = cliquecover# R by Lclico;
card C c= card the carrier of R by Partcard;
hence cliquecover# R <= card the carrier of R by A, NAT_1:40; :: thesis: verum