[QE-users] Error in installing thermo_pw with qe-6.5

[Pooja Vyas]

Dear users,
I'm trying to install thermo_pw with qe-6.5. All steps of installation are
done but at last when I give the command 'make' in thermo_pw directory, I
face the following error:

( cd lib ; make all || exit 1 )
make[1]: Entering directory '/home/pooja/qe-6.5/thermo_pw/lib'
mpif90 -O3 -g -fopenmp -x f95-cpp-input -fopenmp -D__FFTW -D__MPI
-I/home/pooja/qe-6.5//include -I/home/pooja/qe-6.5//FoX/finclude
-I/home/pooja/qe-6.5//S3DE/iotk/include/ -I/home/pooja/qe-6.5//iotk/src
-I/home/pooja/qe-6.5//Modules -I/home/pooja/qe-6.5//FFTXlib
-I/home/pooja/qe-6.5//LAXlib -I/home/pooja/qe-6.5//UtilXlib
-I/home/pooja/qe-6.5//FoX/finclude -I. -c voigt.f90
voigt.f90:143:27:

  142 |    DO ij=1,6
      |            2
  143 |       CALL voigt_index(i,j,ij,.FALSE.)
      |                           1
Error: Variable ‘ij’ at (1) not definable inside loop beginning at (2) as
INTENT(INOUT) argument to subroutine ‘voigt_index’
voigt.f90:145:30:

  144 |       DO mn=1,6
      |               2
  145 |          CALL voigt_index(m,n,mn,.FALSE.)
      |                              1
Error: Variable ‘mn’ at (1) not definable inside loop beginning at (2) as
INTENT(INOUT) argument to subroutine ‘voigt_index’
voigt.f90:153:26:

  151 |    DO i=1,3
      |           2
  152 |       DO j=1,3
  153 |          CALL voigt_index(i,j,ij,.TRUE.)
      |                          1
Error: Variable ‘i’ at (1) not definable inside loop beginning at (2) as
INTENT(INOUT) argument to subroutine ‘voigt_index’
voigt.f90:153:28:

  152 |       DO j=1,3
      |              2
  153 |          CALL voigt_index(i,j,ij,.TRUE.)
      |                            1
Error: Variable ‘j’ at (1) not definable inside loop beginning at (2) as
INTENT(INOUT) argument to subroutine ‘voigt_index’
voigt.f90:156:32:

  154 |          DO m=1,3
      |                 2
  155 |             DO n=1,3
  156 |                CALL voigt_index(m,n,mn,.TRUE.)
      |                                1
Error: Variable ‘m’ at (1) not definable inside loop beginning at (2) as
INTENT(INOUT) argument to subroutine ‘voigt_index’
voigt.f90:156:34:

  155 |             DO n=1,3
      |                    2
  156 |                CALL voigt_index(m,n,mn,.TRUE.)
      |                                  1
Error: Variable ‘n’ at (1) not definable inside loop beginning at (2) as
INTENT(INOUT) argument to subroutine ‘voigt_index’
voigt.f90:110:27:

  109 |    DO ij=1,6
      |            2
  110 |       CALL voigt_index(i,j,ij,.FALSE.)
      |                           1
Error: Variable ‘ij’ at (1) not definable inside loop beginning at (2) as
INTENT(INOUT) argument to subroutine ‘voigt_index’
voigt.f90:117:26:

  115 |    DO i=1,3
      |           2
  116 |       DO j=1,3
  117 |          CALL voigt_index(i,j,ij,.TRUE.)
      |                          1
Error: Variable ‘i’ at (1) not definable inside loop beginning at (2) as
INTENT(INOUT) argument to subroutine ‘voigt_index’
voigt.f90:117:28:

  116 |       DO j=1,3
      |              2
  117 |          CALL voigt_index(i,j,ij,.TRUE.)
      |                            1
Error: Variable ‘j’ at (1) not definable inside loop beginning at (2) as
INTENT(INOUT) argument to subroutine ‘voigt_index’
voigt.f90:77:27:

   76 |    DO ij=1,6
      |            2
   77 |       CALL voigt_index(i,j,ij,.FALSE.)
      |                           1
Error: Variable ‘ij’ at (1) not definable inside loop beginning at (2) as
INTENT(INOUT) argument to subroutine ‘voigt_index’
voigt.f90:84:26:

   82 |    DO i=1,3
      |           2
   83 |       DO j=1,3
   84 |          CALL voigt_index(i,j,ij,.TRUE.)
      |                          1
Error: Variable ‘i’ at (1) not definable inside loop beginning at (2) as
INTENT(INOUT) argument to subroutine ‘voigt_index’
voigt.f90:84:28:

   83 |       DO j=1,3
      |              2
   84 |          CALL voigt_index(i,j,ij,.TRUE.)
      |                            1
Error: Variable ‘j’ at (1) not definable inside loop beginning at (2) as
INTENT(INOUT) argument to subroutine ‘voigt_index’
make[1]: *** [../../make.inc:16: voigt.o] Error 1
make[1]: Leaving directory '/home/pooja/qe-6.5/thermo_pw/lib'
make: *** [Makefile:15: thermo_lib] Error 1

Can anyone please suggest some solution to remove this error and install
thermo_pw perfectly?
Any kind of help would be appreciated!! Not being a fortran expert, I
cannot edit the file which has errors related to this.
Thanks and regards.
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.quantum-espresso.org/pipermail/users/attachments/20200618/468f8343/attachment.html>