File: sdfia04.v

package info (click to toggle)
gplcver 2.12a-1
  • links: PTS
  • area: main
  • in suites: lenny
  • size: 7,604 kB
  • ctags: 9,129
  • sloc: ansic: 126,201; sh: 1,539; makefile: 86; perl: 22
file content (26 lines) | stat: -rw-r--r-- 637 bytes parent folder | download | duplicates (4) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
 
module ffnand_test;
 wire [1:18] q, qbar;
 reg [18:1] preset, clear;

 parameter d = 10;

 ffnand #(.wide(17)) ff1[1:18](q, qbar, preset, clear);
 initial 
  begin
   #d preset[1] = 0; clear[1] = 1;
   #d preset[1] = 1;
   #d clear[1] = 0;
   #d clear[1] = 1;
  end
 initial $monitor($time,, "preset[1]=%b clear[1]=%b q[18]=%b qbar[18]=%b",
  preset[1], clear[1], q[18], qbar[18]);
endmodule

module ffnand(ffq, ffqbar, ffpreset, ffclear);
 output [1:wide + 1] ffq, ffqbar;
 input [wide + 1:1] ffpreset, ffclear;
 parameter wide = 1;
 
 nand #1 q1[1:wide + 1] (ffq, ffqbar, ffpreset),
  q2[1:wide + 1] (ffqbar, ffq, ffclear); 
endmodule