theorem
  the_rank_of Rank A = A
proof
 for B st Rank A c= Rank B holds A c= B by Th37;
  hence thesis by Def9;
end;
