rowan.a.tl/HushGP
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

fix warning

Browse Source
This commit is contained in:
Rowan Torbitzky-Lane 2025-03-07 13:11:36 -06:00
parent aca190ec0f
commit c68ff2d329
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/HushGP/Instructions/Utility.hs
View File

@ -283,7 +283,7 @@ mode xs =
-- |Utility Function: Calculates the 2-norm of a list and returns it. -- |Utility Function: Calculates the 2-norm of a list and returns it.
twoNorm :: (Floating a) => [a] -> a twoNorm :: (Floating a) => [a] -> a
twoNorm xs = sqrt $ sum $ map (^ 2) xs twoNorm xs = sqrt $ sum $ map (^ (2 :: Int)) xs
-- |Utility Function: Takes in any value and returns 0. Used primarily to return 0 -- |Utility Function: Takes in any value and returns 0. Used primarily to return 0
-- when a function such as maximum is operating on an empty list. -- when a function such as maximum is operating on an empty list.