aaaa!
SUBWF and SUBLW function improved