*** empty log message ***

psblas3-type-indexed
Salvatore Filippone 13 years ago
parent ef6985e0c2
commit 588b986c60

@ -1316,7 +1316,8 @@ contains
class(psb_hash_map), intent(in) :: idxmap class(psb_hash_map), intent(in) :: idxmap
type(psb_hash_map), intent(out) :: outmap type(psb_hash_map), intent(out) :: outmap
integer(psb_ipk_) :: info integer(psb_ipk_) :: info
info = psb_success_
outmap%psb_indx_map = idxmap%psb_indx_map outmap%psb_indx_map = idxmap%psb_indx_map
outmap%hashvsize = idxmap%hashvsize outmap%hashvsize = idxmap%hashvsize
outmap%hashvmask = idxmap%hashvmask outmap%hashvmask = idxmap%hashvmask

Loading…
Cancel
Save