Path: ...!eternal-september.org!feeder3.eternal-september.org!news.eternal-september.org!.POSTED!not-for-mail
From: Lawrence D'Oliveiro <ldo@nz.invalid>
Newsgroups: alt.folklore.computers,comp.os.linux.misc
Subject: Re: The joy of FORTRAN
Date: Fri, 18 Oct 2024 05:41:41 -0000 (UTC)
Organization: A noiseless patient Spider
Lines: 18
Message-ID: <vessel$35pc2$1@dont-email.me>
References: <vd8doi$15q07$1@dont-email.me>
	<slrnvftfn4.51us.candycanearter07@candydeb.host.invalid>
	<vdn5nd$3ssv4$16@dont-email.me>
	<slrnvfu75g.t6vq.candycanearter07@candydeb.host.invalid>
	<kMedne0I3JBuxmL7nZ2dnZfqnPgLyJ2d@earthlink.com>
	<slrnvgdhcc.2nfc6.candycanearter07@candydeb.host.invalid>
	<ve6pfp$2p1hd$8@dont-email.me> <ve8612$33lq0$3@dont-email.me>
	<ve9vga$3cbkr$4@dont-email.me> <mIdOO.204988$1m96.63811@fx15.iad>
	<vec4l3$3q4ms$5@dont-email.me> <criOO.380449$WOde.297877@fx09.iad>
	<20241014080601.00007478@gmail.com> <ln5gklF755tU4@mid.individual.net>
	<38fb5a91-5d00-be42-4bfe-2a05232a82c1@example.net>
	<ln7tooFijhpU2@mid.individual.net> <vemfq7$1qobu$5@dont-email.me>
	<venqec$24hhj$2@dont-email.me>
	<1420907830.750803935.503389.peter_flass-yahoo.com@news.eternal-september.org>
	<veqh7f$19v5v$1@paganini.bofh.team> <20241017090224.000072ce@gmail.com>
	<20241017203051.3143245f5330ac675cc1c166@127.0.0.1>
	<WUqdndxzb5qBRoz6nZ2dnZfqnPGdnZ2d@earthlink.com>
	<lne6rsFh72qU1@mid.individual.net>
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit
Injection-Date: Fri, 18 Oct 2024 07:41:42 +0200 (CEST)
Injection-Info: dont-email.me; posting-host="dfe289e3b0a8ce3b90c1b30ae00e2a59";
	logging-data="3335554"; mail-complaints-to="abuse@eternal-september.org";	posting-account="U2FsdGVkX18l0ERhiPyIHEcZiWX/WafH"
User-Agent: Pan/0.160 (Toresk; )
Cancel-Lock: sha1:qTHvuQomB+yGzcw5FqVIa2L/iiY=
Bytes: 2470

On 18 Oct 2024 04:35:09 GMT, rbowman wrote:

> Our source tree still has vestiges of Fortran that go back more than 20
> years and are strictly f77.
> 
> 	  recnum = 1 read(adrich,15,rec=recnum) totrec
> 15	  format(i10)
> 
> 100	 if(recnum.gt.totrec) goto 500
> 	  read(adrich,105,rec=recnum+1) ch
> 105	 format(1a1)

You know that Fortran 77 introduced if-then and do-while, right?

> f-strings are the best thing that happened to Python recently.

I still prefer printf-style formatting. It works across so many different 
languages ... even Lisp.