Thanks, I will look into that.

Henry Rich

On Tue, Apr 24, 2018, 11:31 Arie Groeneveld <[email protected]>
wrote:

> 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
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm

Reply via email to