Newsgroups:   comp.lang.apl
Path: watmath!watserv2.uwaterloo.ca!torn!cs.utexas.edu!swrinde!emory!gatech!rpi!utcsri!geac!jtsv16!itcyyz!yrloc!intern
From:         eem@ipsaint.ipsa.reuter.COM (Mcdonnell, Eugene E.)
Subject:      Hilbert matrix
Message-ID: <1993Jan19.051829.6267@yrloc.ipsa.reuter.COM>
Sender: intern@yrloc.ipsa.reuter.COM (Intern via QUADRAM)
Reply-To:     eem@ipsaint.ipsa.reuter.COM (Mcdonnell, Eugene E.)
Organization: Reuters Information Services (Canada)
Date:         19 Jan 93 05:00:06 UT
Lines: 27


-----------Message forwarded from IPSA Mailbox-------------


no. 6910663 filed  4.33.26  tue 19 jan 1993
from eem
to   uclapl
subj Hilbert matrix

Function hilb below closely follows function HILB given in APL\360 User's Manual 
written by A. D. Falkoff and K. E. Iverson and published in 1966 by IBM Thomas 
J. Watson Research Center (page B.10):

   hilb =. %@>:@+/~@i.  
   hilb =. %          @    >:        @    +    /     ~         @    i.  
   NB.     reciprocal atop increment atop plus table reflexive atop integers
   hilb 3
        1      0.5 0.333333
      0.5 0.333333     0.25
 0.333333     0.25      0.2


-----------------------------------------------------------
This posting is forwarded from an internal Reuters mailbox.
No statement or opinion contained herein should be taken as
being Reuters policy, or even as being approved by Reuters,
in any way.
