Commented out scratch stuff.

nakib · Sep 20, 2024 · e9c36f5 · e9c36f5
1 parent 4c7c714
commit e9c36f5
Showing 1 changed file with 8 additions and 8 deletions.
diff --git a/src/interactions.f90 b/src/interactions.f90
@@ -2877,14 +2877,14 @@ subroutine calculate_el_rta_rates(rta_rates_eph, rta_rates_echimp, rta_rates_ee,
           !Apply energy window to initial (IBZ blocks) electron
           if(abs(el%ens_irred(ik, m) - el%enref) > el%fsthick) cycle
 
-          !TODO e-e scattering rates (OTF only at the mo)
-          !if(num%elel) then
-          call calculate_Xee_OTF(el, num, istate, crys, X)
-          do iproc = 1, size(X)
-             rta_rates_ee(ik, m) = rta_rates_ee(ik, m) + X(iproc)
-          end do
-          !end if
-          !
+!!$          !TODO e-e scattering rates (OTF only at the mo)
+!!$          !if(num%elel) then
+!!$          call calculate_Xee_OTF(el, num, istate, crys, X)
+!!$          do iproc = 1, size(X)
+!!$             rta_rates_ee(ik, m) = rta_rates_ee(ik, m) + X(iproc)
+!!$          end do
+!!$          !end if
+!!$          !
 
           !Set X+ filename
           write(tag, '(I9)') istate