==================== Tidy Core ====================
2017-09-08 01:36:24.2793398 UTC

Result size of Tidy Core
  = {terms: 44, types: 67, coercions: 1, joins: 0/0}

-- RHS size: {terms: 1, types: 0, coercions: 0, joins: 0/0}
CoreDump.Tensor.GetSliceElems.$trModule4 :: GHC.Prim.Addr#
CoreDump.Tensor.GetSliceElems.$trModule4 = "main"#

-- RHS size: {terms: 2, types: 0, coercions: 0, joins: 0/0}
CoreDump.Tensor.GetSliceElems.$trModule3 :: GHC.Types.TrName
CoreDump.Tensor.GetSliceElems.$trModule3
  = GHC.Types.TrNameS CoreDump.Tensor.GetSliceElems.$trModule4

-- RHS size: {terms: 1, types: 0, coercions: 0, joins: 0/0}
CoreDump.Tensor.GetSliceElems.$trModule2 :: GHC.Prim.Addr#
CoreDump.Tensor.GetSliceElems.$trModule2
  = "CoreDump.Tensor.GetSliceElems"#

-- RHS size: {terms: 2, types: 0, coercions: 0, joins: 0/0}
CoreDump.Tensor.GetSliceElems.$trModule1 :: GHC.Types.TrName
CoreDump.Tensor.GetSliceElems.$trModule1
  = GHC.Types.TrNameS CoreDump.Tensor.GetSliceElems.$trModule2

-- RHS size: {terms: 3, types: 0, coercions: 0, joins: 0/0}
CoreDump.Tensor.GetSliceElems.$trModule :: GHC.Types.Module
CoreDump.Tensor.GetSliceElems.$trModule
  = GHC.Types.Module
      CoreDump.Tensor.GetSliceElems.$trModule3
      CoreDump.Tensor.GetSliceElems.$trModule1

-- RHS size: {terms: 29, types: 47, coercions: 1, joins: 0/0}
getSliceElems_ :: Tensor '[2, 3, 4] Float -> [Float]
getSliceElems_
  = \ (w :: Tensor '[2, 3, 4] Float) ->
      case w `cast` <Co:1> of
      { TensorInstances.Tensor'2'3'4'Float ww1 ww2 ww3 ww4 ww5 ww6 ww7
                                           ww8 ww9 ww10 ww11 ww12 ww13 ww14 ww15 ww16 ww17 ww18 ww19
                                           ww20 ww21 ww22 ww23 ww24 ->
      GHC.Types.:
        @ Float
        (GHC.Types.F# ww1)
        (GHC.Types.:
           @ Float
           (GHC.Types.F# ww2)
           (GHC.Types.:
              @ Float
              (GHC.Types.F# ww5)
              (GHC.Types.:
                 @ Float
                 (GHC.Types.F# ww6)
                 (GHC.Types.:
                    @ Float
                    (GHC.Types.F# ww13)
                    (GHC.Types.:
                       @ Float
                       (GHC.Types.F# ww14)
                       (GHC.Types.:
                          @ Float
                          (GHC.Types.F# ww17)
                          (GHC.Types.:
                             @ Float (GHC.Types.F# ww18) (GHC.Types.[] @ Float))))))))
      }