z_cdiv_q_2exp

procedure z_cdiv_q_2exp(

  var q: MPInteger;

  var n: MPInteger;

  b: valuint

);

function z_cdiv_q_2exp(

  var n: MPInteger;

  b: valuint

):MPInteger;