(transform) ( a0 a1 a2 a3 table -- word' )

Vocabulary

crypto.aes.private

Inputs

a0	an object
a1	an object
a2	an object
a3	an object
table	an object

Outputs

word'

an object

Definition

USING: generalizations kernel math sequences ;

IN: crypto.aes.private

:: (transform) ( a0 a1 a2 a3 table -- word' )
    a0 a1 a2 a3 [ 256 + ] [ 512 + ] [ 768 + ] tri*
    [ table nth ] 4 napply bitxor bitxor bitxor ; inline