testGroup "p. 78, Section (2.4) Properties" [
tp "c3000 identity" TT.prop_c3000_identity,
tp "c2100 identity" TT.prop_c2100_identity,
- tp "c1110 _identity" TT.prop_c1110_identity]
+ tp "c1110 identity" TT.prop_c1110_identity]
p78_25_properties :: Test.Framework.Test
p78_25_properties =
tp "c0120 identity1" TC.prop_c0120_identity1,
tp "c0120 identity2" TC.prop_c0120_identity2,
tp "c0120 identity3" TC.prop_c0120_identity3,
---
--- These repeats of the previous test are failing at the moment.
---
--- tp "c0120 identity4" TC.prop_c0120_identity4,
--- tp "c0120 identity5" TC.prop_c0120_identity5,
--- tp "c0120 identity6" TC.prop_c0120_identity6,
+ tp "c0120 identity4" TC.prop_c0120_identity4,
+ tp "c0120 identity5" TC.prop_c0120_identity5,
+ tp "c0120 identity6" TC.prop_c0120_identity6,
+ tp "c0120 identity7" TC.prop_c0120_identity7,
tp "c0210 identity1" TC.prop_c0210_identity1,
tp "c0300 identity1" TC.prop_c0300_identity1,
tp "c1110 identity" TC.prop_c1110_identity,