{-# LANGUAGE NegativeLiterals #-}
module T10930a where

import Numeric.Natural

x = [-10 .. -3] :: [Natural]
y = [-3 .. -10] :: [Natural]