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

Reinstate target on precbld.

Browse Source
This commit is contained in:
Salvatore Filippone
2018-03-14 20:27:13 +00:00
parent b06c612f9a
commit b7a50f6e8b
8 changed files with 20 additions and 20 deletions
Download Patch File Download Diff File Expand all files Collapse all files
prec/impl/psb_sprecbld.f90
+4 -4
View File
@@ -35,10 +35,10 @@ subroutine psb_sprecbld(a,desc_a,p,info,amold,vmold,imold)
use psb_s_prec_type, psb_protect_name => psb_sprecbld
Implicit None
type(psb_sspmat_type), intent(in), target :: a
type(psb_desc_type), intent(inout), target :: desc_a
class(psb_sprec_type),intent(inout) :: p
integer(psb_ipk_), intent(out) :: info
type(psb_sspmat_type), intent(in), target :: a
type(psb_desc_type), intent(inout), target :: desc_a
class(psb_sprec_type),intent(inout), target :: p
integer(psb_ipk_), intent(out) :: info
class(psb_s_base_sparse_mat), intent(in), optional :: amold
class(psb_s_base_vect_type), intent(in), optional :: vmold
class(psb_i_base_vect_type), intent(in), optional :: imold