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


Attachment: arch.make
Description: Binary data

Responder a