如何模拟ImagePicker

Question

我使用以下软件包：image picker 现在，我有以下代码行：

evensAndOdds : List a -> ( List a, List a )
evensAndOdds input =
    case input of
        [] ->
            ( [], [] )

        [ even ] ->
            ( [ even ], [] )

        [ even, odd ] :: tail ->
            let
                ( tailEvens, tailOdds ) =
                    evensAndOdds tail
            in
            ( even :: tailEvens, odd :: tailOdds )

我想在测试中模拟，但是我找不到方法。