Plan 9 from Bell Labs’s /usr/web/sources/contrib/fernan/nhc98/src/prelude/Ix/Ix_0.hs
module Ix(Ix(..)) where import CIx instance Ix () where range ((),()) = [()] index ((),()) () = 0 inRange ((),()) () = True