adi_references Module

Uses

- bit_rep_data
- DetBitOps
- constants
- Parallel_neci
- SystemData
- util_mod
- adi_data
- Determinants
- sort_mod
- FciMCData
- bit_reps
- CalcData

Contents

Functions

check_sign_coherence get_sign_op guess_target_nref

Subroutines

setup_reference_space update_reference_space fixed_number_SI_generation read_in_refs generate_ref_space get_threshold_based_SIs communicate_threshold_based_SIs output_reference_space print_reference_notification print_bit_rep update_ref_signs update_single_ref_sign initialize_c_caches update_coherence_check eval_coherence adjust_nRefs fill_adi_caches allocate_adi_caches deallocate_adi_caches resize_ilutRefAdi resize_ilut_list reallocate_ilutRefAdi enable_adi reset_coherence_counter update_first_reference clean_adi

Functions

public function check_sign_coherence(ilut, nI, ilut_sign, iRef, run) result(is_coherent)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=n_int),	intent(in)			::	ilut(0:NIfTot)
integer,	intent(in)			::	nI(nel)
real(kind=dp),	intent(in)			::	ilut_sign(lenof_sign)
integer,	intent(in)			::	iRef
integer,	intent(in)			::	run

Return Value logical

private function get_sign_op(ilut) result(xi)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=n_int),	intent(in)			::	ilut(0:NIfTot)

Return Value real(kind=dp)

private function guess_target_nref() result(target_nref)

Arguments

None

Return Value integer

Subroutines

public subroutine setup_reference_space(tPopPresent)

Arguments

Type	Intent	Optional	Attributes		Name
logical,	intent(in)			::	tPopPresent

public subroutine update_reference_space(tPopPresent)

Arguments

Type	Intent	Optional	Attributes		Name
logical,	intent(in)			::	tPopPresent

private subroutine fixed_number_SI_generation()

Arguments

None

private subroutine read_in_refs(filename, nRead)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=255),	intent(in)			::	filename
integer,	intent(out)			::	nRead

private subroutine generate_ref_space()

Arguments

None

private subroutine get_threshold_based_SIs(ref_buf, refs_found)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=n_int),	intent(out)			::	ref_buf(0:NIfTot,maxNRefs)
integer,	intent(out)			::	refs_found

private subroutine communicate_threshold_based_SIs(si_buf, ref_buf, refs_found, all_refs_found)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=n_int),	intent(out)			::	si_buf(0:NIfTot,maxNRefs)
integer(kind=n_int),	intent(in)			::	ref_buf(0:NIfTot,maxNRefs)
integer,	intent(in)			::	refs_found
integer,	intent(out)			::	all_refs_found

private subroutine output_reference_space(filename)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=255),	intent(in)			::	filename

public subroutine print_reference_notification(iStart, iEnd, title, legend)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	iStart
integer,	intent(in)			::	iEnd
character(len=*),	intent(in)			::	title
logical,		optional		::	legend

private subroutine print_bit_rep(ilut)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=n_int),	intent(in)			::	ilut(0:NIfTot)

public subroutine update_ref_signs()

Arguments

None

private subroutine update_single_ref_sign(iRef)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	iRef

public subroutine initialize_c_caches(signedCache, unsignedCache, connections)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),	intent(out)			::	signedCache
real(kind=dp),	intent(out)			::	unsignedCache
integer,	intent(out)			::	connections

public subroutine update_coherence_check(ilut, nI, i, signedCache, unsignedCache, connections)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=n_int),	intent(in)			::	ilut(0:NIfTot)
integer,	intent(in)			::	nI(nel)
integer,	intent(in)			::	i
real(kind=dp),	intent(inout)			::	signedCache
real(kind=dp),	intent(inout)			::	unsignedCache
integer,	intent(out)			::	connections

public subroutine eval_coherence(signedCache, unsignedCache, sgn, connections, staticInit)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),	intent(in)			::	signedCache
real(kind=dp),	intent(in)			::	unsignedCache
real(kind=dp),	intent(in)			::	sgn
integer,	intent(in)			::	connections
logical,	intent(inout)			::	staticInit

public subroutine adjust_nRefs()

Arguments

None

private subroutine fill_adi_caches()

Arguments

None

private subroutine allocate_adi_caches()

Arguments

None

private subroutine deallocate_adi_caches()

Arguments

None

public subroutine resize_ilutRefAdi(newSize)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	newSize

private subroutine resize_ilut_list(list, oldSize, newSize)

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=n_int),	intent(inout),		allocatable	::	list(:,:)
integer,	intent(in)			::	oldSize
integer,	intent(in)			::	newSize

public subroutine reallocate_ilutRefAdi(size)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	size

public subroutine enable_adi()

Arguments

None

public subroutine reset_coherence_counter()

Arguments

None

public subroutine update_first_reference()

Arguments

None

public subroutine clean_adi()

Arguments

None