theorem :: EUCLID_2:18
  for x being Element of REAL n holds |(0*n,x)| = 0 by Th18;
