theorem
  len F >= 1 & (ex f st f.1 = F.1 &
  (for n being Nat st 0 <> n & n < len F holds f
  .(n + 1) = g.(f.n,F.(n + 1))) & d = f.(len F)) implies d = g "**" F by Def1;
