It appears that you are using a pretty old version of the Cray compiler.
The current releases do not have problems with these statements.
Cheers,
Bill
On 3/12/12 3:40 AM, Oliver Fuhrer wrote:
> Good morning (at least for those in Europe),
>
> The Cray compiler is giving an error (ftn-842, The initialization expression used on a type declaration statement must be a constant expression) on the following line...
>
> type t_netcdf_var
> type(t_table) ,pointer :: table => NULL() ! table of valid values
> real(kind=dp) :: rinvalid = -HUGE(1.0_dp)! .. this variable
> end type t_netcdf_var
>
> ...which is using the HUGE intrinsic to initialize a parameter. Using the NULL() seems to work fine, though. A workaround which works fine and without warning...
>
> real(kind=dp), parameter :: lundef = -HUGE(1.0_dp)
>
> type t_netcdf_var
> type(t_table) ,pointer :: table => NULL()
> real(kind=dp) :: rinvalid = lundef
> end type t_netcdf_var
>
> Any strong opinions on this?
>
> Cheers,
> Oli
>
>> -----Original Message-----
>> From: Fortran 90 List [mailto:[log in to unmask]] On
>> Behalf Of Ian Chivers
>> Sent: Freitag, 9. März 2012 19:59
>> To: [log in to unmask]
>> Subject: Re: IBM compilers
>>
>> From the list of supported operating systems
>>
>> Operating systems supported MicrosoftR WindowsR Server 2008 R2, Red Hat
>> Enterprise LinuxR, SUSE Linux Enterprise, VMware ESX and ESXi
>>
>> taken from
>>
>> http://www-03.ibm.com/systems/x/hardware/tower/x3500m3/specs.html
>>
>> I would have thought no.
>>
>> This would seem to be supported by
>>
>> Product Editions
>> XL Fortran for AIX
>>
>> A high-performance optimizing compiler designed to maximize the
>> performance
>> of HPC applications on Power Systems, and enable development of parallel
>> applications that exploit multi-core and vector features of Power
>> processors.
>> XL Fortran for Linux
>>
>> A high-performance optimizing compiler designed to maximize the
>> performance
>> of HPC applications on Power Systems, and enable development of parallel
>> applications that exploit multi-core and vector features of Power
>> processors.
>> XL Fortran Advanced Edition for Blue Gene
>>
>> A high-performance optimizing compiler designed to exploit Blue Gene
>> supercomputers through intrinsic functions and performance-tuned libraries.
>> VS FORTRAN
>>
>> Provides superior tools for superior performance. Supported on z/OS and
>> z/VM.
>>
>> available at
>>
>> http://www-01.ibm.com/software/awdtools/fortran/
>>
>> hope this helps
>>
>> ian
>>
>> -----Original Message-----
>> From: Fortran 90 List [mailto:[log in to unmask]] On
>> Behalf Of
>> Norman S. Clerman
>> Sent: 09 March 2012 16:13
>> To: [log in to unmask]
>> Subject: IBM compilers
>>
>> Hello everyone,
>>
>> Does IBM have a version of their Fortran compiler for their System X
>> computers?
>>
>> Norm Clerman
--
Bill Long [log in to unmask]
Fortran Technical Support & voice: 651-605-9024
Bioinformatics Software Development fax: 651-605-9142
Cray Inc./Cray Plaza, Suite 210/380 Jackson St./St. Paul, MN 55101
|