test: add complete transforms sequence tests.

MTES-MCT · Jan 14, 2025 · 6b17d9e · 6b17d9e
1 parent f6b83ee
commit 6b17d9e
Show file tree

Hide file tree

Showing 2 changed files with 40 additions and 1 deletion.
diff --git a/src/Data/Component.elm b/src/Data/Component.elm
@@ -197,7 +197,7 @@ applyTransforms transforms (Results materialResults) =
                     transformImpacts =
                         Impact.sumImpacts
                             [ process.impacts
-                                -- Note: impacts are always  computed from input mass
+                                -- Note: impacts are always computed from input mass
                                 |> Impact.multiplyBy (Mass.inKilograms mass)
 
                             -- FIXME: we should also add elec and heat impacts, but using what

diff --git a/tests/Data/ComponentTest.elm b/tests/Data/ComponentTest.elm
@@ -112,6 +112,45 @@ suite =
                             |> Expect.within (Expect.Absolute 0.00001) 30
                         )
                     ]
+                , let
+                    results =
+                        Component.Results
+                            { impacts = Impact.empty |> Impact.insertWithoutAggregateComputation Definition.Ecs (Unit.impact 100)
+                            , items = []
+                            , mass = Mass.kilogram
+                            }
+                            |> Component.applyTransforms
+                                [ { fading
+                                    | waste = Split.half
+                                    , impacts =
+                                        fading.impacts
+                                            |> Impact.insertWithoutAggregateComputation Definition.Ecs (Unit.impact 10)
+                                  }
+                                , { fading
+                                    | waste = Split.half
+                                    , impacts =
+                                        fading.impacts
+                                            |> Impact.insertWithoutAggregateComputation Definition.Ecs (Unit.impact 20)
+                                  }
+                                ]
+                  in
+                  describe "impacts & waste"
+                    -- Note: impacts are always computed from input mass
+                    -- 100 + (1kg * 10) + (0.5kg * 20) = 120
+                    [ asTest "should handle impacts+waste when applying transforms: impacts"
+                        (Component.extractImpacts results
+                            |> Impact.getImpact Definition.Ecs
+                            |> Unit.impactToFloat
+                            |> Expect.within (Expect.Absolute 0.00001) 120
+                        )
+
+                    -- (1kg * 0.5) * 0.5 == 0.25
+                    , asTest "should handle impacts+waste when applying transforms: mass"
+                        (Component.extractMass results
+                            |> Mass.inKilograms
+                            |> Expect.within (Expect.Absolute 0.00001) 0.25
+                        )
+                    ]
                 ]
             , describe "compute"
                 [ asTest "should compute results from decoded component items"