src/HOL/ex/svc_test.thy

support nested cases;
added apply_case;
replaced make/simple by make_common/nested/simple;

(* $Id$ *)

header {* Demonstrating the interface SVC *}

theory svc_test
imports SVC_Oracle
begin

syntax
  "<->" :: "[bool, bool] => bool"    (infixr 25)

translations
  "x <-> y" => "x = y"

end