Hi all.
        I need the following lines of fortran translated to BASIC. I'm
using powerbasic 3.1
FORTRAN:
                READ  (*,'(13I6)')  ((IPT(I,J),J=1,12),LPT(I),I=1,3)
                WRITE (*,'(/3I5))') IPT, LPT

IPT() is declared as a 3x12 array and LPT() is declared as a 3-d array
(i.e. 1, 2, 3). Basically, I just need to know the logic of the nested
implies DO loop in the first line of code.

                                Thanks,
                                        Joe

--
        *************************************************************
        *     Paul J. Heafner, Astronomy and Physics Instructor     *
        *       Work:(704)327-7000, x.246 Home:(704)328-9425        *


        *                Aren't true friends wonderful?!            *
        *************************************************************