--- a/ProgTutorial/Tactical.thy Mon Feb 25 00:33:48 2013 +0000
+++ b/ProgTutorial/Tactical.thy Fri Mar 01 00:49:15 2013 +0000
@@ -1774,7 +1774,8 @@
ML %linenosgray{*fun fail_simproc simpset redex =
let
val ctxt = Simplifier.the_context simpset
- val _ = pwriteln (Pretty.block [Pretty.str "The redex: ", pretty_cterm ctxt redex])
+ val _ = pwriteln (Pretty.block
+ [Pretty.str "The redex: ", pretty_cterm ctxt redex])
in
NONE
end*}
@@ -1846,7 +1847,8 @@
ML %grayML{*fun fail_simproc' simpset redex =
let
val ctxt = Simplifier.the_context simpset
- val _ = pwriteln (Pretty.block [Pretty.str "The redex:", pretty_term ctxt redex])
+ val _ = pwriteln (Pretty.block
+ [Pretty.str "The redex:", pretty_term ctxt redex])
in
NONE
end*}
Binary file progtutorial.pdf has changed