Steady squares: Difference between revisions

Content added Content deleted
(→‎{{header|Haskell}}: Added another variant)
Line 467: Line 467:




or retaining the string pairs from the tests:
or retaining the string pair when the test succeeds:
<lang haskell>import Control.Monad (join)
<lang haskell>import Control.Monad (join)
import Data.Bifunctor (bimap)
import Data.Bifunctor (bimap)