Loop to find the power
while ( p != 1 ) : NEW_LINE INDENT if ( p % 2 == 1 ) : NEW_LINE INDENT s = matrix_product ( s , mul ) ; NEW_LINE DEDENT mul = matrix_product ( mul , mul ) ; NEW_LINE p //= 2 ; NEW_LINE DEDENT return matrix_product ( mul , s ) ; NEW_LINE