Subject: APL iota function in Fortran: (/ (i, i=1,n) /)

From: "Rex Page" <[email-masked]>
Date: Fri, 26 Jun 92 07:54:40 -0500

Fortran 90 array constructors provide the iota function of APL.

Three ways to assign   APL-iota n   to a Fortran array:

   DO i=1,n           !Tom 
     iota(i)=i        ! Lake's
   END DO             !  loop

   iota = (/ (i,i=1,n) /)    ! using array constructor

   forall(i=1:n) iota(i)=i   ! using forall

  - Rex