verilog VPI Call Back
always @posedge(X)
     begin
        $pli
     end