src/HOL/AxClasses/Tutorial/Product.thy

changed 'opaque' option to 'open' (opaque is default);
renamed 'mk_cases_tac' to 'ind_cases';

(*  Title:      HOL/AxClasses/Tutorial/Product.thy
    ID:         $Id$
    Author:     Markus Wenzel, TU Muenchen
*)

theory Product = Main:;

axclass
  product < "term";
consts
  product :: "'a::product => 'a => 'a"    (infixl "[*]" 70);

instance bool :: product;
  by intro_classes;
defs (overloaded)
  product_bool_def: "x [*] y == x & y";

end;