Change default order for DUPL constants.

5 years ago · e9a8814338
parent 6777e57d37
commit e9a8814338
1 changed files with 2 additions and 2 deletions
--- a/base/modules/psb_const_mod.F90
+++ b/base/modules/psb_const_mod.F90
@ -215,8 +215,8 @@ module psb_const_mod
  ! Duplicate coefficients handling
  ! These are usually set while calling spcnv as one of its
  ! optional arugments.
-  integer(psb_ipk_), parameter :: psb_dupl_ovwrt_ = 0
-  integer(psb_ipk_), parameter :: psb_dupl_add_   = 1
+  integer(psb_ipk_), parameter :: psb_dupl_add_   = 0
+  integer(psb_ipk_), parameter :: psb_dupl_ovwrt_ = 1
  integer(psb_ipk_), parameter :: psb_dupl_err_   = 2
  integer(psb_ipk_), parameter :: psb_dupl_def_   = psb_dupl_add_
  ! Matrix update mode