theorem
  a [= b implies Bottom b [= Bottom a by Th13;
