let n be Nat; ( 17 divides n iff 17 divides (value (((digits (n,10)) /^ 1),10)) - (5 * ((digits (n,10)) . 0)) )
(digits (n,10)) /^ 1 = mid ((digits (n,10)),2,(len (digits (n,10))))
by Th3;
hence
( 17 divides n iff 17 divides (value (((digits (n,10)) /^ 1),10)) - (5 * ((digits (n,10)) . 0)) )
by Th46; verum