Commit 516a51cd authored by qlobbe's avatar qlobbe

working on quality function

parent 6466fa7f
...@@ -333,8 +333,9 @@ toPhyloQuality beta freq branches = ...@@ -333,8 +333,9 @@ toPhyloQuality beta freq branches =
$ keys freq $ keys freq
where where
pys :: Double pys :: Double
pys = sum (elems freq) pys = sum (elems freq)
-- 1 / nb de foundation
------------------------------------ ------------------------------------
-- | Constant Temporal Matching | -- -- | Constant Temporal Matching | --
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment