packages feed

static-tensor-0.1.0.0: tests/CoreDump/Vector/Normalize.dump-simpl.ghc821.golden

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

Result size of Tidy Core
  = {terms: 52, types: 20, coercions: 8, joins: 0/0}

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

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

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

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

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

-- RHS size: {terms: 37, types: 9, coercions: 8, joins: 0/0}
normalize_ :: Vector 4 Float -> NormalizedVector 4 Float
normalize_
  = \ (v :: Vector 4 Float) ->
      case v `cast` <Co:1> of
      { TensorInstances.Tensor'4'Float dt dt1 dt2 dt3 ->
      case GHC.Prim.divideFloat#
             1.0#
             (GHC.Prim.sqrtFloat#
                (GHC.Prim.plusFloat#
                   (GHC.Prim.plusFloat#
                      (GHC.Prim.plusFloat#
                         (GHC.Prim.timesFloat# dt3 dt3) (GHC.Prim.timesFloat# dt2 dt2))
                      (GHC.Prim.timesFloat# dt1 dt1))
                   (GHC.Prim.timesFloat# dt dt)))
      of wild4
      { __DEFAULT ->
      (TensorInstances.Tensor'4'Float
         (GHC.Prim.timesFloat# dt wild4)
         (GHC.Prim.timesFloat# dt1 wild4)
         (GHC.Prim.timesFloat# dt2 wild4)
         (GHC.Prim.timesFloat# dt3 wild4))
      `cast` <Co:7>
      }
      }