Paolo,
Thanks for your email.
"PG" == Paolo Giannozzi wrote:
PG> On Sunday 16 April 2006 00:14, Andrey Khavryuchenko wrote:
>> g95 -O3 -cpp -D__LINUX -D__G95 -D__FFTW -I../include -I. -I../Modules
>> -I../PW -I../PH -I../iotk/src -c ptoolkit.f90 ptoolkit.f90:0: internal
>> compiler error: Segmentation fault
>> Please submit a full bug report, with preprocessed source if appropriate.
>> See http://www.g95.org or mail andyv at firstinter.net for instructions.
>> Are there any success stories with g95?
PG> I tried several different versions of g95 in the past (for instance:
PG> G95 (GCC 4.0.1 (g95!) Dec 14 2005) with success. Please do what
PG> the message says: submit a bug report to the author of g95
Before reporting the bug, I've updated my g95 installation to the most
recent binary available:
akhavr at t30 ~/src/espresso-3.0 $ g95 --version
G95 (GCC 4.0.3 (g95!) Apr 25 2006)
Copyright (C) 2002-2005 Free Software Foundation, Inc.
Now I fail at cell_base.f90 compilation:
g95 -O3 -cpp -D__LINUX -D__G95 -D__FFTW -I../include -I. -I../Modules -I../PW -I../PH -I../iotk/src -c cell_base.f90
In file cell_base.f90:75
REAL(DP) :: at(3,3) = RESHAPE( (/ 0.0d0 /), (/ 3, 3 /), (/ 0.0d0 /) )
1
Error: Array assignment at (1) has different shape on dimension 1 (3/9)
In file cell_base.f90:76
REAL(DP) :: bg(3,3) = RESHAPE( (/ 0.0d0 /), (/ 3, 3 /), (/ 0.0d0 /) )
1
Error: Array assignment at (1) has different shape on dimension 1 (3/9)
In file cell_base.f90:521
celldm(1) = SQRT( at(1,1)**2 + at(1,2)**2 + at(1,3)**2 )
1
Error: Unexpected array reference at (1)
...
(so on for other 'at' references)
--
Andrey V Khavryuchenko http://www.kds.com.ua/
Silver Bullet Software Solutions http://www.livejournal.com/~akhavr