module Rattletrap.Decode.Float32le
  ( decodeFloat32le
  , decodeFloat32leBits
  )
where

import Rattletrap.Decode.Common
import Rattletrap.Type.Float32le

decodeFloat32le :: Decode Float32le
decodeFloat32le :: Decode Float32le
decodeFloat32le = Float -> Float32le
Float32le (Float -> Float32le) -> Get Float -> Decode Float32le
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Get Float
getFloatle

decodeFloat32leBits :: DecodeBits Float32le
decodeFloat32leBits :: DecodeBits Float32le
decodeFloat32leBits = Decode Float32le -> Int -> DecodeBits Float32le
forall a. Decode a -> Int -> DecodeBits a
toBits Decode Float32le
decodeFloat32le Int
4