Currently,
require'math/mt'
1 qn1_mt_ 0 0
1 0
1 qni_mt_ 0 0
0j1 0
1 qnj_mt_ 0 0
0 1
1 qnk_mt_ 0 0
0 1
To fix, maybe we should change the definition of qnk to:
qnk=: 11&o.@{: : ((j.~qnj) 1} ])
Also, sadly, the qnf mentioned at the bottom of the file does not seem
to be implemented, though playing with taylor series suggests this
might not be impossible to implement:
+/((qnmul_mt_&1 0)^:(i.100) 1 0)%!i.100
2.71828 0
+/((qnmul_mt_&0j1 0)^:(i.100) 1 0)%!i.100
0.540302j0.841471 0
+/((qnmul_mt_&0 1)^:(i.100) 1 0)%!i.100
0.540302 0.841471
+/((qnmul_mt_&0 0j1)^:(i.100) 1 0)%!i.100
0.540302 0j0.841471
Thanks,
--
Raul
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
