Sml Power Function, I currently have a simple function, but it takes to many multiplications to get the result.