reserve a, b, k, n, m for Nat,
  i for Integer,
  r for Real,
  p for Rational,
  c for Complex,
  x for object,
  f for Function;

theorem
  n >= 1 implies scf(r).n in NAT by Th38,INT_1:3;
