require'dir strings'
labauthors=:3 :0
  for_dir.{.|:dirtree jpath '~install\*.ijt' do.
    cocurrent loc=. cocreate''
    load ::] dir
    if.0=nc<'LABAUTHOR' do.
      y=.y,&,.,:LABTITLE;{.LF cut_base_ LABAUTHOR
    end.
    coerase loc [ cocurrent 'base'
  end.
  y
)

This seems like dangerous code, to me, so is probably best run in a
throwaway session.  That said, I have not experienced any problems
with it.

Anyways, labs written or co-authored by Ken Iverson seem to be:
   Arithmetic
   Book of Numbers
   Coleman (sample topics)
   Finite mathematics
   Grade 8-7 (Saxon)
   Finite Groups
   Mathematical Roots of J
   Math Tables
   Teacher's Aide

(But I keep wishing for a way to do a "safe load" in J -- where
operations could be limited in their scope: no execution of anything
not in COPATH and no execution of foreigns housed in the current
locale that reach outside that locale.  There's no way I can think of
for user code to enforce this restriction.)

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

Reply via email to