diff --git a/src/tce/sort/new_sort4_y.F b/src/tce/sort/new_sort4_y.F index e66672ee8d..48eed1788e 100644 --- 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