let n be Nat; divisors ((3 |^ ((2 * n) + 1)),4,3) = { (3 |^ m) where m is Nat : ( m is odd & m <= (2 * n) + 1 ) }
set A = divisors ((3 |^ ((2 * n) + 1)),4,3);
set B = { (3 |^ m) where m is Nat : ( m is odd & m <= (2 * n) + 1 ) } ;
thus
divisors ((3 |^ ((2 * n) + 1)),4,3) c= { (3 |^ m) where m is Nat : ( m is odd & m <= (2 * n) + 1 ) }
XBOOLE_0:def 10 { (3 |^ m) where m is Nat : ( m is odd & m <= (2 * n) + 1 ) } c= divisors ((3 |^ ((2 * n) + 1)),4,3)proof
let x be
object ;
TARSKI:def 3 ( not x in divisors ((3 |^ ((2 * n) + 1)),4,3) or x in { (3 |^ m) where m is Nat : ( m is odd & m <= (2 * n) + 1 ) } )
assume
x in divisors (
(3 |^ ((2 * n) + 1)),4,3)
;
x in { (3 |^ m) where m is Nat : ( m is odd & m <= (2 * n) + 1 ) }
then consider k being
Nat such that A1:
x = k
and A2:
k mod 4
= 3
and A3:
k divides 3
|^ ((2 * n) + 1)
;
consider t being
Element of
NAT such that A4:
k = 3
|^ t
and A5:
t <= (2 * n) + 1
by A3, PEPIN:34, PEPIN:41;
t is
odd
by A2, A4, Th23;
hence
x in { (3 |^ m) where m is Nat : ( m is odd & m <= (2 * n) + 1 ) }
by A1, A4, A5;
verum
end;
let x be object ; TARSKI:def 3 ( not x in { (3 |^ m) where m is Nat : ( m is odd & m <= (2 * n) + 1 ) } or x in divisors ((3 |^ ((2 * n) + 1)),4,3) )
assume
x in { (3 |^ m) where m is Nat : ( m is odd & m <= (2 * n) + 1 ) }
; x in divisors ((3 |^ ((2 * n) + 1)),4,3)
then consider m being Nat such that
A6:
x = 3 |^ m
and
A7:
m is odd
and
A8:
m <= (2 * n) + 1
;
A9:
(3 |^ m) mod 4 = 3
by A7, Th24;
3 |^ m divides 3 |^ ((2 * n) + 1)
by A8, NEWTON:89;
hence
x in divisors ((3 |^ ((2 * n) + 1)),4,3)
by A6, A9; verum