- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
Link Copied
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
Fixed - thanks. The correct link is https://stevelionel.com/drfortran/2020/05/16/doctor-fortran-in-military-strength/
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
END DO as the terminal statement of a DO loop. This didn’t add the unlabeled block DO..END DO Fortran 90 would have, but it works with that.
Tahnks I have been meaning to ask why some one wanted this instead of continue.
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
The goal was to get rid of labeled DO, which happened eventually in the standard (deprecated). DO..END DO is easier to understand. It also eliminates shared loop termination, which almost nobody understood.
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
I hate common use of continue statements to end do loops - it is common in old Fortran and can be a pain to eliminate. But I dislike unnumbered do loops as they can be hard to read across multiple pages
We will never get rid of Old Fortran -- it is like old English -- we will live with it forever.
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
Well, you can use named loops (and in fact named constructs) as an alternative:
myloop: do i = 1,100
... a few hundred lines of code to do something useful enddo & myloop
To make the end of the loop more visible I have put the label at the end on a new line.
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
I also find that in many cases where do enddo are a long way apart the code is in need needs of some restructuring with some subprogram units to make it more readable and maintainable
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
I encourage the use of labels (the alphanumeric kind).
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
There is a good rule that a piece of code wider than your hand is to long
- Subscribe to RSS Feed
- Mark Topic as New
- Mark Topic as Read
- Float this Topic for Current User
- Bookmark
- Subscribe
- Printer Friendly Page