Path: ...!2.eu.feeder.erje.net!feeder.erje.net!eternal-september.org!feeder3.eternal-september.org!news.eternal-september.org!.POSTED!not-for-mail
From: Lawrence D'Oliveiro <ldo@nz.invalid>
Newsgroups: comp.lang.fortran
Subject: Re: Is there a way in Fortran to designate an integer value as
 integer*8 ?
Date: Thu, 3 Oct 2024 22:08:25 -0000 (UTC)
Organization: A noiseless patient Spider
Lines: 6
Message-ID: <vdn4kp$3ssv4$9@dont-email.me>
References: <vdict2$339ak$1@dont-email.me> <vdir24$35104$1@dont-email.me>
	<vdk718$3bulb$1@dont-email.me> <vdl6fi$3jra3$2@dont-email.me>
	<vdlfpl$3l0f5$1@dont-email.me> <vdmbml$3p2dv$1@dont-email.me>
	<vdmrgc$3rih7$2@dont-email.me>
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit
Injection-Date: Fri, 04 Oct 2024 00:08:26 +0200 (CEST)
Injection-Info: dont-email.me; posting-host="53e6a1f358fb9450cb41203dd8d281a9";
	logging-data="4092900"; mail-complaints-to="abuse@eternal-september.org";	posting-account="U2FsdGVkX19DjlnAywLSLfXf3qSgG97I"
User-Agent: Pan/0.160 (Toresk; )
Cancel-Lock: sha1:2nmSIMwRw35sbJewi5UrdyZHg+4=
Bytes: 1416

On Thu, 3 Oct 2024 14:32:28 -0500, Lynn McGuire wrote:

> I have 197 common blocks included from dedicated files and a massive
> number of equivalences all over the place.

Try getting rid of at least some of them, by using “contains”.