function OutStateHex = AESShiftRowL(InStateHex, n)
% OutStateHex = AESShiftRowL(InStateHex, n)
% Inputs: InStateHex = 4 by 4 matrix of two hex digits (i.e.,
% byte)
% n = an integer in the range {1,2,3,4}
% Output: OutStateHex = 4 by 4 matrix of two hex digits (i.e.,
% bytes), resulting from cyclically shifting the elements of row n in the
% inputted matrix one unit to the left.


OutStateHex = InStateHex;
x = OutStateHex(n,1);
for j=1:3,
    OutStateHex(n,j) = OutStateHex(n,j+1);
end
OutStateHex(n,4) = x;