%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% %% Copyright: 2010 Integrated Sytems Laboratory, ETH Zurich %% http://www.iis.ee.ethz.ch/~sha3 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% function [x] = jh_256(m,iv) %Xor message with first half of H h1=[bitxor(m(1:64),iv(1:64)),iv(65:128)]; %Execute E8 out=e8(h1); %Xor message with second half of H x=[out(1:64),bitxor(m,out(65:128))];