theorem
  D1 "\/" D2 = D2 "\/" D1
proof
  let r;
  thus r in D1"\/"D2 implies r in D2"\/"D1
  proof
    assume r in D1"\/"D2;
    then ex p,q st r = p"\/"q & p in D1 & q in D2;
    hence thesis;
  end;
  assume r in D2"\/"D1;
  then ex p,q st r = p"\/"q & p in D2 & q in D1;
  hence thesis;
end;
