static-tensor-0.1.0.0: tests/CoreDump/Matrix/MapColElems.dump-simpl.ghc821.golden
==================== Tidy Core ====================
2017-09-08 01:37:32.0052946 UTC
Result size of Tidy Core
= {terms: 57, types: 52, coercions: 3, joins: 0/0}
-- RHS size: {terms: 1, types: 0, coercions: 0, joins: 0/0}
CoreDump.Matrix.MapColElems.$trModule2 :: GHC.Prim.Addr#
CoreDump.Matrix.MapColElems.$trModule2
= "CoreDump.Matrix.MapColElems"#
-- RHS size: {terms: 2, types: 0, coercions: 0, joins: 0/0}
CoreDump.Matrix.MapColElems.$trModule1 :: GHC.Types.TrName
CoreDump.Matrix.MapColElems.$trModule1
= GHC.Types.TrNameS CoreDump.Matrix.MapColElems.$trModule2
-- RHS size: {terms: 1, types: 0, coercions: 0, joins: 0/0}
CoreDump.Matrix.MapColElems.$trModule4 :: GHC.Prim.Addr#
CoreDump.Matrix.MapColElems.$trModule4 = "main"#
-- RHS size: {terms: 2, types: 0, coercions: 0, joins: 0/0}
CoreDump.Matrix.MapColElems.$trModule3 :: GHC.Types.TrName
CoreDump.Matrix.MapColElems.$trModule3
= GHC.Types.TrNameS CoreDump.Matrix.MapColElems.$trModule4
-- RHS size: {terms: 3, types: 0, coercions: 0, joins: 0/0}
CoreDump.Matrix.MapColElems.$trModule :: GHC.Types.Module
CoreDump.Matrix.MapColElems.$trModule
= GHC.Types.Module
CoreDump.Matrix.MapColElems.$trModule3
CoreDump.Matrix.MapColElems.$trModule1
-- RHS size: {terms: 42, types: 37, coercions: 3, joins: 0/0}
mapColElems_
:: Matrix 4 4 Float -> (Float -> Float) -> Matrix 4 4 Float
mapColElems_
= \ (t :: Data.Tensor.Static.Tensor '[4, 4] Float)
(f :: Float -> Float) ->
case t `cast` <Co:1> of
{ TensorInstances.Tensor'4'4'Float dt dt1 dt2 dt3 dt4 dt5 dt6 dt7
dt8 dt9 dt10 dt11 dt12 dt13 dt14 dt15 ->
case f (GHC.Types.F# dt1) of { GHC.Types.F# dt17 ->
case f (GHC.Types.F# dt5) of { GHC.Types.F# dt19 ->
case f (GHC.Types.F# dt9) of { GHC.Types.F# dt21 ->
case f (GHC.Types.F# dt13) of { GHC.Types.F# dt23 ->
(TensorInstances.Tensor'4'4'Float
dt
dt17
dt2
dt3
dt4
dt19
dt6
dt7
dt8
dt21
dt10
dt11
dt12
dt23
dt14
dt15)
`cast` <Co:2>
}
}
}
}
}