src/Diagrams/RubiksCube/Draw.hs
Redundant bracket Open
Open
arrowOffsets = [(0 ^& 2.1), ((-2.1) ^& 0)]
- Read upRead up
- Exclude checks
Found
[(0 ^& 2.1), ((-2.1) ^& 0)]
Perhaps
[(0 ^& 2.1), (-2.1) ^& 0]
Redundant $ Open
Open
sides = map snd $ sortBy (compare `on` fst) $
[ (-dx, r)
, (dx, l)
, (-dy, u)
, (dy, d)
- Read upRead up
- Exclude checks
Found
sortBy (compare `on` fst) $ [(-dx, r), (dx, l), (-dy, u), (dy, d)]
Perhaps
sortBy (compare `on` fst) [(-dx, r), (dx, l), (-dy, u), (dy, d)]
Redundant bracket Open
Open
arrowOffsets = [(0 ^& 2.1), ((-2.1) ^& 0)]
- Read upRead up
- Exclude checks
Found
[(0 ^& 2.1), ((-2.1) ^& 0)]
Perhaps
[0 ^& 2.1, ((-2.1) ^& 0)]