theorem
  a delta b delta c = a delta (b delta c)
proof
  thus a delta b delta c = Bottom (Bottom a [*] Bottom b [*] Bottom c) by Th22
    .= Bottom (Bottom a [*] (Bottom b [*] Bottom c)) by GROUP_1:def 3
    .= a delta (b delta c) by Th22;
end;
