laplace-expansion ( row matrix -- x )

Vocabulary

math.matrices.laplace.private

Inputs

row	an object
matrix	an object

Outputs

x

an object

Definition

USING: kernel math math.vectors sequences ;

IN: math.matrices.laplace.private

:: laplace-expansion ( row matrix -- x )
    matrix length 2 =
    [ matrix 2x2-determinant ] [
        matrix first-sub-matrix
        [ row swap laplace-expansion ] map v*
        [ odd? [ neg ] when ] map-index sum
    ] if ;