diff --git a/src/qs_loc_main.F b/src/qs_loc_main.F
index c9519e30be..77281a1def 100644
--- a/src/qs_loc_main.F
+++ b/src/qs_loc_main.F
@@ -540,6 +540,7 @@ SUBROUTINE loc_print(qs_env, qs_loc_env, moloc_coeff, ispin, print_loc_section)
       END IF
 
       ncubes = SIZE(list_cubes)
+      CALL cp_fm_get_info(moloc_coeff(ispin), ncol_global=nmo)
       ncubes = MIN(ncubes, nmo)
       ALLOCATE (centers(6, ncubes))
       DO i = 1, ncubes