| changeset 80768 | c7723cc15de8 |
| parent 73886 | 93ba8e3fdcdf |
| child 80914 | d97fdabd9e2b |
--- a/src/HOL/Library/Cardinality.thy Sun Aug 25 20:54:20 2024 +0200 +++ b/src/HOL/Library/Cardinality.thy Sun Aug 25 21:10:01 2024 +0200 @@ -32,6 +32,8 @@ syntax "_type_card" :: "type => nat" ("(1CARD/(1'(_')))") +syntax_consts "_type_card" == card + translations "CARD('t)" => "CONST card (CONST UNIV :: 't set)" print_translation \<open>