Library RoseClocks; CELLTYPE CardCounter PORTS [PhaseA, PhaseBINT[16]] InittableStateFields next: CARDINAL _ 7 EvalSimple IF PhaseA THEN next _ next + 1; IF PhaseB THEN count _ next; ENDCELLTYPE; Modulator: LAMBDA [modulus: |INTEGER|] RETURN CELLTYPE AutoName PORTS [count< INT[16], ans>INT[16]] EvalSimple IF (count MOD modulus) = 0 THEN ans _ count ENDCELLTYPE; CELLTYPE RoseTest3 Expand PhaseA, PhaseB: BOOL; count, ans: INT[16]; clkGen: ClockGen[]; counter: CardCounter[]; mod3: Modulator[3][]; mod5: Modulator[3][] ENDCELLTYPE PRoseTest3.Rose Last Edited by: Spreitzer, January 23, 1985 9:36:51 pm PST Ę ˜J™J™:J˜J˜J˜šĪkœĪb ˜Jšœœœ˜*˜Jšœœ˜—˜ Jšœœ˜Jšœœ˜—Jš œ˜ —J˜š ž œœ œœœ ˜?Jšœ œ œ˜#˜ Jšœœœ ˜+—Jš œ˜ —J˜šœž ˜˜Jšœœ˜Jšœ œ˜J˜J˜Jšœ˜Jšœ˜—Jš ˜ ——…—&ƒ