TYPE register IS ARRAY (15 DOWNTO 0) OF BIT;
VARIABLE X: register; VARIABLE Y: BIT; Y := X(4); -- Y gets value of 5th element from the right