From 7565adf61cef63125fdb4c46ad693d4a7375a576 Mon Sep 17 00:00:00 2001 From: Junfeng Qiao Date: Fri, 17 Jan 2025 13:58:36 +0100 Subject: [PATCH] Fix write_tb with MPI Other cores need `eigval` array as well. --- src/wannier_prog.F90 | 1 + 1 file changed, 1 insertion(+) diff --git a/src/wannier_prog.F90 b/src/wannier_prog.F90 index 4c6b0bb3..65577aa5 100644 --- a/src/wannier_prog.F90 +++ b/src/wannier_prog.F90 @@ -265,6 +265,7 @@ program wannier need_eigvals = common_data%w90_calculation%bands_plot need_eigvals = (need_eigvals .or. common_data%w90_calculation%fermi_surface_plot) need_eigvals = (need_eigvals .or. common_data%output_file%write_hr) + need_eigvals = (need_eigvals .or. common_data%output_file%write_tb) need_eigvals = (need_eigvals .or. ldsnt) ! disentanglement anyway requires evals if (need_eigvals) then