reconsider mm = m as Element of NAT by ORDINAL1:def 12;
mm -tuples_on X c= X * by FINSEQ_2:134;
hence for b1 being set st b1 = (m -tuples_on X) \ (X *) holds
b1 is empty ; :: thesis: verum