TITLE HRIVMEH

CHIP   HRIVMEH   LCA;
;PINLIST
CLK INIT HRFQ7 HRFQ8 HRFQ9 HRFQ10 HRFQ11 HRFQ12 HRFQ13 HRFQ14 HRFQ15 
      HRFQ16 HRFQ17 HRFQ18 HRFQ19 HRFQ20 HRSPY7 HRSPY8 HRSPY9 HRSPY10 HRSPY11 
      HRSPY12 HRSPY13 HRSPY14 HRSPY15 HRSPY16 HRSPY17 HRSPY18 HRSPY19 HRSPY20 
      IVADD17 IVADD18 IVDATA7 IVDATA8 IVDATA9 IVDATA10 IVDATA11 IVDATA12 IVDATA13 
      IVDATA14 IVDATA15 IVDATA16 IVDATA17 IVDATA18 IVDATA19 IVDATA20 

;To make the 2 fifos, the AM map and the SS map readable from VME

EQUATIONS

IVDATA20 = (HRFQ20 * /IVADD17 * /IVADD18
     + HRSPY20 * IVADD18
     + HRSPY20 * IVADD17);

IVDATA19 = (HRFQ19 * /IVADD17 * /IVADD18
     + HRSPY19 * IVADD18
     + HRSPY19 * IVADD17);

IVDATA18 = (HRFQ18 * /IVADD17 * /IVADD18
     + HRSPY18 * IVADD18
     + HRSPY18 * IVADD17);

IVDATA17 = (HRFQ17 * /IVADD17 * /IVADD18
     + HRSPY17 * IVADD18
     + HRSPY17 * IVADD17);

IVDATA16 = (HRFQ16 * /IVADD17 * /IVADD18
     + HRSPY16 * IVADD18
     + HRSPY16 * IVADD17);

IVDATA15 = (HRFQ15 * /IVADD17 * /IVADD18
     + HRSPY15 * IVADD18
     + HRSPY15 * IVADD17);

IVDATA14 = (HRFQ14 * /IVADD17 * /IVADD18
     + HRSPY14 * IVADD18
     + HRSPY14 * IVADD17);

IVDATA13 = (HRFQ13 * /IVADD17 * /IVADD18
     + HRSPY13 * IVADD18
     + HRSPY13 * IVADD17);

IVDATA12 = (HRFQ12 * /IVADD17 * /IVADD18
     + HRSPY12 * IVADD18
     + HRSPY12 * IVADD17);

IVDATA11 = (HRFQ11 * /IVADD17 * /IVADD18
     + HRSPY11 * IVADD18
     + HRSPY11 * IVADD17);

IVDATA10 = (HRFQ10 * /IVADD17 * /IVADD18
     + HRSPY10 * IVADD18
     + HRSPY10 * IVADD17);

IVDATA9 = (HRFQ9 * /IVADD17 * /IVADD18
     + HRSPY9 * IVADD18
     + HRSPY9 * IVADD17);

IVDATA8 = (HRFQ8 * /IVADD17 * /IVADD18
     + HRSPY8 * IVADD18
     + HRSPY8 * IVADD17);

IVDATA7 = (HRFQ7 * /IVADD17 * /IVADD18
     + HRSPY7 * IVADD18
     + HRSPY7 * IVADD17);

HRSPY20 := (HRFQ20);

HRSPY19 := (HRFQ19);

HRSPY18 := (HRFQ18);

HRSPY17 := (HRFQ17);

HRSPY16 := (HRFQ16);

HRSPY15 := (HRFQ15);

HRSPY14 := (HRFQ14);

HRSPY13 := (HRFQ13);

HRSPY12 := (HRFQ12);

HRSPY11 := (HRFQ11);

HRSPY10 := (HRFQ10);

HRSPY9 := (HRFQ9);

HRSPY8 := (HRFQ8);

HRSPY7 := (HRFQ7);

HRSPY20.CLKF = (CLK);

HRSPY19.CLKF = (CLK);

HRSPY18.CLKF = (CLK);

HRSPY17.CLKF = (CLK);

HRSPY16.CLKF = (CLK);

HRSPY15.CLKF = (CLK);

HRSPY14.CLKF = (CLK);

HRSPY13.CLKF = (CLK);

HRSPY12.CLKF = (CLK);

HRSPY11.CLKF = (CLK);

HRSPY10.CLKF = (CLK);

HRSPY9.CLKF = (CLK);

HRSPY8.CLKF = (CLK);

HRSPY7.CLKF = (CLK);