thus Sum (digits (1679,10)) = 23 by Th1046; :: according to NUMBER11:def 1 :: thesis: ( 23 divides 1679 & ( for m being Nat st Sum (digits (m,10)) = 23 & 23 divides m holds
1679 <= m ) )

1679 = 73 * 23 ;
hence 23 divides 1679 by INT_1:def 3; :: thesis: for m being Nat st Sum (digits (m,10)) = 23 & 23 divides m holds
1679 <= m

let m be Nat; :: thesis: ( Sum (digits (m,10)) = 23 & 23 divides m implies 1679 <= m )
assume A1: ( Sum (digits (m,10)) = 23 & 23 divides m ) ; :: thesis: 1679 <= m
then consider j being Nat such that
A2: m = 23 * j by NAT_D:def 3;
assume m < 1679 ; :: thesis: contradiction
then 23 * j < 23 * 73 by A2;
then j < 72 + 1 by XREAL_1:64;
then j <= 72 by NAT_1:9;
then not not j = 0 & ... & not j = 72 ;
per cases then ( j = 0 or j = 1 or j = 2 or j = 3 or j = 4 or j = 5 or j = 6 or j = 7 or j = 8 or j = 9 or j = 10 or j = 11 or j = 12 or j = 13 or j = 14 or j = 15 or j = 16 or j = 17 or j = 18 or j = 19 or j = 20 or j = 21 or j = 22 or j = 23 or j = 24 or j = 25 or j = 26 or j = 27 or j = 28 or j = 29 or j = 30 or j = 31 or j = 32 or j = 33 or j = 34 or j = 35 or j = 36 or j = 37 or j = 38 or j = 39 or j = 40 or j = 41 or j = 42 or j = 43 or j = 44 or j = 45 or j = 46 or j = 47 or j = 48 or j = 49 or j = 50 or j = 51 or j = 52 or j = 53 or j = 54 or j = 55 or j = 56 or j = 57 or j = 58 or j = 59 or j = 60 or j = 61 or j = 62 or j = 63 or j = 64 or j = 65 or j = 66 or j = 67 or j = 68 or j = 69 or j = 70 or j = 71 or j = 72 ) ;
suppose j = 0 ; :: thesis: contradiction
end;
suppose j = 1 ; :: thesis: contradiction
end;
suppose j = 2 ; :: thesis: contradiction
end;
suppose j = 3 ; :: thesis: contradiction
end;
suppose j = 4 ; :: thesis: contradiction
end;
suppose j = 5 ; :: thesis: contradiction
end;
suppose j = 6 ; :: thesis: contradiction
end;
suppose j = 7 ; :: thesis: contradiction
end;
suppose j = 8 ; :: thesis: contradiction
end;
suppose j = 9 ; :: thesis: contradiction
end;
suppose j = 10 ; :: thesis: contradiction
end;
suppose j = 11 ; :: thesis: contradiction
end;
suppose j = 12 ; :: thesis: contradiction
end;
suppose j = 13 ; :: thesis: contradiction
end;
suppose j = 14 ; :: thesis: contradiction
end;
suppose j = 15 ; :: thesis: contradiction
end;
suppose j = 16 ; :: thesis: contradiction
end;
suppose j = 17 ; :: thesis: contradiction
end;
suppose j = 18 ; :: thesis: contradiction
end;
suppose j = 19 ; :: thesis: contradiction
end;
suppose j = 20 ; :: thesis: contradiction
end;
suppose j = 21 ; :: thesis: contradiction
end;
suppose j = 22 ; :: thesis: contradiction
end;
suppose j = 23 ; :: thesis: contradiction
end;
suppose j = 24 ; :: thesis: contradiction
end;
suppose j = 25 ; :: thesis: contradiction
end;
suppose j = 26 ; :: thesis: contradiction
end;
suppose j = 27 ; :: thesis: contradiction
end;
suppose j = 28 ; :: thesis: contradiction
end;
suppose j = 29 ; :: thesis: contradiction
end;
suppose j = 30 ; :: thesis: contradiction
end;
suppose j = 31 ; :: thesis: contradiction
end;
suppose j = 32 ; :: thesis: contradiction
end;
suppose j = 33 ; :: thesis: contradiction
end;
suppose j = 34 ; :: thesis: contradiction
end;
suppose j = 35 ; :: thesis: contradiction
end;
suppose j = 36 ; :: thesis: contradiction
end;
suppose j = 37 ; :: thesis: contradiction
end;
suppose j = 38 ; :: thesis: contradiction
end;
suppose j = 39 ; :: thesis: contradiction
end;
suppose j = 40 ; :: thesis: contradiction
end;
suppose j = 41 ; :: thesis: contradiction
end;
suppose j = 42 ; :: thesis: contradiction
end;
suppose j = 43 ; :: thesis: contradiction
end;
suppose j = 44 ; :: thesis: contradiction
end;
suppose j = 45 ; :: thesis: contradiction
end;
suppose j = 46 ; :: thesis: contradiction
end;
suppose j = 47 ; :: thesis: contradiction
end;
suppose j = 48 ; :: thesis: contradiction
end;
suppose j = 49 ; :: thesis: contradiction
end;
suppose j = 50 ; :: thesis: contradiction
end;
suppose j = 51 ; :: thesis: contradiction
end;
suppose j = 52 ; :: thesis: contradiction
end;
suppose j = 53 ; :: thesis: contradiction
end;
suppose j = 54 ; :: thesis: contradiction
end;
suppose j = 55 ; :: thesis: contradiction
end;
suppose j = 56 ; :: thesis: contradiction
end;
suppose j = 57 ; :: thesis: contradiction
end;
suppose j = 58 ; :: thesis: contradiction
end;
suppose j = 59 ; :: thesis: contradiction
end;
suppose j = 60 ; :: thesis: contradiction
end;
suppose j = 61 ; :: thesis: contradiction
end;
suppose j = 62 ; :: thesis: contradiction
end;
suppose j = 63 ; :: thesis: contradiction
end;
suppose j = 64 ; :: thesis: contradiction
end;
suppose j = 65 ; :: thesis: contradiction
end;
suppose j = 66 ; :: thesis: contradiction
end;
suppose j = 67 ; :: thesis: contradiction
end;
suppose j = 68 ; :: thesis: contradiction
end;
suppose j = 69 ; :: thesis: contradiction
end;
suppose j = 70 ; :: thesis: contradiction
end;
suppose j = 71 ; :: thesis: contradiction
end;
suppose j = 72 ; :: thesis: contradiction
end;
end;