You may find definitions from Roger Hui's inverted table essay
in jwiki useful, in particular
ifa=: <@(>"1)@|: NB. inverted from atoms
afi=: |:@:(<"_1@>) NB. atoms from inverted
Пт, 16 дек 2016, Michael Berry написал(а):
> I am looping through a large database table 1,000 rows at a time and I
> would like to show some reassuring output. I tried echo and smoutput (are
> these different?) but both sat there until the whole explicit definition
> ended and then printed out the progress notes all at once. Do I need some
> sort of flush output command?
>
> Here is the loop I tried:
>
> while. 0 = _1 -: d=. ddfch sh, 1000 NB. ddfet fails unpredictably so use
> ddfch instead
>
> do.
>
> data=. make_cells d NB. put into ddfet format as expected by run_tests
>
> scores=. run_tests data
>
> r=. make_cols data,. <"1 scores
>
> assert. 0 = ch2 ddins~ ('select * from ',y,'_scored where 0=1');r
>
> echo written=. written + 1{. $data
>
> end.
> ----------------------------------------------------------------------
> For information about J forums see http://www.jsoftware.com/forums.htm
--
regards,
====================================================
GPG key 1024D/4434BAB3 2008-08-24
gpg --keyserver subkeys.pgp.net --recv-keys 4434BAB3
gpg --keyserver subkeys.pgp.net --armor --export 4434BAB3
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm
