Fixest format CI failure (#709)

MFlowCode · Nov 8, 2024 · 73782f5 · 73782f5
1 parent 82b5384
commit 73782f5
Showing 1 changed file with 1 addition and 2 deletions.
diff --git a/src/post_process/m_data_output.fpp b/src/post_process/m_data_output.fpp
@@ -112,8 +112,7 @@ contains
         ! Generic logical used to test the existence of a particular folder
         logical :: dir_check
 
-        ! Generic loop iterator
-        integer :: i, k ,l
+        integer :: i
 
         ! Allocating the generic storage for the flow variable(s) that are
         ! going to be written to the formatted database file(s). Note once