theorem Th11:
  ic in rng p & (ic = a :=len fa or ic = fa :=<0,...,0>a)
  implies fa in UsedI*Loc p
proof
  assume that
A1: ic in rng p and
A2: ic = a :=len fa or ic = fa :=<0,...,0>a;
A3: UsedInt*Loc ic = {fa} by A2,SF_MASTR:34;
  UsedInt*Loc ic c= UsedI*Loc p by A1,SF_MASTR:35;
  hence thesis by A3,ZFMISC_1:31;
end;
