module TYPES is

type MSG is 
   range 0...4 of NAT
end type

end module