verb dyad foo =: verb define - y. : x. - y. ) 3*foo 4 3*4foo 5 3*4 foo 5 names 4!:1 '' a =: i. 10 4!:1 '' noun 4!:1 0 (4!:1) 0 (4!:1) 3 1 2 3 , 4 5 1 2 3 ,'abc' < 1 2 3 (<1 2 3) , <'abc' b =:(<1 2 3) , <'abc' 1 { b 2 0 from b 1 0 from b b 0 { b > 0 { b 1 { > 0 { b b (4!:1) noun $ > (4!:1) noun ' ' = 0{ > (4!:1) noun 0{ > (4!:1) noun $ 0{ > (4!:1) noun names noun ('de';'foo1') =: 3 4 name noun names noun de foo1 names noun #names noun 'n1 n2 n3 n4 n5 n6 'n1 n2 n3 n4 n5 n6' =: names noun n1 n3 'x y z' =: 1 2 'x y z' =: 1 x y z names verb names noun foo2 =: monad define 'a b c' =. y. %a*b-c ) a foo2 3 4 5 a b c foo2 =: monad define 'a b c' =. x: y. %a*b-c ) foo2 3 4 5 %3x x: .333333 x: .33333333333333333333333333333333 x: .333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333 ls =: 10000$ 0.01 +/ls print_precision print_precision'' set_print_precision 17 print_precision'' +/ls exit 0