theorem
  dom((f*decode)|fs)=fs & rng((f*decode)|fs) c= E & (f*decode)|fs in
  Funcs(fs,E) & dom(f*decode)=omega by Lm3;
