Path: utzoo!utgpu!news-server.csri.toronto.edu!rpi!think.com!zaphod.mps.ohio-state.edu!wuarchive!uunet!munnari.oz.au!uniwa!cc.curtin.edu.au!tlynchmj
From: tlynchmj@cc.curtin.edu.au
Newsgroups: comp.lang.fortran
Subject: A Q of constants
Message-ID: <1991May24.111123.8396@cc.curtin.edu.au>
Date: 24 May 91 03:11:22 GMT
Organization: Curtin University of Technology
Lines: 26


I have a problem initializing a constant array, can someone tell
me how to do it.

I want an array of characters to be initialiized as constants at compile time
and it has to be ANSI standard, more specifically, it must compile under
VAX-VMS F77 with the /STANDARD option invoked.

I tried this...

      CHARACTER SYMS(6)
      PARAMETER (SYMS = 'abcdef')

which gave me a 'symbol to big for constant' or something like that error.
Then I tried this...

      CHARACTER SYMS(6)
      PARAMETER (SYMS(1) = 'a',
     +           SYMS(2) = 'b',

       blah blah

and it gave me an implied do error. I thought that the second should work
for sure. Any tips?

Huw