theorem Th19:
  a,b @@ c,d implies [a,b] ## [c,d];
