(clear-col) ( col# pivot-row i -- )

Vocabulary

math.matrices.elimination

Inputs

col#	an object
pivot-row	an object
i	an object

Outputs

None

Definition

USING: kernel math.vectors ;

IN: math.matrices.elimination

: (clear-col) ( col# pivot-row i -- )
    [ [ clear-scale ] 2keep [ n*v ] dip v+ ] change-row ;