// shift  test component bshift.e

signal a[32] <= #h01234567;
signal b[32];
signal shft[5] <= #b00100;
signal left <= #b1; // 1 for left, 0 for right
signal log <= #b1;  // 1 for logical, 0 for right arithmetic
circuits
  s0 use bshift(a, left, log, shft, b);
end circuits;