Experiment with smaller number.

   $PanDigS =: (perm 5) from (1 + i.5)
120 5
   $PanDigT =: 10 base"1 each 3 box\"1 PanDigS
120 3

   PanDigT -:&:> 3(10 base ])\"1 PanDigS                NB. Boxing can be 
avoided totally
1

   PanDigS =: (perm 10) from (1 + i.10)         NB. The real number

   ts'PanDigT =: 3(10 base ])\"1 PanDigS'
10.904593 2.684392e8

Works fine.


R.E. Boss


-----Original Message-----
From: General <[email protected]> On Behalf Of Francesco 
Pedulla'
Sent: zondag 7 februari 2021 12:33
To: [email protected]
Subject: [Jgeneral] Bug in J807/J902

The following piece of code does not work on Ubuntu 20.04.

load 'primitives'

perm =: i.@! A. i.

PanDigS =: (perm 10) from (1 + i.10)

PanDigT =: 10 base"1 each 3 box\"1 PanDigS


The effect is variable: crash of the J interpreter, freeze of the Qt interface 
or even of the whole system. It shows up both on J807 and J902.

The dataset is quite large:


7!:5 <'PanDigS'

5.36871e8


and the process crashes (or the system freezes) after several seconds.
Hence, I suspect an issue with memory management.

Any idea or suggestion on how to bypass the problem?

Thanks,


Francesco
----------------------------------------------------------------------
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