Compare commits

..

No commits in common. "6e9b9a4827fa6280ddbbdf0546f96444208a1a6b" and "6ca07694e6bbef87311d74fad71c32fd4bfae7b0" have entirely different histories.

2 changed files with 2 additions and 3 deletions

View File

@ -52,7 +52,7 @@
# Programs you want to make available in the shell.
# Default programs can be disabled by setting to 'null'
tools = hp: { ormolu = hp.ormolu; threadscope = hp.threadscope; };
# tools = hp: { fourmolu = hp.fourmolu; ghcid = null; };
# Check that haskell-language-server works
# hlsCheck.enable = true; # Requires sandbox to be disabled

View File

@ -58,7 +58,6 @@ gpLoop' pushArgs generation evaluations population indexedTrainingData = do
print "Incomplete Run, saving the best so far."
| otherwise = gpLoop' pushArgs (succ generation)
(evaluations + (populationSize pushArgs * length (fst $ trainingData pushArgs)) + (if generation `mod` downsampleParentsGens pushArgs == 0 then length parentReps * (length (fst indexedTrainingData) - length (fst $ trainingData pushArgs)) else 0) + (if bestIndPassesDownsample then length (fst indexedTrainingData) - length (fst $ trainingData pushArgs) else 0))
(if elitism then )
nextAction
where
-- \| This will have downsampling added to it later.
@ -78,4 +77,4 @@ gpLoop' pushArgs generation evaluations population indexedTrainingData = do
bestIndPassesDownsample = False -- TODO: fix this later
epsilonPushArgs :: PushArgs
epsilonPushArgs = pushArgs {epsilons = Nothing} -- TODO: And this
--gpLoop' _ _ _ _ _ = error "How did this happen?"
gpLoop' _ _ _ _ _ = error "How did this happen?"