diff --git a/source/KKRnano/source/read_formatted_shapefun_mod.F90 b/source/KKRnano/source/read_formatted_shapefun_mod.F90
index 0e85244c251230759b57ab65d751ddd0f6a3cf0a..fba14cd063010fe4664b4e074b9e207d1b232e4e 100644
--- a/source/KKRnano/source/read_formatted_shapefun_mod.F90
+++ b/source/KKRnano/source/read_formatted_shapefun_mod.F90
@@ -53,7 +53,7 @@ module read_formatted_shapefun_mod
     integer :: icell
     double precision :: dummy
 
-    read(unit, fmt="(16i5)") sfile%ncell
+    read(unit, fmt=*) sfile%ncell
 
     read(unit, fmt="(4d20.12)") (dummy, icell=1,sfile%ncell)
 
@@ -93,7 +93,7 @@ module read_formatted_shapefun_mod
 
     integer :: ifun, lm
 
-    read(unit, fmt="(16i5)") shapef%nfu
+    read(unit, fmt=*) shapef%nfu
 
     allocate(shapef%llmsp(shapef%nfu), shapef%thetas(inter%meshn,shapef%nfu))