Cosmetic changes in adjcncy_fnd_owner

5 years ago · f32f8e3387
parent d3e67cf723
commit f32f8e3387
1 changed files with 2 additions and 1 deletions
--- a/base/internals/psi_adjcncy_fnd_owner.F90
+++ b/base/internals/psi_adjcncy_fnd_owner.F90
@ -69,7 +69,8 @@ subroutine psi_adjcncy_fnd_owner(idx,iprc,adj,idxmap,info)
       & last_ih, last_j, nidx, nrecv, nadj
  integer(psb_lpk_) :: mglob, ih
  integer(psb_ipk_) :: ictxt,np,me
-  logical, parameter  :: gettime=.false., new_impl=.true., a2av_impl=.true., debug=.false.
+  logical, parameter  :: gettime=.false., new_impl=.true.
+  logical, parameter  :: a2av_impl=.true., debug=.false.
  real(psb_dpk_)      :: t0, t1, t2, t3, t4, tamx, tidx
  character(len=20)   :: name