psblas3:

15 years ago · 89bec2256e
parent 330dcacad6
commit 89bec2256e
1 changed files with 1 additions and 1 deletions
--- a/base/modules/psb_d_mat_mod.f03
+++ b/base/modules/psb_d_mat_mod.f03
@ -1340,7 +1340,7 @@ contains
      call psb_errpush(info,name)
      goto 9999
    endif
-    write(0,*) 'b_csclip :',a%get_fmt()
+
    call a%a%csclip(b,info,&
       & imin,imax,jmin,jmax,rscale,cscale)
    if (info /= 0) goto 9999