
theorem Th24:
  for L being non empty transitive reflexive RelStr, D being
  directed non empty Subset of L holds Net-Str D in NetUniv L
proof
  let L be non empty transitive reflexive RelStr;
  let D be directed non empty Subset of L;
  D in the_universe_of the carrier of L & the carrier of Net-Str D = D by Th23,
WAYBEL21:32;
  hence thesis by YELLOW_6:def 11;
end;
