From: Julien Moutinho <julm+literate-phylomemy@sourcephile.fr>
Date: Thu, 11 Sep 2025 01:04:10 +0000 (+0200)
Subject: explanation(scale): fix comment
X-Git-Url: https://git.sourcephile.fr/literate-phylomemy.git/commitdiff_plain

explanation(scale): fix comment
---

diff --git a/src/Phylomemy/TemporalMatching.hs b/src/Phylomemy/TemporalMatching.hs
index ea8cb21..2528e5c 100644
--- a/src/Phylomemy/TemporalMatching.hs
+++ b/src/Phylomemy/TemporalMatching.hs
@@ -283,8 +283,8 @@ type Scale = Int -- > 0
 -- returns the successive results of calling `mstSplit` on the given `MaximalSpanningTree`s in @(msf)@
 -- until each one of them is a single node.
 -- Even though the greatest `Scale`s may be different for each `MaximalSpanningTree` of @(msf)@,
--- the result are grouped by `Scale` then by `MaximalSpanningTree`,
--- which enabled to have a maximal `Scale` for the whole `msf`.
+-- the results are grouped by `Scale` then by `MaximalSpanningTree`,
+-- which enables to have a maximal `Scale` for the whole `msf`.
 mstScales ::
   forall range cluster.
   Ord range =>