From e3a478e091faec573eba4723c08e972d22bfcf80 Mon Sep 17 00:00:00 2001
From: anand43 <anand43@purdue.edu>
Date: Tue, 12 Dec 2023 15:19:04 -0500
Subject: [PATCH] cleaning up

---
 src/swiftest/swiftest_drift.f90 | 25 -------------------------
 1 file changed, 25 deletions(-)

diff --git a/src/swiftest/swiftest_drift.f90 b/src/swiftest/swiftest_drift.f90
index b03a3ef70..21119cca8 100644
--- a/src/swiftest/swiftest_drift.f90
+++ b/src/swiftest/swiftest_drift.f90
@@ -207,12 +207,6 @@ pure subroutine swiftest_drift_dan(mu, rx0, ry0, rz0, vx0, vy0, vz0, dt0, iflag)
          end if
       end if
 
-      ! For debugging overflow error
-
-      ! if(r0 .ge. 11970204779.00) then
-      !    f = 1.0_DP
-      ! end if
-
       call swiftest_drift_kepu(dt, r0, mu, alpha, u, fp, c1, c2, c3, iflag)
       if (iflag == 0) then
          f = 1.0_DP - mu / r0 * c2
@@ -584,25 +578,6 @@ pure subroutine swiftest_drift_kepu_stumpff(x, c0, c1, c2, c3)
          end do
       end if
 
-      ! ! for debugging Floating overflow error
-
-      ! if (abs(c0) .ge. HUGE(0.0_DP)) then
-      !    xm = 0.1_DP ! "big c0"
-      ! end if
-
-      ! if (abs(c1) .ge. HUGE(0.0_DP)) then
-      !    xm = 0.1_DP ! "big c1"
-      ! end if
-
-      ! if (abs(c2) .ge. HUGE(0.0_DP)) then
-      !    xm = 0.1_DP ! "big c2"
-      ! end if
-
-      ! if (abs(c3) .ge. HUGE(0.0_DP)) then
-      !    xm = 0.1_DP ! "big c3"
-      ! end if
-
-
       return
    end subroutine swiftest_drift_kepu_stumpff