From 8c89b55487cc16b5fb40854a79776c0de4ffc1e1 Mon Sep 17 00:00:00 2001
From: Joao P Dubas <joao.dubas+gitea@gmail.com>
Date: Sat, 5 Oct 2024 12:57:20 +0000
Subject: [PATCH] test(growth): add centile compute test

---
 test/growth/calc/centile_test.exs | 24 ++++++++++++++++++++++++
 1 file changed, 24 insertions(+)
 create mode 100644 test/growth/calc/centile_test.exs

diff --git a/test/growth/calc/centile_test.exs b/test/growth/calc/centile_test.exs
new file mode 100644
index 0000000..d43c73c
--- /dev/null
+++ b/test/growth/calc/centile_test.exs
@@ -0,0 +1,24 @@
+defmodule Growth.Calc.CentileTest do
+  @moduledoc false
+
+  use ExUnit.Case, async: true
+
+  import Growth.Data, only: [sample: 0]
+
+  doctest Growth.Calc.Centile
+
+  alias Growth.Calc.Centile
+
+  describe "compute/4" do
+    for %{key: key} = params <- sample() do
+      @tag params: params
+      test "returns the measure given a z-score and box-cox fitted values #{key}", %{
+        params: params
+      } do
+        %{zscore: zscore, measure: measure, l: l, m: m, s: s} = params
+
+        assert_in_delta Centile.compute(zscore, l, m, s), measure, 0.05
+      end
+    end
+  end
+end