fdurastante/psblas3
1
0
Fork 0
mirror of https://github.com/sfilippone/psblas3.git synced 2026-10-07 07:04:57 +00:00
Code Issues Packages Projects Releases Wiki Activity

psblas3

Browse Source 
krylov/psb_cbicg.f90
 krylov/psb_ccgstab.f90
 krylov/psb_dbicg.f90
 krylov/psb_dcgstab.f90
 krylov/psb_sbicg.f90
 krylov/psb_zbicg.f90
 krylov/psb_zcgstab.f90
 test/fileread/runs/dfs.inp

Fix name of routine in log messages.
This commit is contained in:
Salvatore Filippone
2012-07-17 15:57:33 +00:00
parent e54af36c44
commit 116f7597f6
7 changed files with 7 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files
krylov/psb_cbicg.f90
+1 -1
View File
@@ -131,7 +131,7 @@ subroutine psb_cbicg_vect(a,prec,b,x,eps,desc_a,info,&
character(len=*), parameter :: methdname='BiCG'
info = psb_success_
name = 'psb_bicg'
name = 'psb_cbicg'
call psb_erractionsave(err_act)
debug_unit = psb_get_debug_unit()
debug_level = psb_get_debug_level()
krylov/psb_ccgstab.f90
+1 -1
View File
@@ -129,7 +129,7 @@ Subroutine psb_ccgstab_vect(a,prec,b,x,eps,desc_a,info,itmax,iter,err,itrace,ist
character(len=*), parameter :: methdname='BiCGStab'
info = psb_success_
name = 'psb_scgstab'
name = 'psb_ccgstab'
call psb_erractionsave(err_act)
debug_unit = psb_get_debug_unit()
debug_level = psb_get_debug_level()
krylov/psb_dbicg.f90
+1 -1
View File
@@ -131,7 +131,7 @@ subroutine psb_dbicg_vect(a,prec,b,x,eps,desc_a,info,&
character(len=*), parameter :: methdname='BiCG'
info = psb_success_
name = 'psb_bicg'
name = 'psb_dbicg'
call psb_erractionsave(err_act)
debug_unit = psb_get_debug_unit()
debug_level = psb_get_debug_level()
krylov/psb_dcgstab.f90
+1 -1
View File
@@ -129,7 +129,7 @@ Subroutine psb_dcgstab_vect(a,prec,b,x,eps,desc_a,info,itmax,iter,err,itrace,ist
character(len=*), parameter :: methdname='BiCGStab'
info = psb_success_
name = 'psb_scgstab'
name = 'psb_dcgstab'
call psb_erractionsave(err_act)
debug_unit = psb_get_debug_unit()
debug_level = psb_get_debug_level()
krylov/psb_sbicg.f90
+1 -1
View File
@@ -131,7 +131,7 @@ subroutine psb_sbicg_vect(a,prec,b,x,eps,desc_a,info,&
character(len=*), parameter :: methdname='BiCG'
info = psb_success_
name = 'psb_bicg'
name = 'psb_sbicg'
call psb_erractionsave(err_act)
debug_unit = psb_get_debug_unit()
debug_level = psb_get_debug_level()
krylov/psb_zbicg.f90
+1 -1
View File
@@ -131,7 +131,7 @@ subroutine psb_zbicg_vect(a,prec,b,x,eps,desc_a,info,&
character(len=*), parameter :: methdname='BiCG'
info = psb_success_
name = 'psb_bicg'
name = 'psb_zbicg'
call psb_erractionsave(err_act)
debug_unit = psb_get_debug_unit()
debug_level = psb_get_debug_level()
krylov/psb_zcgstab.f90
+1 -1
View File
@@ -129,7 +129,7 @@ Subroutine psb_zcgstab_vect(a,prec,b,x,eps,desc_a,info,itmax,iter,err,itrace,ist
character(len=*), parameter :: methdname='BiCGStab'
info = psb_success_
name = 'psb_scgstab'
name = 'psb_zcgstab'
call psb_erractionsave(err_act)
debug_unit = psb_get_debug_unit()
debug_level = psb_get_debug_level()