From dcc8b799386b7c1d8ff96d8a4a5c5788a798d205 Mon Sep 17 00:00:00 2001
From: cflag <cedric.flageul@univ-poitiers.fr>
Date: Thu, 18 Apr 2024 10:31:21 +0200
Subject: [PATCH] Remove comment

---
 src/mhd.f90 | 2 --
 1 file changed, 2 deletions(-)

diff --git a/src/mhd.f90 b/src/mhd.f90
index ef3775c35..99e9d75be 100644
--- a/src/mhd.f90
+++ b/src/mhd.f90
@@ -825,8 +825,6 @@ function divergence_scalar(vec,nlock) result(pp3)
 
     implicit none
 
-    !  TYPE(DECOMP_INFO) :: ph1,ph3,ph4
-
     !X PENCILS NX NY NZ  -->NXM NY NZ
     real(mytype),dimension(xsize(1),xsize(2),xsize(3),3),intent(in) :: vec
     !