Post History
Haskell, 16 bytes f(a:b)=all(==a)b Try it online!
#1: Initial revision
by
Hakerh400
·
2021-08-11T13:01:09Z (about 5 years ago)
# [Haskell], 16 bytes
<!-- language-all: lang-hs -->
f(a:b)=all(==a)b
[Try it online!][TIO-ks7ianzp]
[Haskell]: https://www.haskell.org/
[TIO-ks7ianzp]: https://tio.run/##y0gszk7Nyfn/P00j0SpJ0zYxJ0fD1jZRM@l/bmJmnoKtQm5iga@CRkFRZl6Jgp5CmqZCSWpxSTEXmFSw5VJQiFaINtRRQKBYoJiOQrQBTMBMR8EcKgaWi/0PAA "Haskell – Try It Online"