gfxgfx
 
Please login or register.

Login with username, password and session length
 
gfx gfx
gfx
1617 Posts in 535 Topics by 779 Members - Latest Member: rhoronjeff@comcast.net December 02, 2022, 08:36:21 PM
*
gfx* Home | Help | Search | Login | Register | gfx
gfx
Absoft User Forum  |  Support  |  General  |  namelist reading problem with Absoft Pro Fortran v11
gfx
gfxgfx
 

Author Topic: namelist reading problem with Absoft Pro Fortran v11  (Read 4146 times)

khmoriym

  • Newbie
  • *
  • Posts: 1
namelist reading problem with Absoft Pro Fortran v11
« on: March 12, 2010, 12:23:36 AM »
Hi, dears.

I got Absoft Pro Fortran 95 v.11.0.2 and have a problem with
namelist reading.
(32bit Linux (intel) version, working on Ubuntu 9.04)

With the ver 11 compiler, it seems that elements of derived type
variables defined as an array are not read properly through namelist.
The below is a test program and the input for it.
The aa%y() and aa%z() are not read.
And, the read sentence only returns iostat=10021.

Ver 9 of the compiler worked without problem with the same program.
Other compilers like g95 and gfortran were also no problem.

I think it needs a fix.

khmoriym
-----8<--test program-------8<--------8<-------
program test
  integer :: a, b, c(5), ui, ist, uerr, i
  type mytype
    real(kind(1d0)) :: x, y(5), z(5)
  end type mytype
  type(mytype) :: aa
  namelist / vars / &
    a, b, c, aa

  ui = 9; uerr = 9
  a=0; b=0; c=0; aa%x=0; aa%y=0; aa%z=0
  open(unit=ui, file="in", status="old")
  read(ui, nml=vars, iostat=ist)
  write(*,*) "ist=", ist
  write(*,*) "a=", a
  write(*,*) "b=", b
  write(*,*) "c=", (c(i), i=1,5)
  write(*,*) "aa%x=", aa%x
  write(*,*) "aa%y=", (aa%y(i), i=1,5)
  write(*,*) "aa%z=", (aa%z(i), i=1,5)
end program test
-----8<-----input file "in" ----8<--------8<-------
&vars
a=1
c(3:5)=100 200 300
aa%x=1000
aa%y = 1 2 3 
aa%z(2) = 10 
aa%z(3) = 20 
/

« Last Edit: March 12, 2010, 01:02:08 AM by khmoriym »

forumadmin

  • Administrator
  • Sr. Member
  • *****
  • Posts: 333
Re: namelist reading problem with Absoft Pro Fortran v11
« Reply #1 on: March 12, 2010, 09:30:41 AM »
This is a known issue with V11.0 (and V10.2, V10.1, V10.0). It will fixed in the next sevice pack for V11.0. In the meantime, you can contact support@absoft.com for a resolution.

Absoft User Forum  |  Support  |  General  |  namelist reading problem with Absoft Pro Fortran v11
 

gfxgfx
gfx gfx
Powered by MySQL Powered by PHP Valid XHTML 1.0! Valid CSS!