theorem Th21:
  Edges_Out(v, X) c= Edges_Out v
proof
  let e be object;
  assume
A1: e in Edges_Out(v, X);
  then (the Source of G).e = v by Def2;
  hence thesis by A1,Def2;
end;
