diff --git a/tglf/src/tglf_LS.f90 b/tglf/src/tglf_LS.f90 index 2d4f237a7..88ca27f9a 100644 --- a/tglf/src/tglf_LS.f90 +++ b/tglf/src/tglf_LS.f90 @@ -42,9 +42,6 @@ SUBROUTINE tglf_LS logical :: is_sup_to_drift REAL :: sum_phi, sum_abs_phi REAL, DIMENSION(max_plot) :: even_function, odd_function - REAL :: max_freq - COMMON /block/ max_freq - ! ! cputime0=MPI_WTIME() !