sS pathRelativeTo(File f, File dir) {
  if (dir == null || f == null) null;
  new LS out;
  do {
    out.add(fileName(f));
    f = dirOfFile(f);
    if (eq(f, dir)) ret joinWithSlash(reversed(out));
  } while (f != null);
  null;
}