theorem
  Valid(VERUM(Al),J) = Valuations_in(Al,A) --> TRUE by Lm1;
