Update wannier_prog.F90

wannier-developers · Sep 30, 2024 · 8c0b6fd · 8c0b6fd
1 parent a303038
commit 8c0b6fd
Showing 1 changed file with 3 additions and 3 deletions.
diff --git a/src/wannier_prog.F90 b/src/wannier_prog.F90
@@ -95,9 +95,9 @@ program wannier
   nk => common_data%num_kpts
   nn => common_data%kmesh_info%nntot
 
-  allocate(character(50) :: progname)
-  allocate(character(50) :: seedname)
-  allocate(character(50) :: cpstatus)
+  allocate (character(50) :: progname)
+  allocate (character(50) :: seedname)
+  allocate (character(50) :: cpstatus)
   progname = 'wannier90' ! https://gcc.gnu.org/bugzilla/show_bug.cgi?id=91442
   call io_commandline(progname, ld, pp, seedname)