Theory If

Up to index of Isabelle/FOLP/ex

theory If
imports FOLP
uses [If.ML]
begin

(* $Id: If.thy,v 1.3 2006/06/06 18:42:25 wenzelm Exp $ *)

theory If
imports FOLP
begin

constdefs
  "if" :: "[o,o,o]=>o"
  "if(P,Q,R) == P&Q | ~P&R"

ML {* use_legacy_bindings (the_context ()) *}

end