equal
deleted
inserted
replaced
254 #> Thm.varifyT_global); |
254 #> Thm.varifyT_global); |
255 |
255 |
256 val export_without_context = |
256 val export_without_context = |
257 flexflex_unique NONE |
257 flexflex_unique NONE |
258 #> export_without_context_open |
258 #> export_without_context_open |
259 #> Thm.close_derivation; |
259 #> Thm.close_derivation \<^here>; |
260 |
260 |
261 |
261 |
262 (*Rotates a rule's premises to the left by k*) |
262 (*Rotates a rule's premises to the left by k*) |
263 fun rotate_prems 0 = I |
263 fun rotate_prems 0 = I |
264 | rotate_prems k = Thm.permute_prems 0 k; |
264 | rotate_prems k = Thm.permute_prems 0 k; |