compilation error

[wys0924]

Hello,
I added some codes into VASP, no any syntax error occurs.
all the errors are listed as follows. especially, I was puzzled by the errors from the original codes due to the inclusion of the added codes

your suggestion is welcome


fortcom: Error: main.f90, line 262: The attributes of this name conflict with those made accessible by a USE statement. [Q]
REAL(q),PARAMETER :: Aa=11.4534_q, Bb=16.2000_q,Cc=17.1801_q, Q=0.3_q,P=0.95_q
--------------------------------------------------------------------^
fortcom: Error: main.f90, line 262: This name has already been assigned a data type. [P]
REAL(q),PARAMETER :: Aa=11.4534_q, Bb=16.2000_q,Cc=17.1801_q, Q=0.3_q,P=0.95_q
-----------------------------------------------------------------------^
fortcom: Error: main.f90, line 262: The PARAMETER attribute must not be specified for a deferred-shape array. [P]
REAL(q),PARAMETER :: Aa=11.4534_q, Bb=16.2000_q,Cc=17.1801_q, Q=0.3_q,P=0.95_q
-----------------------------------------------------------------------^
fortcom: Error: main.f90, line 262: The attributes of this name conflict with those made accessible by a USE statement. [Q]
REAL(q),PARAMETER :: Aa=11.4534_q, Bb=16.2000_q,Cc=17.1801_q, Q=0.3_q,P=0.95_q
-----------------------------------------------------------------------------^
fortcom: Error: main.f90, line 263: The attributes of this name conflict with those made accessible by a USE statement. [Q]
REAL(q) D_X,D_Y,D_Z,EPS(4), EPS_M,EPS_M_Q,A_EPS_M
-----^
fortcom: Error: main.f90, line 263: This is an incorrect value for a kind type parameter in this context. [Q]
REAL(q) D_X,D_Y,D_Z,EPS(4), EPS_M,EPS_M_Q,A_EPS_M
-----^
fortcom: Error: main.f90, line 264: The attributes of this name conflict with those made accessible by a USE statement. [Q]
REAL(q) ADD_FOR(3,81),FICH(3,81)
-----^
fortcom: Error: main.f90, line 264: This is an incorrect value for a kind type parameter in this context. [Q]
REAL(q) ADD_FOR(3,81),FICH(3,81)
-----^
fortcom: Error: main.f90, line 265: The attributes of this name conflict with those made accessible by a USE statement. [Q]
REAL(q) SUM_V
-----^
fortcom: Error: main.f90, line 265: This is an incorrect value for a kind type parameter in this context. [Q]
REAL(q) SUM_V
-----^
fortcom: Error: main.f90, line 266: The attributes of this name conflict with those made accessible by a USE statement. [Q]
REAL(q) DELT_V
-----^
fortcom: Error: main.f90, line 266: This is an incorrect value for a kind type parameter in this context. [Q]
REAL(q) DELT_V
-----^
fortcom: Error: main.f90, line 267: The attributes of this name conflict with those made accessible by a USE statement. [Q]
REAL(q) RICH_1, RICH_2
-----^
fortcom: Error: main.f90, line 267: This is an incorrect value for a kind type parameter in this context. [Q]
REAL(q) RICH_1, RICH_2
-----^
fortcom: Error: main.f90, line 292: The attributes of this name conflict with those made accessible by a USE statement. [Q]
COMPLEX(q),ALLOCATABLE:: CHTOT(:,:) ! charge-density in real / reciprocal space
--------------^
fortcom: Error: main.f90, line 292: This is an incorrect value for a kind type parameter in this context. [Q]
COMPLEX(q),ALLOCATABLE:: CHTOT(:,:) ! charge-density in real / reciprocal space
--------------^
fortcom: Error: main.f90, line 293: The attributes of this name conflict with those made accessible by a USE statement. [Q]
COMPLEX(q),ALLOCATABLE:: CHTOTL(:,:) ! old charge-density
--------------^
fortcom: Error: main.f90, line 293: This is an incorrect value for a kind type parameter in this context. [Q]
COMPLEX(q),ALLOCATABLE:: CHTOTL(:,:) ! old charge-density
--------------^
fortcom: Error: main.f90, line 294: The attributes of this name conflict with those made accessible by a USE statement. [Q]
REAL(q) ,ALLOCATABLE:: DENCOR(:) ! partial core
-----------^
fortcom: Error: main.f90, line 294: This is an incorrect value for a kind type parameter in this context. [Q]
REAL(q) ,ALLOCATABLE:: DENCOR(:) ! partial core
-----------^
fortcom: Error: main.f90, line 295: The attributes of this name conflict with those made accessible by a USE statement. [Q]
COMPLEX(q),ALLOCATABLE:: CVTOT(:,:) ! local potential
--------------^
fortcom: Error: main.f90, line 295: This is an incorrect value for a kind type parameter in this context. [Q]
COMPLEX(q),ALLOCATABLE:: CVTOT(:,:) ! local potential
--------------^
fortcom: Error: main.f90, line 296: The attributes of this name conflict with those made accessible by a USE statement. [Q]
COMPLEX(q),ALLOCATABLE:: CSTRF(:,:) ! structure-factor
--------------^
fortcom: Error: main.f90, line 296: This is an incorrect value for a kind type parameter in this context. [Q]
COMPLEX(q),ALLOCATABLE:: CSTRF(:,:) ! structure-factor
--------------^
fortcom: Error: main.f90, line 300: The attributes of this name conflict with those made accessible by a USE statement. [Q]
REAL(q),ALLOCATABLE:: CDIJ(:,:,:,:) ! strength of PP
-----------^
fortcom: Error: main.f90, line 300: This is an incorrect value for a kind type parameter in this context. [Q]
REAL(q),ALLOCATABLE:: CDIJ(:,:,:,:) ! strength of PP
-----------^
fortcom: Error: main.f90, line 301: The attributes of this name conflict with those made accessible by a USE statement. [Q]
REAL(q),ALLOCATABLE:: CQIJ(:,:,:,:) ! overlap of PP
-----------^
fortcom: Error: main.f90, line 301: This is an incorrect value for a kind type parameter in this context. [Q]
REAL(q),ALLOCATABLE:: CQIJ(:,:,:,:) ! overlap of PP
-----------^
fortcom: Error: main.f90, line 302: The attributes of this name conflict with those made accessible by a USE statement. [Q]
REAL(q),ALLOCATABLE:: CRHODE(:,:,:,:) ! augmentation occupancies
-----------^
fortcom: Error: main.f90, line 302: This is an incorrect value for a kind type parameter in this context. [Q]
REAL(q),ALLOCATABLE:: CRHODE(:,:,:,:) ! augmentation occupancies
-----------^

[admin]

sorry, there is no support for changes you make in the code.