module Hopfield.Benchmark where import Hopfield.Hopfield import Hopfield.Clusters import Hopfield.Experiments.ClusterExperiments bench1 :: IO () bench1 = print =<< experimentUsingT1NoAvg Hebbian 10 10 bench2 :: IO () bench2 = print =<< performAndPrint1 T2 Hebbian 20 5 0.0 0.5 0.5 1