;************************************************************
; Listing 1 - Verilog program to read a register's value
;
; "A Verilog programming-language-interface primer,"
; EDN, September 2, 1999, pg 75.
; http://www.ednmag.com/ednmag/reg/090299/18ms525.htm
;************************************************************
module my_module;
reg [3:0] r1;
   initial 
   begin
           r1 = 4'ha;
      #100 $print_reg(r1);
      #100 r1 = 4'h3;
      #100 $print_reg(r1);
      #100 $finish;
   end
endmodule