Newsgroups: comp.lang.apl
Path: watmath!watserv2.uwaterloo.ca!torn!utcsri!rpi!think.com!spool.mu.edu!news.nd.edu!mentor.cc.purdue.edu!mentor!weg
From: weg@mace.cc.purdue.edu (Eythan Weg)
Subject: Re: J verb for reading a file into J
In-Reply-To: ljdickey@math.uwaterloo.ca's message of 12 Oct 92 22:32:02 GMT
Message-ID: <WEG.92Oct14131058@mace.cc.purdue.edu>
Sender: news@mentor.cc.purdue.edu (USENET News)
Organization: Purdue University
References: <1992Oct11.064814.13447@csus.edu> <Bw159F.730@math.uwaterloo.ca>
Date: Wed, 14 Oct 1992 18:10:58 GMT
Lines: 42

In article <Bw159F.730@math.uwaterloo.ca> ljdickey@math.uwaterloo.ca (L.J. Dickey) writes:

   % J
   J5.1a   Copyright (c) 1990-1992, Iverson Software Inc.  All Rights Reserved.

      scr=.0!:2&<

      read=.1!:1&<

      scr 'out'

      fn =. 'profile.js'
      display =. 9!:3
      display 5   

      y =. read fn
      y
   scr=.0!:2&<

   read=.1!:1&<

      boxer =. < ;. _2
      boxer y
   +-----------++------------+
   |scr=.0!:2&<||read=.1!:1&<|
   +-----------++------------+
      > boxer y
   scr=.0!:2&< 

   read=.1!:1&<
      $ > boxer y
   3 12
      f =. > @ boxer @ read





One can obtain (??) an equivalent to f by:
	 lines=.];._2 @read

Eythan
