Mercurial > hg > jgplsrc

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

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
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. -/ .* y timing tests ------------------------------------------------

h=: [: -/"1 {."2 * |."1@:({:"2)

m=: 1024 %~ _5e5* 5000 2 2 ?@$1e6
0.4 > | (-/ % <./) t=: (10 timer '-/ .* m') , 10 timer 'h m'


4!:55 ;:'h m t'