let a, b be Nat; :: thesis: for k, l being Integer st k,l are_relative_prime holds
k |^ a,l |^ b are_relative_prime
let k, l be Integer; :: thesis: ( k,l are_relative_prime implies k |^ a,l |^ b are_relative_prime )
assume
k,l are_relative_prime
; :: thesis: k |^ a,l |^ b are_relative_prime
then
k |^ a,l are_relative_prime
by Th15;
hence
k |^ a,l |^ b are_relative_prime
by Th15; :: thesis: verum