Add move_alloc method to sparse matrix.

new-parstruct
Salvatore Filippone 6 years ago
parent a695b63c3c
commit 4bb0c7a633

@ -182,6 +182,7 @@ module psb_c_mat_mod
procedure, pass(a) :: cscnv_base => psb_c_cscnv_base
generic, public :: cscnv => cscnv_np, cscnv_ip, cscnv_base
procedure, pass(a) :: clone => psb_cspmat_clone
procedure, pass(a) :: move_alloc => psb_cspmat_type_move
! Computational routines
procedure, pass(a) :: get_diag => psb_c_get_diag

@ -182,6 +182,7 @@ module psb_d_mat_mod
procedure, pass(a) :: cscnv_base => psb_d_cscnv_base
generic, public :: cscnv => cscnv_np, cscnv_ip, cscnv_base
procedure, pass(a) :: clone => psb_dspmat_clone
procedure, pass(a) :: move_alloc => psb_dspmat_type_move
! Computational routines
procedure, pass(a) :: get_diag => psb_d_get_diag

@ -182,6 +182,7 @@ module psb_s_mat_mod
procedure, pass(a) :: cscnv_base => psb_s_cscnv_base
generic, public :: cscnv => cscnv_np, cscnv_ip, cscnv_base
procedure, pass(a) :: clone => psb_sspmat_clone
procedure, pass(a) :: move_alloc => psb_sspmat_type_move
! Computational routines
procedure, pass(a) :: get_diag => psb_s_get_diag

@ -182,6 +182,7 @@ module psb_z_mat_mod
procedure, pass(a) :: cscnv_base => psb_z_cscnv_base
generic, public :: cscnv => cscnv_np, cscnv_ip, cscnv_base
procedure, pass(a) :: clone => psb_zspmat_clone
procedure, pass(a) :: move_alloc => psb_zspmat_type_move
! Computational routines
procedure, pass(a) :: get_diag => psb_z_get_diag

Loading…
Cancel
Save