
; LOGICAL INCLUSIVE OR
; ********************
; DIGITAL COMPUTER CONTROLS,INC.
; 116-0022A
;
; COMPUTES THE LOGICAL INCLUSIVE OR OF 
; TWO UNSIGNED NUMBERS
; INPUT:        A IN ACO, B IN AC1
; OUTPUT:       A .OR. B IN AC0
; CALLING SEQUENCE:
;       JSR     .0R
;       RETURN
; DESTROYED:    AC0
; UNCHANGED:    AC1, AC2, AC3, CARRY
; METHOD:       A .OR. B = .NOT.B .AND. A + B
	.REL	0
	.TITL	.OR
.OR:    COM 1,1         ; .NOT. B
        AND 1,0         ; A .AND. .NOT. B
        ADC 1,0         ; .NOT. B .AND. A + B
        JMP 0,3         ; RETURN
	.END		;LOGICAL OR
