view test/g622.ijs @ 0:e0bbaa717f41 draft default tip

lol J
author Jordi Gutiérrez Hermoso <jordigh@octave.org>
date Mon, 25 Nov 2013 11:56:30 -0500
parents
children
line wrap: on
line source

NB. @: ------------------------------------------------------------------

(  x*y) -: (x=.?10$200) +/@ * (y=.?10$2000)
(+/x*y) -: (x=.?10$200) +/@:* (y=.?10$2000)

'domain error' -: ". etx '3 @: +'
'domain error' -: ". etx '+ @: 3'
'domain error' -: ". etx '3 @: 3'

4!:55 ;:'x y'