let a, b be Real; :: 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:81;
hence a to_power b > 0 by A1, Def2; :: thesis: verum