theorem
  for X, Y be RealNormSpace,
  Z be Subset of product <*X,Y*> holds
  IsoCPNrSP(X,Y)" is_continuous_on Z by LM015;
