Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP
Posting-Version: version B 2.10.1 6/24/83; site cubsvax.UUCP
Path: utzoo!watmath!clyde!burl!ulysses!allegra!mit-eddie!genrad!panda!talcott!harvard!cmcl2!rna!cubsvax!peters
From: peters@cubsvax.UUCP (Peter S. Shenkin)
Newsgroups: net.lang.f77
Subject: Re: Question on "Parameter" statement;  and a new question!
Message-ID: <413@cubsvax.UUCP>
Date: Wed, 29-Jan-86 20:47:18 EST
Article-I.D.: cubsvax.413
Posted: Wed Jan 29 20:47:18 1986
Date-Received: Sat, 1-Feb-86 03:27:24 EST
References: <410@cubsvax.UUCP> <utah-cs.3651>
Reply-To: peters@cubsvax.UUCP (Peter S. Shenkin)
Organization: Columbia Univ. Bio. CG Fac., NY
Lines: 32

In article <utah-cs.3651> donn@utah-cs.UUCP (Donn Seeley) writes:
>Peter Shenkin asks why
>
>	parameter (size = 10)
>	character*size string
>
>doesn't work.
> 		    .....
>				What was intended was probably:
>	parameter (size = 10)
>	character*(size) string
>
>My reading of the standard indicates that only integer constants (and
>not symbolic names of integer constants) may appear naked as length
>specifications.....
>
>ISNTFORTRANWONDERFUL,
>
>Donn Seeley    University of Utah CS Dept    donn@utah-cs.arpa
>40 46' 6"N 111 50' 34"W    (801) 581-5668    decvax!utah-cs!donn

OK, so I tried it the way you wrote it.  Now it runs just fine under VMS,
but under ULTRIX (presumably the 4.2bsd f77 compiler) it bombs out, but
only because it thinks "size" is a REAL;  "isize" works just fine.  So a
new question:  I always thought PARAMETER definitions were not subject to
the IMPLICIT rules;  VMS Fortran behaves according to my preconception, at 
least in this example.  So am I wrong, or is this YAf77B* ?

Peter S. Shenkin,  Columbia Univ. Biol. Sciences, NY, NY
{philabs,rna}!cubsvax!peters		cubsvax!peters@columbia.ARPA

* (Yet Another f77 Bug.)