Preparing to change the input

src/modules/init/moduleInput.f90

@@ -800,19 +800,18 @@ MODULE moduleInput
       IMPLICIT NONE
 
       TYPE(json_file), INTENT(inout):: config
-      INTEGER:: i, s
-      CHARACTER(2):: iString, sString
+      INTEGER:: b
+      CHARACTER(2):: iString
       CHARACTER(:), ALLOCATABLE:: object
       LOGICAL:: found
-      INTEGER:: nTypes
 
       CALL config%info('boundary', found, n_children = nBoundary)
       ALLOCATE(boundaries(1:nBoundary))
-      DO i = 1, nBoundary
-        WRITE(iString, '(i2)') i
+      DO b = 1, nBoundary
+        WRITE(iString, '(i2)') b
         object = 'boundary(' // TRIM(iString) // ')'
 
-        call boundaries(i)%init(config, object, i)
+        call boundaries(i)%init(config, object, b)
 
       END DO