shrp Operation Font Conventions
if (PR[qp]) {
check_target_register
;

temp1 = shift_right_unsigned(GR[r3], count6);
temp2 = GR[r2] << (64 - count6);
GR[r1] = zero_ext(temp1, 64 - count6) | temp2;
GR[r1].nat = GR[r2].nat || GR[r3].nat;
}}