-- | Create a machine single precision literal expression of type @Float#@ from a @Float@.
-- If you want an expression of type @Float@ use 'MkCore.mkFloatExpr'
mkFloatLitFloat :: Float -> Expr b

mkFloatLit      f = Lit (mkMachFloat f)
mkFloatLitFloat :: Float -> Expr b
mkFloatLit      f = Lit (mkMachFloat f)
mkFloatLit      f = Lit (mkMachFloat f)