theorem
  0_No <= x implies
     (y in L_sqrt x implies 0_No <= y & y*y < x) &
     (y in R_sqrt x implies 0_No < y & x < y*y) by Th19;
