maciej-bendkowski/generic-boltzmann-brain
1
1
Fork 0
mirror of https://github.com/maciej-bendkowski/generic-boltzmann-brain.git synced 2024-08-17 08:30:30 +03:00
Code Issues Projects Releases Wiki Activity

Fix typo

Browse Source
This commit is contained in:
Maciej Bendkowski 2022-03-27 11:45:59 +02:00
parent 0dd5f40452
commit 7f110aebf4
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
internal/Data/Boltzmann/System.hs
View File

@ -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 ->