-- test of RAM
library syst;
use syst.TSL.all;
use syst.SYS.all;

entity vRAMR is 
end vRAMR;

architecture TESTR of vRAMR is
signal r,w,s:BIT;
signal d:WORD;
signal a:ADDR;
component RAMR
  generic(decdel,wsdel,ddel,rdel,disdel: POSITIVE);
  port(data:inout WORD;address:in ADDR;read,write,cs:BIT);
end component;
for iRAMR:RAMR use entity work.RAMR(REALISTIC);
begin
 iRAMR:RAMR generic map(10,10,10,20,10)
 port map(d,a,r,w,s);
vP: process
  begin
  a<="00001","10000" after 30ns,"00001" after 50ns;
  d<="10101010","ZZZZZZZZ" after 40ns;
  w<='1' after 20ns,'0' after 30ns;
  s<='1' after 10ns,'0' after 40ns,'1' after 60ns,
     '0' after 100ns,'1' after 120ns,'0' after 150ns;
  r<='1' after 70ns, '0' after 90ns;
  wait;
  end process vP;
end TESTR;

<div align="center"><br /><script type="text/javascript"><!--
google_ad_client = "pub-7293844627074885";
//468x60, Created at 07. 11. 25
google_ad_slot = "8619794253";
google_ad_width = 468;
google_ad_height = 60;
//--></script>
<script type="text/javascript" src="http://pagead2.googlesyndication.com/pagead/show_ads.js">
</script><br />&nbsp;</div>