reserve x,y,t for Real;

theorem Th1:
  x>0 implies 1/x=x to_power (-1)
proof
  assume x>0;
  then x to_power (-1) =(1/x) to_power 1 by POWER:32
    .=1/x by POWER:25;
  hence thesis;
end;
