mirror of
https://github.com/sfilippone/psblas3.git
synced 2026-10-16 19:02:09 +00:00
First version of AD/AND with memory duplication
This commit is contained in:
@@ -85,6 +85,7 @@ module psb_c_mat_mod
|
||||
type :: psb_cspmat_type
|
||||
|
||||
class(psb_c_base_sparse_mat), allocatable :: a
|
||||
class(psb_c_base_sparse_mat), allocatable :: ad, and
|
||||
integer(psb_ipk_) :: remote_build=psb_matbld_noremote_
|
||||
type(psb_lc_coo_sparse_mat), allocatable :: rmta
|
||||
|
||||
|
||||
@@ -85,6 +85,7 @@ module psb_d_mat_mod
|
||||
type :: psb_dspmat_type
|
||||
|
||||
class(psb_d_base_sparse_mat), allocatable :: a
|
||||
class(psb_d_base_sparse_mat), allocatable :: ad, and
|
||||
integer(psb_ipk_) :: remote_build=psb_matbld_noremote_
|
||||
type(psb_ld_coo_sparse_mat), allocatable :: rmta
|
||||
|
||||
|
||||
@@ -85,6 +85,7 @@ module psb_s_mat_mod
|
||||
type :: psb_sspmat_type
|
||||
|
||||
class(psb_s_base_sparse_mat), allocatable :: a
|
||||
class(psb_s_base_sparse_mat), allocatable :: ad, and
|
||||
integer(psb_ipk_) :: remote_build=psb_matbld_noremote_
|
||||
type(psb_ls_coo_sparse_mat), allocatable :: rmta
|
||||
|
||||
|
||||
@@ -85,6 +85,7 @@ module psb_z_mat_mod
|
||||
type :: psb_zspmat_type
|
||||
|
||||
class(psb_z_base_sparse_mat), allocatable :: a
|
||||
class(psb_z_base_sparse_mat), allocatable :: ad, and
|
||||
integer(psb_ipk_) :: remote_build=psb_matbld_noremote_
|
||||
type(psb_lz_coo_sparse_mat), allocatable :: rmta
|
||||
|
||||
|
||||
Reference in New Issue
Block a user