initial
  begin
    $dumpvars;
    $dumpfile ("hw109p2");
    a = 15;
    b = 7;
    borrowin = 0;	
#10 a = 1024;
    b = 1023;
#10 a = 17;
    b = -27;
#10 a = -17;
    b = 27;
    borrowin = 1;
#10 a = 1024;
    b = 10;
    borrowin = 1;
#10 a = -500;
    b = 50;
    borrowin = 0;
#10 a = 0;
    b = 0;
    borrowin = 1;
#10 a = 1;
    b = 1;
#10 $finish;
  end