remove debug print

Signed-off-by: Jeff Hammond <[email protected]>
jeffhammond · Oct 27, 2024 · 753eb84 · 753eb84
1 parent a6225bd
commit 753eb84
Showing 1 changed file with 0 additions and 2 deletions.
diff --git a/src/tce/sort/new_sort4_y.F b/src/tce/sort/new_sort4_y.F
@@ -7,7 +7,6 @@ subroutine tce_sort_4_y(u,s,a,b,c,d,i,j,k,l,f,async)
       double precision, intent(in) :: f
       integer :: version
       version = 1000*i+100*j+10*k+l
-      print*,'BEFORE',phase
       if (version.eq.1234) then
         call transpose_1234_y(u,s,a,b,c,d,f,async)
       elseif (version.eq.1243) then
@@ -59,7 +58,6 @@ subroutine tce_sort_4_y(u,s,a,b,c,d,i,j,k,l,f,async)
       else
         print*,'something is wrong...'
       endif
-      print*,'AFTER',phase
       end
         subroutine transpose_1234_y(u,s,d1,d2,d3,d4,f,async)
         implicit none