Ah, the bad old days. And here I am in a nostalgia thread. On Thu, 26 Apr 2018 17:24:38 +0000, Chris Hoelscher wrote:
>Of even older fortran >If x (100,200,300) > That's a bug. What did it mean? But this is valid: IF(X)100,200,300 Didn't the expression need to be enclosed in parentheses? >-----Original Message----- >From: zMan >Sent: Thursday, April 26, 2018 1:21 PM > >And don't forget the (early): > >5 = 3 > >which, in at least some compiless, would indeed make subsequent references to >"5" use "3". I think that was considered a bug. > Bug, yes. But easier to do with subroutine formal parameters. I had a colleague who wrote a subroutine to generate semilog plots on an impact printer. Once he wanted a semilog plot. He proudly showed me his accommodation: CALL LINEAR( 2.718 ) .... SUBROUTINE LINEAR( E ) E = 1.0 RETURN Voila! Linear! That's actually one of the few things I wouldn't have done. Some used a shift routine that overwrote its caller with an inline shift instruction. -- gil ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN