equal
deleted
inserted
replaced
299 for the class @{class eq} (by command @{command code_class}) and its operation |
299 for the class @{class eq} (by command @{command code_class}) and its operation |
300 @{const HOL.eq} |
300 @{const HOL.eq} |
301 *} |
301 *} |
302 |
302 |
303 code_class %quotett eq |
303 code_class %quotett eq |
304 (Haskell "Eq" where "HOL.eq" \<equiv> "(==)") |
304 (Haskell "Eq") |
305 |
305 |
306 code_const %quotett "op =" |
306 code_const %quotett "op =" |
307 (Haskell infixl 4 "==") |
307 (Haskell infixl 4 "==") |
308 |
308 |
309 text {* |
309 text {* |