Nicolas Regnault:

- more 128 bits fixes


git-svn-id: https://www.nick-ux.org/diagham/svn/trunk@4107 b9410c57-6ef9-0310-98bc-a73ba792996a

Author: regnault

FQHE/src/HilbertSpace/FermionOnSphereWithSU4SpinLong.h

@@ -776,7 +776,7 @@ inline double FermionOnSphereWithSU4SpinLong::GenericAA(int index, int n1, int n
   this->ProdATemporaryState &= ~(((ULONGLONG) 0x1ul) << n1);
   if (this->ProdATemporaryState != ((ULONGLONG) 0x0ul))
     {
-      while ((this->ProdATemporaryState >> this->ProdALzMax) == 0)
+      while ((this->ProdATemporaryState >> this->ProdALzMax) == ((ULONGLONG) 0x0ul))
 	--this->ProdALzMax;
     }
   else

FQHE/src/HilbertSpace/FermionOnSphereWithSU8SpinLong.h

@@ -452,7 +452,7 @@ inline double FermionOnSphereWithSU8SpinLong::AsigmaAsigma (int index, int n1, i
   this->ProdATemporaryState &= ~(((ULONGLONG) 0x1ul) << n1);
   if (this->ProdATemporaryState != ((ULONGLONG) 0x0ul))
     {
-      while ((this->ProdATemporaryState >> this->ProdALzMax) == 0)
+      while ((this->ProdATemporaryState >> this->ProdALzMax) == ((ULONGLONG) 0x0ul))
 	--this->ProdALzMax;
     }
   else