initial
  begin
    $dumpvars;
    $dumpfile ("hw3_09p2");
    A = 0;
    B = 0;
    CODE = 1;
#10 A = 25;
    B = 14;
#10 CODE = 2;
    A = -27;
    B = -11;
#10 CODE = 3;
    A = 42;
    B = -17;
#10 CODE = 4;
    A = 16'haaaa;
    B = 3;
#10 CODE = 5;
    A = 16'hffff;
    B = 9;
#10 CODE = 6;
    A = 16'haaaa;
    B = 16'hff00;
#10 CODE = 1;
    A = 1024;
    B = 1;
#10 $finish;
  end