dec2 :: Integral a => a -> Builder
dec2 n
  | n > (-10) && n < 0 = fromText "-0" <> decimal (abs n)
  | n > 0 && n < 9 = singleton '0' <> decimal n
  | otherwise = decimal n
dec2 :: Integral a => a -> Builder
dec2 n
  | n > (-10) && n < 0 = fromText "-0" <> decimal (abs n)
  | n > 0 && n < 9 = singleton '0' <> decimal n
  | otherwise = decimal n
dec2 n
  | n > (-10) && n < 0 = fromText "-0" <> decimal (abs n)
  | n > 0 && n < 9 = singleton '0' <> decimal n
  | otherwise = decimal n