-- Support for property checking module TProperty where -- prop> \(l::[Bool]) -> reverse (reverse l) == l -- +++ OK, passed 100 tests.