./xp2-virtual-object.awk

#!/bin/awk
# sample: awk -f ./xp2-virtual-object.awk ./emotions/01-Peur.txt

BEGIN {
  ROWS_TO_SKIP = 1; # how many row to skip (if there is header)
    uid=1;
  outFilename="user";
  FS=",";
}

{
  rowObject[NR] = toBinary($0);
}

function toBinary(r)
{
#  printf("%s\n", r);
  return sprintf("%s", gensub(",", "", "g" , r));
}

function distance(a, f)
{
  dist = ""
  for (i=1;i<=16;i++)
  {
#    printf("[%s+%s]\n", dist, and(substr(a, i, 1), substr(f, i, 1)));
    dist = dist and(substr(a, i, 1), substr(f, i, 1));
  }
  return dist;
}

END {
  for (anchor=1; anchor<=NR; anchor++)
  {
    cur = rowObject[anchor];
    for (forward=anchor+1; forward<=NR; forward++)
    {
      printf("[%s]:\n\t%s\n\t%s\nAND: \t%s\n", anchor, rowObject[anchor], rowObject[forward], distance(rowObject[anchor], rowObject[forward]));
#      if (rowObject[forward] <= (cur+TIME_THRESHOLD))
#      {
#        printf("%d,%d [%d -> %d]\n", anchor, forward, rowObject[anchor], rowObject[forward], rowObject[forward]-rowObject[anchor]);
#      } else
#      {
#        break;
#      }
    }
  }
  printf("\n");

}