Add move_alloc method to sparse matrix.

base/modules/serial/psb_c_mat_mod.F90

@@ -194,6 +194,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
     !
     ! To/from lc
     !
@@ -370,6 +371,7 @@ module psb_c_mat_mod
     procedure, pass(a) :: cscnv_base  => psb_lc_cscnv_base
     generic, public    :: cscnv       => cscnv_np, cscnv_ip, cscnv_base
     procedure, pass(a) :: clone       => psb_lcspmat_clone
+    procedure, pass(a) :: move_alloc  => psb_lcspmat_type_move
     !
     ! To/from c
     !

base/modules/serial/psb_d_mat_mod.F90

@@ -194,6 +194,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
     !
     ! To/from ld
     !
@@ -370,6 +371,7 @@ module psb_d_mat_mod
     procedure, pass(a) :: cscnv_base  => psb_ld_cscnv_base
     generic, public    :: cscnv       => cscnv_np, cscnv_ip, cscnv_base
     procedure, pass(a) :: clone       => psb_ldspmat_clone
+    procedure, pass(a) :: move_alloc  => psb_ldspmat_type_move
     !
     ! To/from d
     !

base/modules/serial/psb_s_mat_mod.F90

@@ -194,6 +194,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
     !
     ! To/from ls
     !
@@ -370,6 +371,7 @@ module psb_s_mat_mod
     procedure, pass(a) :: cscnv_base  => psb_ls_cscnv_base
     generic, public    :: cscnv       => cscnv_np, cscnv_ip, cscnv_base
     procedure, pass(a) :: clone       => psb_lsspmat_clone
+    procedure, pass(a) :: move_alloc  => psb_lsspmat_type_move
     !
     ! To/from s
     !

base/modules/serial/psb_z_mat_mod.F90

@@ -194,6 +194,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
     !
     ! To/from lz
     !
@@ -370,6 +371,7 @@ module psb_z_mat_mod
     procedure, pass(a) :: cscnv_base  => psb_lz_cscnv_base
     generic, public    :: cscnv       => cscnv_np, cscnv_ip, cscnv_base
     procedure, pass(a) :: clone       => psb_lzspmat_clone
+    procedure, pass(a) :: move_alloc  => psb_lzspmat_type_move
     !
     ! To/from z
     !