math.matrices: Add m+n, m-n, n+m, n-m, words.
parent
c3198ef131
commit
7504823dee
|
|
@ -118,6 +118,10 @@ IN: math.matrices
|
||||||
! Matrix operations
|
! Matrix operations
|
||||||
: mneg ( m -- m ) [ vneg ] map ;
|
: mneg ( m -- m ) [ vneg ] map ;
|
||||||
|
|
||||||
|
: n+m ( n m -- m ) [ n+v ] with map ;
|
||||||
|
: m+n ( m n -- m ) [ v+n ] curry map ;
|
||||||
|
: n-m ( n m -- m ) [ n-v ] with map ;
|
||||||
|
: m-n ( m n -- m ) [ v-n ] curry map ;
|
||||||
: n*m ( n m -- m ) [ n*v ] with map ;
|
: n*m ( n m -- m ) [ n*v ] with map ;
|
||||||
: m*n ( m n -- m ) [ v*n ] curry map ;
|
: m*n ( m n -- m ) [ v*n ] curry map ;
|
||||||
: n/m ( n m -- m ) [ n/v ] with map ;
|
: n/m ( n m -- m ) [ n/v ] with map ;
|
||||||
|
|
|
||||||
Loading…
Reference in New Issue