Path: utzoo!attcan!utgpu!jarvis.csri.toronto.edu!cs.utexas.edu!wuarchive!mailrus!purdue!decwrl!sgi!calvin@dinkum.wpd.sgi.com
From: calvin@dinkum.wpd.sgi.com (Calvin H. Vu)
Newsgroups: comp.sys.mips
Subject: Re: f77 large arrays
Message-ID: <45684@sgi.sgi.com>
Date: 4 Dec 89 20:00:08 GMT
References: <32418@servitude.mips.COM> <1989Dec4.001807.14183@sobmips.UUCP>
Sender: calvin@dinkum.wpd.sgi.com
Organization: Silicon Graphics, Inc., Mountain View, CA
Lines: 29

> >>When compiling the following program i get an error in  as1
> >>
> >>      dimension i(800000)
> >>      data i/800000*0/
> >>      stop
> >>      end
> >>

Another possible explaination is that you run out of space in the default 
temporary directory /tmp which is used by the compiler to write out all
the intermediate files (ucode, assembler code, symbol table, etc.). 
Personally, I don't have any problem compiling your test case on my machine
which is an SGI 4D/70 with 50M of swap space and 6M of available disk space
in the /tmp file system and the MIPS 1.31 Fortran release.

If you have very little space left in the /tmp file system you can try:
	setenv TMPDIR /usr/tmp
to tell the F77 driver to use /usr/tmp for the intermediate files (assuming
you have more space in /usr/lib or whatever directory that gives you more
room).   I'm fairly certain that the MIPS driver allows the same environment
variable.

Some people have run into the limit where the array size is bigger than the
value that can be represented in a 32-bit integer but for anything smaller
than that there shouldn't be any problem in the compiler itself (I've seen
many arrays which are a LOT bigger than the one in your example).  The only
limitation must be in the hardware configuration somewhere...  Hmmm....

Calvin Vu