I noticed a much longer execution time in J807-beta compared with J806 concerning the calculation of Bell polynomials.

Verbs:

mndiff=:[:;<@(({.*(#~0<])@}.),.( +/@:,:"1 -@I.@:~:&0 |."0 1 {.&_1 1@#)@}.)@,&0"1
mnmul=: +/@:,:&0 1"1
mnsum=:(+/@:({."1),}.@{.)/.~}."1
diffM=: mnsum@(mnmul,mndiff)

BellP=: diffM&.>^:(<`(<@,:@1 0x"_)) f.

   JVERSION
Engine: j807/j64/linux
Beta-d: commercial/2018-04-17T16:06:53
Library: 8.07.13
Qt IDE: 1.7.1/5.5.1
Platform: Linux 64
Installer: J807 install



   6!:2 'BellP 30'
26.1978




   JVERSION
Engine: j806/j64/linux
Release: commercial/2017-11-06T09:54:01
Library: 8.06.09
Qt IDE: 1.6.2/5.3.2
Platform: Linux 64
Installer: J806 install


   6!:2 'BellP 30'
2.34475


This all of course apart from bad programming practice. :-)


@@i


----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm

Reply via email to