🚀 go-pugleaf

In article <144@oberon.UUCP> mcooper@oberon.UUCP (Michael Cooper) writes:
>I have been forced to learn Fortran 77 for a course I am taking.
>I've been writting my f77 programs under VMS (v4.1) and am getting real 
>tired of it, so I decided to give f77 under (4.2bsd) unix a try.
>What I ran into was an error about an unknown statement type.  It turned 
>out to be a do while statement of the form:
>
>	DOWHILE(true)
>		something borring
>	ENDDO
>
>My question is: doesn't Unix (ANSI) f77 support a (do) while statement?
>What is it's syntax?
>
>
>
>-- 
>| Michael Cooper		  USENET: ...!{uscvax, sdcrdcf, engvax,	      |

No, the ANSI Fortran 77 Standard does not include a "DO WHILE" type
statement.  It only supports the "DO 5 I = START, STOP INCR" type of DO.

A couple of Fortran 77 books I have seen have suggested the following 
horrendous method of getting around the lack of WHILE loops:


C	
C	The following is being used as a WHILE loop
C
100     IF (condition) THEN
            .
	    .
	    .
            GOTO 100
        END IF
	 

It's unfortunate that even when a standard was finally drafted, it
still left out something as basic and obvious as some kind of
WHILE construct!
-- 
-------------------------------------------------------------------------
Keith Drescher (kad@ttrdc)          	   | ... You can check out any      
ATT Computer Systems Division, Skokie, Il. | time you like - but you can  
PATH: ...!ihnp4!ttrdc!kad                  | never leave ...
-------------------------------------------------------------------------