equal
deleted
inserted
replaced
191 (* method modifiers *) |
191 (* method modifiers *) |
192 |
192 |
193 val iffN = "iff"; |
193 val iffN = "iff"; |
194 |
194 |
195 val iff_modifiers = |
195 val iff_modifiers = |
196 [Args.$$$ iffN -- Scan.option Args.add -- Args.colon >> K (Method.modifier iff_add @{here}), |
196 [Args.$$$ iffN -- Scan.option Args.add -- Args.colon >> K (Method.modifier iff_add \<^here>), |
197 Args.$$$ iffN -- Scan.option Args.add -- Args.query_colon >> K (Method.modifier iff_add' @{here}), |
197 Args.$$$ iffN -- Scan.option Args.add -- Args.query_colon >> K (Method.modifier iff_add' \<^here>), |
198 Args.$$$ iffN -- Args.del -- Args.colon >> K (Method.modifier iff_del @{here})]; |
198 Args.$$$ iffN -- Args.del -- Args.colon >> K (Method.modifier iff_del \<^here>)]; |
199 |
199 |
200 val clasimp_modifiers = |
200 val clasimp_modifiers = |
201 Simplifier.simp_modifiers @ Splitter.split_modifiers @ |
201 Simplifier.simp_modifiers @ Splitter.split_modifiers @ |
202 Classical.cla_modifiers @ iff_modifiers; |
202 Classical.cla_modifiers @ iff_modifiers; |
203 |
203 |