theorem
  F is idempotent implies F[;](f.y,f).y = f.y
proof
  assume
A1: F is idempotent;
  thus F[;](f.y,f).y = F.(f.y,f.y) by Th53
    .= f.y by A1;
end;
