Path: utzoo!utgpu!jarvis.csri.toronto.edu!mailrus!iuvax!uxc!uxc.cso.uiuc.edu!uxd.cso.uiuc.edu!uxe.cso.uiuc.edu!mcdonald
From: mcdonald@uxe.cso.uiuc.edu
Newsgroups: comp.lang.fortran
Subject: Re: Still More on Nested DOs
Message-ID: <50500115@uxe.cso.uiuc.edu>
Date: 20 Mar 89 17:47:00 GMT
References: <50500112@uxe.cso.uiuc.edu>
Lines: 17
Nf-ID: #R:uxe.cso.uiuc.edu:50500112:uxe.cso.uiuc.edu:50500115:000:749
Nf-From: uxe.cso.uiuc.edu!mcdonald    Mar 20 11:47:00 1989


One final thing on nested DO;s and extended ranges: If what you
want is backward compatibility with old code, for purposes of
not having to recode, I sympathise strongly. If you want to
write NEW code with funny behaviour of nested loops, including
jumping out and then back in, may I humbly suggest that in all
Fortrans from Fortran 66 on, that it can be done. In fact,
it is easy and legal. It just means avoiding posting code in
places where certain constructs cause flame attacks. It might
also be a bit (a little bit) slower. It is also MUCH more flexible.

Code your own loops with logical if statements, arithmetic statements
goto's and labeled statements! 

So there - I actually did it - I recommended that you use goto's.

Doug McDonald