src/Provers/clasimp.ML
changeset 64556 851ae0e7b09c
parent 60943 7cf1ea00a020
child 69593 3dda49e08b9d
equal deleted inserted replaced
64555:628b271c5b8b 64556:851ae0e7b09c
   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