@@ -42,7 +42,6 @@ module fortpetra
42
42
public :: mag_type
43
43
public :: norm_type
44
44
45
- integer (C_INT), parameter , public :: TPETRA_THROWS_EFFICIENCY_WARNINGS = 0_C_INT
46
45
integer (C_INT), parameter , public :: TPETRA_PRINTS_EFFICIENCY_WARNINGS = 0_C_INT
47
46
integer (C_INT), parameter , public :: TPETRA_THROWS_ABUSE_WARNINGS = 0_C_INT
48
47
integer (C_INT), parameter , public :: TPETRA_PRINTS_ABUSE_WARNINGS = 0_C_INT
@@ -75,7 +74,6 @@ module fortpetra
75
74
end enum
76
75
integer , parameter , public :: TpetraESweepDirection = kind (TpetraForward)
77
76
public :: TpetraForward, TpetraBackward, TpetraSymmetric
78
- integer (C_INT), parameter , public :: TPETRA_USE_KOKKOS_DISTOBJECT = 0_C_INT
79
77
! enum Tpetra::CombineMode
80
78
enum, bind(c)
81
79
enumerator :: TpetraADD
@@ -407,7 +405,7 @@ module fortpetra
407
405
procedure , private :: swigf_TpetraCrsMatrix_sumIntoLocalValues__SWIG_2
408
406
procedure :: setAllToScalar = > swigf_TpetraCrsMatrix_setAllToScalar
409
407
procedure :: scale = > swigf_TpetraCrsMatrix_scale
410
- procedure , private :: swigf_TpetraCrsMatrix_setAllValues__SWIG_1
408
+ procedure , private :: swigf_TpetraCrsMatrix_setAllValues__SWIG_2
411
409
procedure :: globalAssemble = > swigf_TpetraCrsMatrix_globalAssemble
412
410
procedure , private :: swigf_TpetraCrsMatrix_resumeFill__SWIG_0
413
411
procedure , private :: swigf_TpetraCrsMatrix_resumeFill__SWIG_1
@@ -473,7 +471,7 @@ module fortpetra
473
471
procedure , private :: swigf_TpetraCrsMatrix_getGlobalRowCopy__SWIG_1
474
472
procedure , private :: swigf_TpetraCrsMatrix_getLocalRowCopy__SWIG_1
475
473
procedure , private :: swigf_TpetraCrsMatrix_op_assign__
476
- generic :: setAllValues = > swigf_TpetraCrsMatrix_setAllValues__SWIG_1
474
+ generic :: setAllValues = > swigf_TpetraCrsMatrix_setAllValues__SWIG_2
477
475
generic :: replaceLocalValues = > swigf_TpetraCrsMatrix_replaceLocalValues__SWIG_1
478
476
generic :: localApply = > swigf_TpetraCrsMatrix_localApply__SWIG_0, swigf_TpetraCrsMatrix_localApply__SWIG_1, &
479
477
swigf_TpetraCrsMatrix_localApply__SWIG_2, swigf_TpetraCrsMatrix_localApply__SWIG_3
@@ -3100,8 +3098,8 @@ subroutine swigc_TpetraCrsMatrix_scale(farg1, farg2) &
3100
3098
real (C_DOUBLE), intent (in ) :: farg2
3101
3099
end subroutine
3102
3100
3103
- subroutine swigc_TpetraCrsMatrix_setAllValues__SWIG_1 (farg1 , farg2 , farg3 , farg4 ) &
3104
- bind(C, name= " _wrap_TpetraCrsMatrix_setAllValues__SWIG_1 " )
3101
+ subroutine swigc_TpetraCrsMatrix_setAllValues__SWIG_2 (farg1 , farg2 , farg3 , farg4 ) &
3102
+ bind(C, name= " _wrap_TpetraCrsMatrix_setAllValues__SWIG_2 " )
3105
3103
use , intrinsic :: ISO_C_BINDING
3106
3104
import :: swigarraywrapper
3107
3105
import :: swigclasswrapper
@@ -8308,7 +8306,7 @@ subroutine swigf_TpetraCrsMatrix_scale(self, alpha)
8308
8306
call swigc_TpetraCrsMatrix_scale(farg1, farg2)
8309
8307
end subroutine
8310
8308
8311
- subroutine swigf_TpetraCrsMatrix_setAllValues__SWIG_1 (self , ptr , ind , val )
8309
+ subroutine swigf_TpetraCrsMatrix_setAllValues__SWIG_2 (self , ptr , ind , val )
8312
8310
use , intrinsic :: ISO_C_BINDING
8313
8311
class(TpetraCrsMatrix), intent (in ) :: self
8314
8312
integer (C_SIZE_T), dimension (:), target :: ptr
@@ -8323,7 +8321,7 @@ subroutine swigf_TpetraCrsMatrix_setAllValues__SWIG_1(self, ptr, ind, val)
8323
8321
call SWIGTM_fin_size_t_Sb__SB_(ptr, farg2)
8324
8322
call SWIGTM_fin_int_Sb__SB_(ind, farg3)
8325
8323
call SWIGTM_fin_double_Sb__SB_(val, farg4)
8326
- call swigc_TpetraCrsMatrix_setAllValues__SWIG_1 (farg1, farg2, farg3, farg4)
8324
+ call swigc_TpetraCrsMatrix_setAllValues__SWIG_2 (farg1, farg2, farg3, farg4)
8327
8325
end subroutine
8328
8326
8329
8327
subroutine swigf_TpetraCrsMatrix_globalAssemble (self )
0 commit comments