Merge pull request issp-center-dev#125 from issp-center-dev/fix_sign

change long int to long unsigned int
ultimatile · Apr 14, 2022 · cf67eb2 · cf67eb2
2 parents 8e3969d + 422fc05
commit cf67eb2
Show file tree

Hide file tree

Showing 3 changed files with 7 additions and 5 deletions.
diff --git a/src/CalcSpectrumByBiCG.c b/src/CalcSpectrumByBiCG.c
@@ -156,7 +156,9 @@ void InitShadowRes(
   double complex *v4//!<[out] [CheckList::idim_max] shadow residual vector
 )
 {
-  long int idim, iv;
+
+  long int iv;
+  long unsigned int idim;
   int mythread;
   double dnorm;
   /*

diff --git a/src/mltplyHubbard.c b/src/mltplyHubbard.c
@@ -542,7 +542,7 @@ double complex pairhopp(
   double complex *tmp_v1,//!<[in] Input producted vector
   struct BindStruct *X//!<[inout]
 ) {
-  long int j;
+  long unsigned int j;
   long unsigned int i_max = X->Large.i_max;
   long unsigned int off = 0;
   double complex dam_pr = 0.0;
@@ -771,7 +771,7 @@ double complex GC_pairhopp(
   double complex *tmp_v1,//!<[in] Input producted vector
   struct BindStruct *X//!<[inout]
 ) {
-  long int j;
+  long unsigned int j;
   long unsigned int i_max = X->Large.i_max;
   long unsigned int off = 0;
   double complex dam_pr = 0.0;
@@ -793,7 +793,7 @@ double complex GC_exchange(
   double complex *tmp_v1,
   struct BindStruct *X
 ) {
-  long int j;
+  long unsigned int j;
   long unsigned int i_max = X->Large.i_max;
   long unsigned int off = 0;
   double complex dam_pr = 0.0;

diff --git a/src/mltplySpin.c b/src/mltplySpin.c
@@ -1000,7 +1000,7 @@ double complex GC_pairlift_spin(
   double complex *tmp_v1,//!<[in] Input producted vector
   struct BindStruct *X//!<[inout]
 ) {
-  long int j;
+  long unsigned int j;
   long unsigned int i_max = X->Large.i_max;
   long unsigned int off = 0;
   double complex dam_pr = 0;