Dear Seema In this case your compiler seems to be a bit old. Could you supply more information about it? Version of gnu, etc. I would suspect that your compiler is not fully F95 aware.
Furthermore, several new versions of siesta has been released since the 3.0-rc2 version, so I suggest you to update to a more recent version (remember to compare results from the different versions). Kind regards Nick 2013/4/1, seema dogra <[email protected]>: > > Hello users > > While compiling TBTrans i got following errors: > > In file m_tbt_gf.F90:57 > > double precision, allocatable, dimension (:,:) :: H, xij > 1 > Error: ALLOCATABLE attribute conflicts with DUMMY attribute at (1) > In file m_tbt_gf.F90:58 > > integer, allocatable, dimension (:) :: ix > 1 > Error: > ALLOCATABLE attribute conflicts with DUMMY attribute at (1) > In file m_tbt_gf.F90:59 > > double precision, allocatable, dimension (:) :: S,efs > 1 > Error: ALLOCATABLE attribute conflicts with DUMMY attribute at (1) > In file m_tbt_gf.F90:60 > > integer, allocatable, dimension (:) :: listh, listhptr, numh, indxuo > 1 > Error: ALLOCATABLE attribute conflicts with DUMMY attribute at (1) > In file > m_tbt_gf.F90:67 > > allocate(H(maxnh,nspin)) > 1 > Error: Syntax error in ALLOCATE statement at (1) > In file m_tbt_gf.F90:68 > > allocate(S(maxnh)) > 1 > Error: Syntax error in ALLOCATE statement at (1) > In file m_tbt_gf.F90:69 > > allocate(indxuo(notot)) > 1 > Error: Syntax error in ALLOCATE statement at (1) > In file m_tbt_gf.F90:70 > > allocate(listh(maxnh)) > 1 > Error: Syntax error in ALLOCATE statement at (1) > In file m_tbt_gf.F90:71 > > allocate(listhptr(nuotot)) > 1 > Error: Syntax error in ALLOCATE statement at (1) > In file > m_tbt_gf.F90:72 > > allocate(numh(nuotot)) > 1 > Error: Syntax error in ALLOCATE statement at (1) > In file m_tbt_gf.F90:73 > > allocate(efs(nspin)) > 1 > Error: Syntax error in ALLOCATE statement at (1) > In file m_tbt_gf.F90:74 > > allocate(ix(maxnh)) > 1 > Error: Syntax error in ALLOCATE statement at (1) > In file m_tbt_gf.F90:75 > > if (.not.gamma) allocate(xij(3,maxnh)) > 1 > Error: Syntax error in ALLOCATE statement at (1) > In file m_tbt_gf.F90:54 > > subroutine alloc_gf_vars(H,S,xij,indxuo,listh,listhptr,numh,efs, ix, > & > 1 > Error: Symbol 'h' at (1) has no IMPLICIT type > In file m_tbt_gf.F90:54 > > subroutine alloc_gf_vars(H,S,xij,indxuo,listh,listhptr,numh,efs, ix, & > 1 > Error: Symbol 's' at (1) has no IMPLICIT type > In file m_tbt_gf.F90:54 > > subroutine alloc_gf_vars(H,S,xij,indxuo,listh,listhptr,numh,efs, ix, & > 1 > Error: Symbol 'xij' at (1) has no IMPLICIT type > In file m_tbt_gf.F90:54 > > subroutine > alloc_gf_vars(H,S,xij,indxuo,listh,listhptr,numh,efs, ix, & > 1 > Error: Symbol 'indxuo' at (1) has no IMPLICIT type > In file m_tbt_gf.F90:54 > > subroutine alloc_gf_vars(H,S,xij,indxuo,listh,listhptr,numh,efs, ix, & > 1 > Error: Symbol 'listh' at (1) has no IMPLICIT type > In file m_tbt_gf.F90:54 > > subroutine alloc_gf_vars(H,S,xij,indxuo,listh,listhptr,numh,efs, ix, > & > 1 > Error: Symbol 'listhptr' at (1) has no IMPLICIT type > In file m_tbt_gf.F90:54 > > subroutine alloc_gf_vars(H,S,xij,indxuo,listh,listhptr,numh,efs, ix, & > 1 > Error: Symbol 'numh' at (1) has no IMPLICIT type > In file m_tbt_gf.F90:54 > > subroutine > alloc_gf_vars(H,S,xij,indxuo,listh,listhptr,numh,efs, ix, & > 1 > Error: Symbol 'efs' at (1) has no IMPLICIT type > In file m_tbt_gf.F90:54 > > subroutine alloc_gf_vars(H,S,xij,indxuo,listh,listhptr,numh,efs, ix, > & > 1 > Error: Symbol 'ix' at (1) has no IMPLICIT type > In file m_tbt_gf.F90:824 > > call alloc_gf_vars(LH,LS,Lxij,Lindxuo,Llisth,Llisthptr,Lnumh & > 1 > Error: Type/rank mismatch in argument 'h' at (1) > In file m_tbt_gf.F90:834 > > > call alloc_gf_vars(RH,RS,Rxij,Rindxuo,Rlisth,Rlisthptr,Rnumh & > 1 > Error: Type/rank mismatch in argument 'h' at (1) > make: *** [m_tbt_gf.o] Error 1 > > I am using siesta-3.0-rc2 version. The arch.make file used for compilation > is attached herewith. I have also tried non-parallel version but the same > problem exists. I have already checked the related post on the mailing list > but nothing worked in my case. > Kindly help. > > Regards > Seema > > >
