SUBDESIGN w400_eqn
(
	R_W		 		:  INPUT;   % R/W Line %
	LSTRBn			:  INPUT;

	A[15..0]		:  INPUT;  % Demultiplexed address bits % 
	
	w400			:  OUTPUT;
)


BEGIN

	if ((A[15..0] == H"0400") & (R_W == GND)) THEN
		w400 = VCC;
	ELSE
		w400 = GND;
	END IF;

END;