topic Re: Fortran90 and NAMELIST in Operating System - Linux

Fortran90 and NAMELIST

Don Leonard — Mon, 10 Mar 2008 15:55:01 GMT

We are moving from F90 version 2.6 to version 3.1. A namelist feature allowing a scalar subscript but multiple values no longer works, although HP's sample program and the Release Notes say it should. Example:

j(8) = 6, 7, 8

Is there a patch for this? So far I can't find any.

Re: Fortran90 and NAMELIST

DSN Rao — Thu, 13 Mar 2008 11:31:28 GMT

Hi Don,
can you pls let me know you are on whcih platform PA/IPF.
And let me know the library version that you are using.

Thanks,
satya

Re: Fortran90 and NAMELIST

Don Leonard — Thu, 13 Mar 2008 21:01:12 GMT

> can you pls let me know you are on whcih platform PA/IPF.
> And let me know the library version that you are using.

The platform is PA-RISC. For which library are you requesting the version?

Re: Fortran90 and NAMELIST

DSN Rao — Fri, 14 Mar 2008 03:33:54 GMT

version of libcl.2 is required.

what /usr/lib/libcl.2

Re: Fortran90 and NAMELIST

Don Leonard — Fri, 14 Mar 2008 14:45:12 GMT

We have tried two versions:

$ what /usr/lib/libcl.2
libcl.2:
Trap Library version UX.11.01.06 - 02/04/16
Unwind Library version UX.11.01.05 - 00/08/15
libIO77 HP HPUX [ Release B.11.23.21 ]
(hp700:hp/ux) Oct 6 2005
Copyright (c) 2001 Hewlett Packard.
HP Port of Compaq Convert RTL V0.0.00
HP Fortran of Alpha RT V0.0.00
Intel Fortran RTL V1.1-929 1+ 1-Aug-2003
fs_amod.s $Revision: 1.9.1.1 $
libcl.sl version B.11.XX.21 - Jun 22 2005
$ swlist -l product | grep -i libcl
PHSS_33901 1.0 LIBCL patch

and:

$ what /usr/lib/libcl.2
libcl.2:
Trap Library version UX.11.01.06 - 02/04/16
Unwind Library version UX.11.01.05 - 00/08/15
libIO77 HP HPUX [ Release B.11.23.22 ]
(hp700:hp/ux) Apr 24 2007
Copyright (c) 2001 Hewlett Packard.
HP Port of Compaq Convert RTL V0.0.00
HP Fortran of Alpha RT V0.0.00
Intel Fortran RTL V1.1-929 1+ 1-Aug-2003
fs_amod.s $Revision: 1.9.1.1 $
libcl.sl version B.11.XX.21 - Apr 24 2007
$ swlist -l product | grep -i libcl
PHSS_34880 1.0 LIBCL patch

Re: Fortran90 and NAMELIST

DSN Rao — Sat, 15 Mar 2008 04:33:20 GMT

Don,
This problem is fixed, fix will be available in upcoming patch. will update you soon with patch details.

$>f90 tmp.f -Wl,/palib/libcl.2
tmp.f
program TEST_NAMELIST

9 Lines Compiled
$>./a.out
34.54 45.34 87.3

sample program:
---------------
$>cat tmp.f
program test_namelist
character*10 filenm /'input1'/
real ARRAY_A(3)
namelist /ELEM/ ARRAY_A
open(5, file=filenm)
read(5, nml=ELEM)
close(15)
write (*,*),array_a
end program
$>cat input1
&ELEM
ARRAY_A(1)= 34.54, 45.34, 87.3
&END

Re: Fortran90 and NAMELIST

Don Leonard — Mon, 17 Mar 2008 20:23:09 GMT

A patch would be good news. Any idea what time frame we are talking about?

Re: Fortran90 and NAMELIST

Don Leonard — Wed, 28 May 2008 22:00:03 GMT

We ended up backleveling LIBCL to PHSS_28303.

Re: Fortran90 and NAMELIST

Satya Narsinga Rao — Thu, 29 May 2008 03:38:05 GMT

Hi Don,
You can try with PHSS_37907 libcl patch.

Thanks,
satya