let n be Element of NAT ; :: thesis: ( n >= 1 implies n -Root 1 = 1 )
A1: 1 |^ n = 1 by NEWTON:10;
assume n >= 1 ; :: thesis: n -Root 1 = 1
hence n -Root 1 = 1 by A1, Def3; :: thesis: verum