{-# OPTIONS_GHC -ddump-simpl -dsuppress-all -dno-suppress-type-signatures -dno-typeable-binds -ddump-to-file #-}
module Foo where

import Data.Vector.Unboxed (Vector, fromList)

foo :: Int -> Vector Int
foo n = fromList [1..n]