TITLE "sine";

-- Version 1.0, 
-- Copyright Rune Baeverrud, August 19, 1997
-- You may use or distribute this function freely,
-- provided you do not remove this copyright notice.
-- You can download it from www.fpga.com.cn or www.pld.com.cn

INCLUDE "cosine";
INCLUDE "lpm_add_sub";

PARAMETERS
(
  POLARITY = "BIPOLAR",
  LEVEL1   = "UNREGISTERED",
  LEVEL2   = "UNREGISTERED",
  LEVEL3   = "UNREGISTERED"
);

SUBDESIGN sine
(
  SysClk       : INPUT;
  Angle[8..0]  : INPUT;
  Wave[7..0]   : OUTPUT;
)
VARIABLE
  NAngle[1..0] : NODE;
  
BEGIN
  (NAngle[],,) = LPM_ADD_SUB (, Angle[8..7], (GND,VCC),,,)
                   WITH (LPM_WIDTH=2, LPM_DIRECTION="SUB", LPM_REPRESENTATION="UNSIGNED",
                     LPM_PIPELINE=0, ONE_INPUT_IS_CONSTANT="YES");

  Wave[] = cosine (SysClk, NAngle[], Angle[6..0]) 
             WITH (POLARITY=POLARITY, LEVEL1=LEVEL1, LEVEL2=LEVEL2, LEVEL3=LEVEL3);
END;