Hello,
Have you tried defining, say, four (sub)arrays,
and constructing the final array from the concatenation
of the subarrays?
e.g.,
type( foo), dimension( 30), parameter :: fooarray1 = (/
fooarray1( 1) = foo( blah blah)
fooarray1( 2) = ...
type( foo, dimension( 30), parameter :: fooarray2 = (/
<similarly>
and then defining your "actual" parameter array
type( foo), dimension( 120), parameter :: &
fooarray = (/ fooarray1, fooarray2, fooarray3, fooarray4 /)
with private and reshape as needed?
Roland Schilling wrote:
>
> I have the following problem:
>
> I want to set-up a large PARAMETER array of derived type, and I
> need a separate line for each element. The problem now is
> that Fortran 90/95 only allows 39 continuation lines, but I need
> something like 120. Any ideas how to solve this?
>
> Thanks in advance,
> Roland
>
>
> +----------------------------------------------------------------------+
> | Roland Schilling Home-Office: +49(89)32929-670 |
> | Max-Planck-Institut fuer Quantenoptik Phone: +49(89)32905-265 |
> | Hans-Kopfermann-Str. 1 Fax: +49(89)32905-200 |
> | D-85748 Garching E-mail: [log in to unmask] |
> | Germany http://www.geo600.uni-hannover.de |
> +----------------------------------------------------------------------+
--
Cheers!
Dan Nagle [log in to unmask]
Purple Sage Computing Solutions, Inc.
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
|