-------------------------------------------------------------------------------
-- BIT_ABSTRACT.lnt -- 1.10 -- 2015/09/11 11:04:16 -- (C) Wendelin Serwe
-------------------------------------------------------------------------------

module BIT_ABSTRACT is

type BIT is
   -- bit data type abstracted to a single value
   0
   with ==, !=
end type

function 1 : BIT is
   return 0
end function

end module