Fix OEP full - spin polarized case

Description

The OEP full was not taking the right occupations for the spin-polarized case.

News snippet

The OEP full was not taking the right occupations for the spin-polarized case.

Checklist

• I have checked that my code follows the Octopus coding standards
• I have added tests for all the new features added in this request.

src/states/states_elec_calc_inc.F90

@@ -685,7 +685,7 @@ subroutine X(states_elec_orthogonalize_single_batch)(st, mesh, nst, iqn, phi, no
   end do
 
   if (mesh%parallel_in_domains) then
-    call profiling_in(reduce_prof, TOSTRING(X(GRAM_SCHMIDT_REDUCE)))
+    call profiling_in(reduce_prof, TOSTRING(X(GRAM_SCHMIDT_BATCH_REDUCE)))
     call mesh%allreduce(ss, dim = length_ss)
     call profiling_out(reduce_prof)
   end if