SUBDESIGN ID7
(
	A[0..1]		: INPUT;
	q[0..3]		: OUTPUT;
)
BEGIN
	CASE A[] IS
		WHEN B"00" => q[] = B"0111";
		WHEN B"10" => q[] = B"1011";
		WHEN B"01" => q[] = B"1101";
		WHEN B"11" => q[] = B"1110";
	END CASE;
END;