equal
deleted
inserted
replaced
472 end; |
472 end; |
473 |
473 |
474 |
474 |
475 structure Clasimp = ClasimpFun |
475 structure Clasimp = ClasimpFun |
476 (structure Simplifier = Simplifier and Classical = Classical and Blast = Blast |
476 (structure Simplifier = Simplifier and Classical = Classical and Blast = Blast |
477 val addcongs = op addcongs and delcongs = op delcongs |
477 val op addcongs = op addcongs and op delcongs = op delcongs |
478 and addSaltern = op addSaltern and addbefore = op addbefore); |
478 and op addSaltern = op addSaltern and op addbefore = op addbefore); |
479 |
479 |
480 open Clasimp; |
480 open Clasimp; |
481 |
481 |
482 val HOL_css = (HOL_cs, HOL_ss); |
482 val HOL_css = (HOL_cs, HOL_ss); |