预期的替代方案。全部使用elm测试？

我是Elm的新手，我对Elm测试有一些疑问。我尝试在同一个测试中使用多个expect，但没有找到方法。这就是我现在所做的，但它并没有真正的表现力

suite : Test
suite =
    describe "2048-elm"
        [ test "moveLeftWithZero" <|
            \_ ->
                let
                    expectedCases =
                        [ ( [ 2, 0, 0, 2 ], [ 4, 0, 0, 0 ] )
                        , ( [ 2, 2, 0, 4 ], [ 4, 4, 0, 0 ] )
                        , ( [ 0, 0, 0, 4 ], [ 4, 0, 0, 0 ] )
                        , ( [ 0, 0, 2, 4 ], [ 2, 4, 0, 0 ] )
                        , ( [ 2, 4, 2, 4 ], [ 2, 4, 2, 4 ] )
                        , ( [ 2, 2, 2, 2 ], [ 4, 4, 0, 0 ] )
                        ]

                    toTest =
                        List.map (\expected -> ( Tuple.first expected, Main.moveLeftWithZero (Tuple.first expected) )) expectedCases
                in
                Expect.equal expectedCases toTest
        ]

套件：测试
套房=
描述“2048榆树”
[测试“用零向左移动”
让
预期病例=
[ ( [ 2, 0, 0, 2 ], [ 4, 0, 0, 0 ] )
, ( [ 2, 2, 0, 4 ], [ 4, 4, 0, 0 ] )
, ( [ 0, 0, 0, 4 ], [ 4, 0, 0, 0 ] )
, ( [ 0, 0, 2, 4 ], [ 2, 4, 0, 0 ] )
, ( [ 2, 4, 2, 4 ], [ 2, 4, 2, 4 ] )
, ( [ 2, 2, 2, 2 ], [ 4, 4, 0, 0 ] )
]
图特=
List.map（\expected->（Tuple.first应为，Main.moveLeftWithZero（Tuple.first应为））expectedCases
在里面
Expect.equal expectedCases to测试
]

---

我尝试了

Expect.all

，但它似乎没有达到我想要的效果

欢迎使用StackOverflow！请格式化您的代码，以便阅读。使用SO的代码格式，而不是Slack中使用的三重backtics。编辑器中有一个按钮用于此操作，或者您可以手动添加缩进。您能否详细说明一下

Expect的含义。所有的
似乎都不符合您的要求？