(specialized-inverse) ( rect-matrix -- inverted )

Vocabulary

math.matrices.extras.private

Inputs

rect-matrix

an object

Outputs

inverted

an object

Definition

USING: combinators kernel math.matrices math.matrices.extras
sequences ;

IN: math.matrices.extras.private

: (specialized-inverse) ( rect-matrix -- inverted )
    dup [ rank ] [ dimension ] bi [ = ] with map {
        { { t f } [ (left-inverse) ] }
        { { f t } [ (right-inverse) ] }
        [ no-case ]
    } case ;