theorem Th52:
  ex s st s = CastNode(q.n,v)
proof
  reconsider n as Element of NAT by ORDINAL1:def 12;
  consider s such that
A1: s=q.n by Th45;
  CastNode(q.n,v) = s by A1,Def16;
  hence thesis;
end;
