mirror of
https://github.com/maciej-bendkowski/generic-boltzmann-brain.git
synced 2024-10-26 21:34:45 +03:00
Fix typo
This commit is contained in:
parent
0dd5f40452
commit
7f110aebf4
@ -282,8 +282,8 @@ data Distributions a = Distributions
|
||||
}
|
||||
deriving stock (Show)
|
||||
|
||||
mkDidtributions :: Params -> Spec (Distributions a)
|
||||
mkDidtributions params = do
|
||||
mkDistributions :: Params -> Spec (Distributions a)
|
||||
mkDistributions params = do
|
||||
let mkDistribution = MkDistribution . fromList . fromJust
|
||||
|
||||
regDdgs <- forM (Map.toList $ typeVariable params) $ \(name, v) -> do
|
||||
@ -324,7 +324,7 @@ paganiniSpec sys (Types regTypes listTypes) = do
|
||||
let (Let t) = varDefs Map.! targetType sys
|
||||
|
||||
tune t -- tune for target variable.
|
||||
mkDidtributions params
|
||||
mkDistributions params
|
||||
|
||||
paganiniSpecIO ::
|
||||
System ->
|
||||
|
Loading…
Reference in New Issue
Block a user