Thank you very much. Now it seems to work


-----Original message-----
From: Heribert Reis <[email protected]>
Sent: Thursday 11th June 2015 17:30
To: [email protected]
Subject: Re: [SIESTA-L] Problems installing Util Optimizer

Hallo,
It should be 'intent' in line 2, not 'intend'.

Heribert

On Thu, Jun 11, 2015 at 3:32 PM, Ludwig, Stephan 
<[email protected] 
<mailto:[email protected]> > wrote:
 

Hi,

I want to optimize a Basis set for As.

Unfortunately I have proplems to install the optimization programm.

typing 'make swarm simplex' in 'siesta-3.2-pl-5/Util/Optimizer'   I receive the 
error message


i1@QuanQal2:/home/siesta-3.2-pl-5/Util/Optimizer$ sudo make swarm simplex

f77 -c io.f
 io_assign:
Error on line 2: syntax error
Warning on line 13: ignoring text after "end".
Warning on line 13: local variable out never used
Warning on line 13: local variable intend never used
Error on line 13: Declaration error for intend: adjustable dimension on 
non-argument
/usr/bin/f77: aborting compilation
make: *** [io.o] Fehler 25


The io.f file looks like this

 
 SUBROUTINE io_assign(lun)
 integer intend(out) :: lun
 logical used
 integer iostat
c
c Looks for a free unit and assigns it to lun
c
 do lun= 10, 99
 inquire(unit=lun, opened=used, iostat=iostat)
 if (iostat .ne. 0) used = .true.
 if (.not. used) return
 enddo
 end SUBROUTINE io_assign

 


Can anybody help me to find the syntax error?

 
Best regards

Stephan

 



Responder a