[Beowulf] g77 limits...

[Joe Landman]

Robert G. Brown wrote:



> Now all I have to do is find a Rosetta stone somewhere, and a magnifying
> glass (as I'm getting old and presbyopic:-)... what is this ENDDO
> command?  Where are the numbers, as in:
> 
>       DO 10 I = 1, N
>          DO_SOME_WORK(I)
> 10    CONTINUE
> 
> ???  And where are the line labels in columns 73-80?  These ARE punch
> card images, aren't they...:-)

Whats fun is when you run into a compiler that starts choking on those 
line labels.

Here is a simple rosetta pebble

for(i=1;i<=N,i++)
  {
    do_some_work(&i);
  }

can be written in fortran (notice the lower case of those of us who 
could use those 110 baud and 300 baud speed demon terminals, and 
couldn't be bothered to press the shift key as it would slow us down...)

do i=1,N
  call do_some_work(i)
enddo

(on the count of three say "oooooooooh" ...)

-- 
Joseph Landman, Ph.D
Founder and CEO
Scalable Informatics LLC,
email: landman at scalableinformatics.com
web  : http://www.scalableinformatics.com
phone: +1 734 786 8423
fax  : +1 734 786 8452
cell : +1 734 612 4615