digital-8-9-u-pa	Logical Shift Right Subroutines