Vector: Difference between revisions
→{{header|Phixmonti}}
Line 1,410:
def div / enddef
def opVect /# a b op -- a b c #/
var op
list? not if swap len rot swap repeat endif
len var lon
Line 1,429 ⟶ 1,430:
getid add opVect ?
getid sub opVect ?
drop 2
getid mul opVect ?
getid div opVect ?</lang>
Line 1,434 ⟶ 1,436:
<pre>[7, 10]
[3, 4]
[10,
[2.5,
=== Press any key to exit ===</pre>
|