do-row ( exchange-with row# -- ) (original) (raw)
do-row ( exchange-with row# -- )
Vocabulary
math.matrices.elimination
Inputs
| exchange-with | an object |
|---|---|
| row# | an object |
Outputs
None
Definition
: do-row ( exchange-with row# -- )
[ exchange-rows ] keep [ first-col ] keep dup 1 +
rows-from clear-col ;