let Y be Subset of X; :: thesis: Y is c=-linear
let x, y be set ; :: according to ORDINAL1:def 9 :: thesis: ( not x in Y or not y in Y or x,y are_c=-comparable )
assume ( x in Y & y in Y ) ; :: thesis: x,y are_c=-comparable
hence x,y are_c=-comparable by ORDINAL1:def 9; :: thesis: verum