ch ( x y z -- x' )

Vocabulary

checksums.sha.private

Inputs

x	an object
y	an object
z	an object

Outputs

x'

an object

Definition

USING: kernel math ;

IN: checksums.sha.private

: ch ( x y z -- x' ) [ bitxor bitand ] keep bitxor ; inline