set-t ( T i -- )


Vocabulary
crypto.aes.private

Inputs
Tan object
ian object


Outputs
None

Definition


:: set-t ( T i -- )
i sbox nth :> a1 a1 xtime :> a2 a1 a2 bitxor
:> a3 a3 a1 a1 a2 >ui32 i T set-nth a1 a1 a2 a3 >ui32
i 256 + T set-nth a1 a2 a3 a1 >ui32 i 512 + T set-nth
a2 a3 a1 a1 >ui32 i 768 + T set-nth ;