if( $n < 0 ) {
    return matrix_power( inv( $M ), -$n );
} elsif ( $n == 0 ) {
    return identity( $M );
} elsif ( $n == 1 ) {
    return copy( $M );      # (1)
#
# ...