theorem :: CLOSURE:13
  id (Bool A) is idempotent SetOp of A
proof
  reconsider f = id (Bool A) as SetOp of A;
  f is idempotent;
  hence thesis;
end;
