reserve a,b,c,k,m,n for Nat;
reserve i,j for Integer;
reserve p for Prime;

theorem
  for P,R being ext-real-valued Relation
  st rng P c= rng R & R is with_values_greater_or_equal_one
  holds P is with_values_greater_or_equal_one;
