sop / aes-kw

		// For j = 0 to 5

		for ($j = 0; $j <= 5; ++$j) {

			// For i = 1 to n

			for ($i = 1; $i <= $n; ++$i) {

				// B = AES(K, A | R[i])

				$B = $this->_encrypt($kek, $A . $R[$i]);

				// A = MSB(64, B) ^ t where t = (n*j)+i

				$t = $n * $j + $i;

				$A = $this->_msb64($B) ^ $this->_uint64($t);

				// R[i] = LSB(64, B)

				$R[$i] = $this->_lsb64($B);

			}

		}

		// Set C[0] = A

		$C = [$A];

		// For j = 5 to 0

		for ($j = 5; $j >= 0; --$j) {

			// For i = n to 1

			for ($i = $n; $i >= 1; --$i) {

				// B = AES-1(K, (A ^ t) | R[i]) where t = n*j+i

				$t = $n * $j + $i;

				$B = $this->_decrypt($kek, ($A ^ $this->_uint64($t)) . $R[$i]);

				// A = MSB(64, B)

				$A = $this->_msb64($B);

				// R[i] = LSB(64, B)

				$R[$i] = $this->_lsb64($B);

			}

		}

		return array($A, $R);

	}