module YamlUnscrambler.Util.Word8 where

import YamlUnscrambler.Prelude

lowercaseInAscii :: Word8 -> Word8
lowercaseInAscii :: Word8 -> Word8
lowercaseInAscii Word8
a =
  if Word8
65 Word8 -> Word8 -> Bool
forall a. Ord a => a -> a -> Bool
<= Word8
a Bool -> Bool -> Bool
&& Word8
a Word8 -> Word8 -> Bool
forall a. Ord a => a -> a -> Bool
<= Word8
90
    Bool -> Bool -> Bool
|| Word8
192 Word8 -> Word8 -> Bool
forall a. Ord a => a -> a -> Bool
<= Word8
a Bool -> Bool -> Bool
&& Word8
a Word8 -> Word8 -> Bool
forall a. Ord a => a -> a -> Bool
<= Word8
214
    Bool -> Bool -> Bool
|| Word8
216 Word8 -> Word8 -> Bool
forall a. Ord a => a -> a -> Bool
<= Word8
a Bool -> Bool -> Bool
&& Word8
a Word8 -> Word8 -> Bool
forall a. Ord a => a -> a -> Bool
<= Word8
222
    then Word8
a Word8 -> Word8 -> Word8
forall a. Num a => a -> a -> a
+ Word8
32
    else Word8
a