==================== Tidy Core ==================== 2017-09-08 01:36:44.9537 UTC Result size of Tidy Core = {terms: 86, types: 87, coercions: 25, joins: 0/0} -- RHS size: {terms: 69, types: 39, coercions: 11, joins: 0/0} CoreDump.Matrix.MultMatVec.multMatVec_1 :: Data.Tensor.Static.Tensor '[4, 4] Float -> Data.Tensor.Static.Tensor '[4] Float -> Data.Tensor.Static.Tensor (MatrixMultDims '[4, 4] '[4]) Float CoreDump.Matrix.MultMatVec.multMatVec_1 = \ (m1 :: Data.Tensor.Static.Tensor '[4, 4] Float) (v :: Data.Tensor.Static.Tensor '[4] Float) -> case m1 `cast` of { TensorInstances.Tensor'4'4'Float dt dt1 dt2 dt3 dt4 dt5 dt6 dt7 dt8 dt9 dt10 dt11 dt12 dt13 dt14 dt15 -> case v `cast` of { TensorInstances.Tensor'4'Float dt16 dt17 dt18 dt19 -> (TensorInstances.Tensor'4'Float (GHC.Prim.plusFloat# (GHC.Prim.timesFloat# dt dt16) (GHC.Prim.plusFloat# (GHC.Prim.timesFloat# dt1 dt17) (GHC.Prim.plusFloat# (GHC.Prim.timesFloat# dt2 dt18) (GHC.Prim.timesFloat# dt3 dt19)))) (GHC.Prim.plusFloat# (GHC.Prim.timesFloat# dt4 dt16) (GHC.Prim.plusFloat# (GHC.Prim.timesFloat# dt5 dt17) (GHC.Prim.plusFloat# (GHC.Prim.timesFloat# dt6 dt18) (GHC.Prim.timesFloat# dt7 dt19)))) (GHC.Prim.plusFloat# (GHC.Prim.timesFloat# dt8 dt16) (GHC.Prim.plusFloat# (GHC.Prim.timesFloat# dt9 dt17) (GHC.Prim.plusFloat# (GHC.Prim.timesFloat# dt10 dt18) (GHC.Prim.timesFloat# dt11 dt19)))) (GHC.Prim.plusFloat# (GHC.Prim.timesFloat# dt12 dt16) (GHC.Prim.plusFloat# (GHC.Prim.timesFloat# dt13 dt17) (GHC.Prim.plusFloat# (GHC.Prim.timesFloat# dt14 dt18) (GHC.Prim.timesFloat# dt15 dt19))))) `cast` } } -- RHS size: {terms: 1, types: 0, coercions: 14, joins: 0/0} multMatVec_ :: Matrix 4 4 Float -> Vector 4 Float -> Vector 4 Float multMatVec_ = CoreDump.Matrix.MultMatVec.multMatVec_1 `cast` -- RHS size: {terms: 1, types: 0, coercions: 0, joins: 0/0} CoreDump.Matrix.MultMatVec.$trModule2 :: GHC.Prim.Addr# CoreDump.Matrix.MultMatVec.$trModule2 = "CoreDump.Matrix.MultMatVec"# -- RHS size: {terms: 2, types: 0, coercions: 0, joins: 0/0} CoreDump.Matrix.MultMatVec.$trModule1 :: GHC.Types.TrName CoreDump.Matrix.MultMatVec.$trModule1 = GHC.Types.TrNameS CoreDump.Matrix.MultMatVec.$trModule2 -- RHS size: {terms: 1, types: 0, coercions: 0, joins: 0/0} CoreDump.Matrix.MultMatVec.$trModule4 :: GHC.Prim.Addr# CoreDump.Matrix.MultMatVec.$trModule4 = "main"# -- RHS size: {terms: 2, types: 0, coercions: 0, joins: 0/0} CoreDump.Matrix.MultMatVec.$trModule3 :: GHC.Types.TrName CoreDump.Matrix.MultMatVec.$trModule3 = GHC.Types.TrNameS CoreDump.Matrix.MultMatVec.$trModule4 -- RHS size: {terms: 3, types: 0, coercions: 0, joins: 0/0} CoreDump.Matrix.MultMatVec.$trModule :: GHC.Types.Module CoreDump.Matrix.MultMatVec.$trModule = GHC.Types.Module CoreDump.Matrix.MultMatVec.$trModule3 CoreDump.Matrix.MultMatVec.$trModule1