From 162011063bfc9d1143fb7a29b5734724bc6c78eb Mon Sep 17 00:00:00 2001
From: Spencer Bryngelson <sbryngelson@gmail.com>
Date: Fri, 8 Nov 2024 09:37:07 -0500
Subject: [PATCH] pretty

---
 src/post_process/m_data_output.fpp | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/src/post_process/m_data_output.fpp b/src/post_process/m_data_output.fpp
index b29e5ab01..784dd7c00 100644
--- 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