src/HOL/Tools/Nitpick/nitpick_hol.ML
changeset 42680 b6c27cf04fe9
parent 42679 223f01b32f17
child 42697 9bc5dc48f1a5
     1.1 --- a/src/HOL/Tools/Nitpick/nitpick_hol.ML	Wed May 04 18:48:25 2011 +0200
     1.2 +++ b/src/HOL/Tools/Nitpick/nitpick_hol.ML	Wed May 04 19:35:48 2011 +0200
     1.3 @@ -980,7 +980,7 @@
     1.4                      handle TYPE ("Nitpick_HOL.card_of_type", _, _) =>
     1.5                             default_card)
     1.6  
     1.7 -(* Similar to similarly named function in "Sledgehammer_ATP_Translate". *)
     1.8 +(* Similar to "Sledgehammer_ATP_Translate.tiny_card_of_type". *)
     1.9  fun bounded_exact_card_of_type hol_ctxt finitizable_dataTs max default_card
    1.10                                 assigns T =
    1.11    let