program a2;

{$APPTYPE CONSOLE}

uses
  SysUtils;

var
   Arr: array of Integer;
   N, i,j,k: Integer;
   Summ, Summ2: Extended;
begin
   Readln(N);
   SetLength(Arr, N);
   for i := 0 to N - 1 do
      Read(Arr[i]);
   Summ := 0; Summ2 := 0;
   for i := 0 to High(Arr) do
      Summ := Summ + Arr[i];
   Summ := (3*N-2)*Summ;
   for i := 0 to (High(Arr) - 2) do
   begin
      for j := i+1 to High(Arr) - 1 do
      begin
         for k := j+1 to High(Arr) do
         begin
            //if ((i <> j) and (i <> k) and (j <> k)) then
            //begin
               Summ2 := Summ2 + (Arr[i] xor Arr[j] xor Arr[k]);
            //end;
         end;
      end;
   end;
   Summ2 := Summ2 * 6;
   Summ := Summ + Summ2;
   Write(Summ:0:0);;
  { TODO -oUser -cConsole Main : Insert code here }
end.