diff --git a/source/KKRnano/source/CalculationData_mod.F90 b/source/KKRnano/source/CalculationData_mod.F90
index 8d5cd9ad01db441b228bbcb3392937e43119bb8f..56d1adbaee85336c2635f4138a19594027b40d15 100644
--- a/source/KKRnano/source/CalculationData_mod.F90
+++ b/source/KKRnano/source/CalculationData_mod.F90
@@ -612,7 +612,7 @@ module CalculationData_mod
 
       call create(self%mesh_a(ila), irmd, ipand)
 
-      a_log_local = 0.025d0
+      a_log_local = params%a_log
       b_log_local = inter_mesh%xrn(1)*params%alat / (exp(a_log_local * ((irmd-irid) - 1)) - 1.d0)
 
       call initRadialMesh(self=self%mesh_a(ila), alat=params%alat, xrn=inter_mesh%xrn, &
diff --git a/source/KKRnano/source/datastructures/InputParamsNew.txt b/source/KKRnano/source/datastructures/InputParamsNew.txt
index a958fde0d48a0f422aa6d32ed56710abffce1a54..bf982f4d39c51feb3a6b81173ce087c2a76a0cc9 100644
--- a/source/KKRnano/source/datastructures/InputParamsNew.txt
+++ b/source/KKRnano/source/datastructures/InputParamsNew.txt
@@ -120,3 +120,5 @@ i npan_eq 30
 i ncheb 10
 ### [NOCO] size of logarithmic panel
 d r_log 0.1D0
+### parameter a for exponential radial mesh
+d a_log 0.025D0
diff --git a/source/KKRnano/source/datastructures/InputParams_mod.F90 b/source/KKRnano/source/datastructures/InputParams_mod.F90
index 55314ef0bc09a0344a4d6fc9e18d40123b69a3ae..f6ada62cddc1fe9d30330ec53cf2ef793e8c0455 100644
--- a/source/KKRnano/source/datastructures/InputParams_mod.F90
+++ b/source/KKRnano/source/datastructures/InputParams_mod.F90
@@ -76,6 +76,7 @@ module InputParams_mod
     integer :: npan_eq
     integer :: ncheb
     double precision :: r_log
+    double precision :: a_log
     logical :: enable_quad_prec
   endtype ! InputParams
 
@@ -619,6 +620,15 @@ integer function getValues(filename, self) result(ierror)
     destroy_and_return
   endif
 
+  ierror = getValue(cr, "a_log", self%a_log , def=0.025D0)
+  if (ierror == use_default) then
+    write(*,*) "WARNING: Bad/no value given for a_log. Set a_log to 0.025D0"
+    ierror = 0 ! ok, no error
+  elseif (ierror /= 0) then
+    write(*,*) "Bad/no value given for a_log."
+    destroy_and_return
+  endif
+
   ierror = getValue(cr, "enable_quad_prec", self%enable_quad_prec , def=.false.)
   if (ierror == use_default) then
     write(*,*) "WARNING: Bad/no value given for enable_quad_prec. Set enable_quad_prec to .false."