static double exclusive_measureSizeOfObject(IF0<O> f) {
  ret exclusive_measureSizeOfObject(if0ToF0(f));
}

static double exclusive_measureSizeOfObject(F0<O> f) {
  O[] array = new O[100000];
  long mem1 = usedMemoryAfterGC();
  for i over array: {
    array[i] = callF(f);
  }
  long mem2 = usedMemoryAfterGC();
  ret (mem2-mem1)/(double) l(array);
}