challenge-120/lance-wicks/elm/src/Bit.elm


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15

module Bit exposing (..)

import Binary

swap num =
          num
            |> Binary.fromDecimal
            |> Binary.ensureSize 8
            |> Binary.chunksOf 2
            |> List.map Binary.toIntegers
            |> List.map List.reverse
            |> List.map Binary.fromIntegers
            |> Binary.concat
            |> Binary.toDecimal