begin

	$monitor($time,,,"a=%b,b=%b,c=%b,g=%b,i=%b,k=%b,r=%b,s=%b,q=%b,e=%b,f=%b",a,b,c,g,i,k,r,s,q,e,f);
        $dumpvars;
        $dumpfile("h91booleq.dump");
        
        a=0;b=0;c=0;g=0;i=0;k=0;r=0;s=0;q=0;
        
        #10 a = 1; r = 1;
        #10 a = 0; r = 0; g = 1;
        #10 s = 0; c = 1; g = 0;
        #10 c = 0; i = 1; s = 1;
        #20 $finish;
    end