mirror of
https://github.com/sfilippone/psblas3.git
synced 2026-10-11 08:29:05 +00:00
psblas3:
base/modules/psb_d_mat_mod.f03 Taken out debug statement.
This commit is contained in:
@@ -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
|
||||
|
||||
Reference in New Issue
Block a user