Merge remote-tracking branch 'origin/5.3'

configure

@@ -1,6 +1,6 @@
 #! /bin/sh
 # Guess values for system-dependent variables and create Makefiles.
-# Generated by GNU Autoconf 2.71 for Yambo 5.3.0 r.23903 h.b73233268.
+# Generated by GNU Autoconf 2.71 for Yambo 5.3.0 r.23906 h.8a510177c.
 #
 # Report bugs to <yambo@yambo-code.org>.
 #
@@ -610,8 +610,8 @@ MAKEFLAGS=
 # Identity of this package.
 PACKAGE_NAME='Yambo'
 PACKAGE_TARNAME='yambo'
-PACKAGE_VERSION='5.3.0 r.23903 h.b73233268'
-PACKAGE_STRING='Yambo 5.3.0 r.23903 h.b73233268'
+PACKAGE_VERSION='5.3.0 r.23906 h.8a510177c'
+PACKAGE_STRING='Yambo 5.3.0 r.23906 h.8a510177c'
 PACKAGE_BUGREPORT='yambo@yambo-code.org'
 PACKAGE_URL=''
 
@@ -1659,7 +1659,7 @@ if test "$ac_init_help" = "long"; then
   # Omit some internal or obsolete options to make the list less imposing.
   # This message is too long to be a string in the A/UX 3.1 sh.
   cat <<_ACEOF
-\`configure' configures Yambo 5.3.0 r.23903 h.b73233268 to adapt to many kinds of systems.
+\`configure' configures Yambo 5.3.0 r.23906 h.8a510177c to adapt to many kinds of systems.
 
 Usage: $0 [OPTION]... [VAR=VALUE]...
 
@@ -1725,7 +1725,7 @@ fi
 
 if test -n "$ac_init_help"; then
   case $ac_init_help in
-     short | recursive ) echo "Configuration of Yambo 5.3.0 r.23903 h.b73233268:";;
+     short | recursive ) echo "Configuration of Yambo 5.3.0 r.23906 h.8a510177c:";;
    esac
   cat <<\_ACEOF
 
@@ -1967,7 +1967,7 @@ fi
 test -n "$ac_init_help" && exit $ac_status
 if $ac_init_version; then
   cat <<\_ACEOF
-Yambo configure 5.3.0 r.23903 h.b73233268
+Yambo configure 5.3.0 r.23906 h.8a510177c
 generated by GNU Autoconf 2.71
 
 Copyright (C) 2021 Free Software Foundation, Inc.
@@ -2596,7 +2596,7 @@ cat >config.log <<_ACEOF
 This file contains any messages produced by compilers while
 running configure, to aid debugging if configure makes a mistake.
 
-It was created by Yambo $as_me 5.3.0 r.23903 h.b73233268, which was
+It was created by Yambo $as_me 5.3.0 r.23906 h.8a510177c, which was
 generated by GNU Autoconf 2.71.  Invocation command line was
 
   $ $0$ac_configure_args_raw
@@ -3354,8 +3354,8 @@ ac_compiler_gnu=$ac_cv_c_compiler_gnu
 SVERSION="5"
 SSUBVERSION="3"
 SPATCHLEVEL="0"
-SREVISION="23903"
-SHASH="b73233268"
+SREVISION="23906"
+SHASH="8a510177c"
 
 
 
@@ -17784,7 +17784,7 @@ cat >>$CONFIG_STATUS <<\_ACEOF || ac_write_fail=1
 # report actual input values of CONFIG_FILES etc. instead of their
 # values after options handling.
 ac_log="
-This file was extended by Yambo $as_me 5.3.0 r.23903 h.b73233268, which was
+This file was extended by Yambo $as_me 5.3.0 r.23906 h.8a510177c, which was
 generated by GNU Autoconf 2.71.  Invocation command line was
 
   CONFIG_FILES    = $CONFIG_FILES
@@ -17848,7 +17848,7 @@ ac_cs_config_escaped=`printf "%s\n" "$ac_cs_config" | sed "s/^ //; s/'/'\\\\\\\\
 cat >>$CONFIG_STATUS <<_ACEOF || ac_write_fail=1
 ac_cs_config='$ac_cs_config_escaped'
 ac_cs_version="\\
-Yambo config.status 5.3.0 r.23903 h.b73233268
+Yambo config.status 5.3.0 r.23906 h.8a510177c
 configured by $0, generated by GNU Autoconf 2.71,
   with options \\"\$ac_cs_config\\"
 

include/version/version.m4

@@ -1,9 +1,9 @@
-AC_INIT(Yambo, 5.3.0 r.23903 h.b73233268, yambo@yambo-code.org)
+AC_INIT(Yambo, 5.3.0 r.23906 h.8a510177c, yambo@yambo-code.org)
 SVERSION="5"
 SSUBVERSION="3"
 SPATCHLEVEL="0"
-SREVISION="23903"
-SHASH="b73233268"
+SREVISION="23906"
+SHASH="8a510177c"
 AC_SUBST(SVERSION)
 AC_SUBST(SSUBVERSION)
 AC_SUBST(SPATCHLEVEL)

src/nloptics/el_density_vbands.F

@@ -54,8 +54,7 @@ subroutine el_density_vbands(en,Xk,rho,VAL_BANDS)
    if (.not.PAR_IND_Xk_ibz%element_1D(ik)) cycle
    ik_mem=PAR_Xk_ibz_index(ik)
    !
-   !$omp parallel do, default(shared), private(is,ir), &
-   !$omp              reduction(+:rho_no_sym), collapse(2)
+   !$omp parallel do default(shared), private(is,ir),reduction(+:rho_no_sym),collapse(2)
    do is=1,n_sp_pol
      do ir=1,fft_size
        rho_no_sym(ir)=rho_no_sym(ir)+real(spin_occ,SP)*Xk%weights(ik)*&
@@ -73,19 +72,17 @@ subroutine el_density_vbands(en,Xk,rho,VAL_BANDS)
  rho_syms=nsym/(i_time_rev+1)
  rho(:)=rZERO
  ! 
-!$omp parallel default(shared), private(ir)
-!$omp do, reduction(+:rho)
+!$omp parallel do default(shared), private(ir), reduction(+:rho)
  do ir=1,fft_size
    rho(ir)=rho(ir)+sum(rho_no_sym(fft_rot_r(ir,1:rho_syms)))/real(nsym,SP)
  enddo
-!$omp end do
+!$omp end parallel do
  !
-!$omp do
+!$omp parallel do
  do ir=1,fft_size
    rho(ir)=real(1._SP+i_time_rev,SP)*rho(ir)
  enddo
-!$omp end do
-!$omp end parallel
+!$omp end parallel do
  !
 end subroutine