theorem Th8:
  for f being monotone Function of P,Q holds
    (for L holds f.(sup L) <= sup (f.:L)) implies f is continuous
  proof
  let f be monotone Function of P,Q;
  assume A1:for L holds f.(sup L) <= sup (f.:L);
  for L holds f.(sup L) = sup (f.:L)
    proof
    let L;
    set a1=f.(sup L);
    set a2=sup (f.:L);
    A2:a2<=a1 by Th2;
    a1<=a2 by A1;
    hence thesis by A2,ORDERS_2:2;
    end;
  hence thesis by Th6;
  end;
