let a, b be real number ; :: thesis: ( a > 0 implies a to_power b > 0 )
assume A1: a > 0 ; :: thesis: a to_power b > 0
then a #R b > 0 by PREPOWER:95;
hence a to_power b > 0 by A1, Def2; :: thesis: verum