:: [Bool] -> Bool package:harpie

Test whether an index is a diagonal one.
>>> isDiag [2,2,2]
True

>>> isDiag [1,2]
False