theorem
  for f being Function of X,Y st (Y = {} implies X = {}) holds
  <:f,X,Y:> is total;
