theorem Lm9:
  for r be Real st r in [.0,1.[ holds
    ex i be Nat st i <= t-1 & [\ r*t /] = i
  proof
    let r be Real;
    assume r in [.0,1.[; then
    consider i be Nat such that
A2: i <= t-1 and
A3: r in (Equal_Div_interval(t)).i by Lm7;
    thus thesis by A2,Lm8,A3;
end;
