theorem
  for A being finite Subset of VAR holds p in code A iff ex v1 st v1 in
  A & p= x".v1 by Lm5;
