## Why I don't like Fortran

by Jim Chapman

[ Home
| Where we live
| Jim
| Isabel
| James
| Edward
| Nicholas
]
One sunny day in 1992, I found this lurking in the middle of a 100,000-line Fortran program that I was trying todebug:

if ((mode.eq.1.or.mode.eq.5).and.(a.gt.1.or.b.gt.0).or.
* ((mode.eq.2.or.mode.eq.6).and.
* a.gt.1.and.a.lt.n_shifts+1.and.b.ne.0).or.
* mode.eq.4.and.(a.gt.1.or.b.gt.2).or.
* a.gt.n_shifts.and.b.gt.18) goto 390

I had a very nasty hangover, and this code did not help matters.

home@jim-chapman.net