TREX/trexio
1
0
Fork 0
mirror of https://github.com/TREX-CoE/trexio.git synced 2025-01-03 18:16:22 +01:00
Code Issues Projects Releases Wiki Activity

Reducing scope of variables

Browse Source
This commit is contained in:
Anthony Scemama 2023-03-24 09:59:44 +01:00
parent 7955bc1d8e
commit 6c279bae6f
1 changed files with 8 additions and 17 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

25
src/templates_front/templator_front.org
View File

@ -5619,19 +5619,15 @@ trexio_exit_code trexio_to_bitfield_list (const int32_t* orb_list,
bit_list[j] = (bitfield_t) 0; bit_list[j] = (bitfield_t) 0;
} }
uint32_t i;
uint32_t k;
uint32_t iorb;
bitfield_t mask;
uint32_t nswaps = 0; uint32_t nswaps = 0;
for (int32_t pos = 0 ; pos < occupied_num ; pos++) { for (int32_t pos = 0 ; pos < occupied_num ; pos++) {
iorb = ((uint32_t) (orb_list[pos] + 1)) - TREXIO_ORBITAL_SHIFT; const uint32_t iorb = ((uint32_t) (orb_list[pos] + 1)) - TREXIO_ORBITAL_SHIFT;
// Set the bit of to one // Set the bit of to one
i = (uint32_t) (iorb >> TREXIO_NORB_PER_INT_SHIFT); const uint32_t i = (uint32_t) (iorb >> TREXIO_NORB_PER_INT_SHIFT);
k = (uint32_t) (iorb & (TREXIO_NORB_PER_INT - 1) ); const uint32_t k = (uint32_t) (iorb & (TREXIO_NORB_PER_INT - 1) );
mask = ((bitfield_t) 1) << k; bitfield_t mask = ((bitfield_t) 1) << k;
bit_list[i] |= mask; bit_list[i] |= mask;
// Check for phase changes // Check for phase changes
@ -5662,21 +5658,16 @@ trexio_exit_code trexio_to_orbital_list(const int32_t N_int,
if (list == NULL) return TREXIO_INVALID_ARG_3; if (list == NULL) return TREXIO_INVALID_ARG_3;
if (occupied_num == NULL) return TREXIO_INVALID_ARG_4; if (occupied_num == NULL) return TREXIO_INVALID_ARG_4;
bitfield_t tmp; int32_t k = 0;
int32_t shift; int32_t shift = TREXIO_ORBITAL_SHIFT;
int32_t k;
int32_t pos;
k = 0;
shift = TREXIO_ORBITAL_SHIFT;
for (int32_t i=0 ; i<N_int ; i++) for (int32_t i=0 ; i<N_int ; i++)
{ {
tmp = d1[i]; bitfield_t tmp = d1[i];
while (tmp != (bitfield_t) 0) while (tmp != (bitfield_t) 0)
{ {
pos = trailz(tmp); const int32_t pos = trailz(tmp);
if (pos < 0) return TREXIO_FAILURE; if (pos < 0) return TREXIO_FAILURE;
list[k] = ( (int32_t) pos) + shift - 1; list[k] = ( (int32_t) pos) + shift - 1;