equal
deleted
inserted
replaced
340 (structure Simplifier = Simplifier and Splitter = Splitter |
340 (structure Simplifier = Simplifier and Splitter = Splitter |
341 and Classical = Cla and Blast = Blast |
341 and Classical = Cla and Blast = Blast |
342 val iffD1 = iffD1 val iffD2 = iffD2 val notE = notE); |
342 val iffD1 = iffD1 val iffD2 = iffD2 val notE = notE); |
343 open Clasimp; |
343 open Clasimp; |
344 |
344 |
|
345 ML_Context.value_antiq "clasimpset" |
|
346 (Scan.succeed ("clasimpset", "Clasimp.local_clasimpset_of (ML_Context.the_local_context ())")); |
|
347 |
345 val FOL_css = (FOL_cs, FOL_ss); |
348 val FOL_css = (FOL_cs, FOL_ss); |