diff --git a/cdn/vacden.F90 b/cdn/vacden.F90
index 554bcfe277eb32658cf3e3afa034fbd1f5edb234..d09ba9e70e249bcee2d6c32f49ea24f2f43a9ed2 100644
--- a/cdn/vacden.F90
+++ b/cdn/vacden.F90
@@ -507,7 +507,7 @@ CONTAINS
 
        END IF
 990    FORMAT(2(f8.4,1x),i3,1x,i3)
-1000   FORMAT(e10.4)
+1001   FORMAT(e12.4)
 1010   FORMAT(2(2e20.8,1x))
        !
        !        ------------------------------------------------------------
diff --git a/juDFT/string.f90 b/juDFT/string.f90
index 9f0b2bcbdac42e53e84e57052b21801a612dc9b1..df43571ce958c2ebe0f51588bf3c50d57a1f742c 100644
--- a/juDFT/string.f90
+++ b/juDFT/string.f90
@@ -54,7 +54,7 @@ contains
       if(num >= 1e-1 .and. num <= 1e4) then
          write (ret_str,"(F10.5)") num
       else
-         write (ret_str,"(ES10.4)") num
+         write (ret_str,"(ES12.4)") num
       endif
       ret_str = strip(ret_str)
    end function float2str