theorem Th21:
  FinMeet(B \/ {.b.}) = FinMeet B "/\" b
proof
  thus FinMeet(B \/ {.b.}) =FinMeet (B,id 1L) "/\" (id 1L).b by Th20
    .= FinMeet B "/\" b by FUNCT_1:18;
end;
