Fixed source rate

gafusion · Oct 29, 2024 · 799d169 · 799d169
1 parent aa4f702
commit 799d169
Showing 1 changed file with 4 additions and 1 deletion.
diff --git a/cgyro/src/cgyro_source.F90 b/cgyro/src/cgyro_source.F90
@@ -20,7 +20,10 @@ subroutine cgyro_source
 
   call timer_lib_in('shear')
 
-  nu_eff = nu_global*(abs(gamma_e)+maxval(abs(sdlnndr(:)))+maxval(abs(sdlntdr(:))))
+  nu_eff = nu_global*(abs(gamma_e)+ &
+	              maxval(abs(sdlnndr(:)))+ &
+                      maxval(abs(sdlntdr(:)))+ &
+                      maxval(abs(  sbeta(:))))
   sa = 1.0+exp(-delta_t/tau_ave)*sa
 
   ! Time-delay source